Estoy trabajando con una funcion que me permita extraer texto de un buzon de correo pero a pesar de que el buzon es cargado correctamente y el texto que busco a traves de un condicional aparentemente correcto si luego de la condicion elijo imprimir el resultado no lo imprimi ya que la condicion no se cumple, el codigo que aparece en el texto son 3 numeros más un espacion y 3 numeros mas separados por puntos, algo que se conoce como codigo dsn, ejemplo: 550 5.1.1 a continuación el codigo:

<!-- begin snippet: js hide: false console: true babel: false -->

<!-- language: lang-html -->

    foreach(split(/\n/, $body ) ){
    next if(/^\s*$/);

    if($_ =~ /^(\d{3}\s\d{1}\.\d{1}\.\d{1})/ig ){
    	 $smtpCode = $1;
             print $smtpCode;
    }

<!-- end snippet -->

Cabe destacar que los uses y las variables están inicializadas.