Bueno la cosa es que tengo un script que me corre buenísimo en Ubuntu y me sale un montón de errores en Win7.
Tengo las mismas versiones de Perl en ambos S.O. Al hacer correr perl -v me sale "This is perl 5, version 14, subversion 2 (v5.14.2)" solo que mi Ubuntu es 32 bits y el Win7 es 64 bits.
En Win7 estoy utilizando ActivePerl.
A continuación se puede ver los errores que me saltan cuando en Win7 le doy perl crear1.pl a mi programa en línea de comando.
Unquoted string "case" may clash with future reserved word at crear1.pl line 30.
Number found where operator expected at crear1.pl line 30, near "case 1"
(Do you need to predeclare case?)
Unquoted string "case" may clash with future reserved word at crear1.pl line 96.
Number found where operator expected at crear1.pl line 96, near "case 2"
(Do you need to predeclare case?)
Unquoted string "case" may clash with future reserved word at crear1.pl line 121
.
Number found where operator expected at crear1.pl line 121, near "case 1"
(Do you need to predeclare case?)
Unquoted string "case" may clash with future reserved word at crear1.pl line 140
.
Number found where operator expected at crear1.pl line 140, near "case 2"
(Do you need to predeclare case?)
"my" variable $enter masks earlier declaration in same scope at crear1.pl line 1
55.
Unquoted string "case" may clash with future reserved word at crear1.pl line 159
.
Number found where operator expected at crear1.pl line 159, near "case 3"
(Do you need to predeclare case?)
Unquoted string "case" may clash with future reserved word at crear1.pl line 212
.
Number found where operator expected at crear1.pl line 212, near "case 4"
(Do you need to predeclare case?)
"my" variable $enter masks earlier declaration in same scope at crear1.pl line 2
20.
Unquoted string "case" may clash with future reserved word at crear1.pl line 224
.
Number found where operator expected at crear1.pl line 224, near "case 5"
(Do you need to predeclare case?)
"my" variable $enter masks earlier declaration in same scope at crear1.pl line 2
32.
Unquoted string "case" may clash with future reserved word at crear1.pl line 235
.
Number found where operator expected at crear1.pl line 235, near "case 6"
(Do you need to predeclare case?)
Unquoted string "case" may clash with future reserved word at crear1.pl line 293
.
Number found where operator expected at crear1.pl line 293, near "case 7"
(Do you need to predeclare case?)
"my" variable $enter masks earlier declaration in same scope at crear1.pl line 3
01.
syntax error at crear1.pl line 29, near ")
{"
syntax error at crear1.pl line 96, near "case "
syntax error at crear1.pl line 120, near ")
{"
syntax error at crear1.pl line 138, near "}"
syntax error at crear1.pl line 157, near "}"
syntax error at crear1.pl line 209, near "}"
syntax error at crear1.pl line 222, near "}"
syntax error at crear1.pl line 234, near "}"
syntax error at crear1.pl line 291, near "}"
syntax error at crear1.pl line 303, near "}"
crear1.pl has too many errors.
Agradecido de antemano...
¡¡Saludos!!