Hola,
Tengo el siguiente código:
open LANGFILE, 'locale' or die $!;
my @lines = <LANGFILE>;
close(LANGFILE);
if ($string =~ m/es_ES/){
my $langt = "es";
print "es \n";
}
Mi problema es que no funciona. El archivo que abre tiene este texto: es_ES y aun así da como que no encontró esa expresión. ¿Quizás es porque $lines es un escalar?
Help me. :(