Problemilla (seguro q estúpido ).

[TooManySecrets]

Buenas.

Ten el siguiente problemilla al ejecutar este ejemplo:

#/usr/bin/env perl

print "Cuanto es el resultado de sumar 2 + 2\n";
$a = <STDIN>;
until ($a == 4) {
        print "Sabes que no es correcto, prueba otra vez \n";
        $a = <STDIN>;
}
print "SI, demasiado fácil para tí XD\n";

Me devuelve este error:

./pun2.pl: print: command not found
./pun2.pl: line 4: syntax error near unexpected token `;'
./pun2.pl: line 4: `$a = <STDIN>;'

Es calcadito al ejemplo que estoy siguiendo de un libro, pero me dá este 
error.
¿Alguien podría ayudar a este neófito del Perl, por favor?

Gracias.

-- 
Have a nice day ;-)
TooManySecrets