Using perl Syntax Highlighting
%hash = (hola, hello, naranja, orange, tu, you, manzana, apple, cosa, thing); #creación del hash
foreach $key (keys(%hash)) {
print "$key\n";
$input = <STDIN>;
chomp($input);
$valor=$hash{$key};
if ($input eq $valor) {print "yes\n";}
else {print "nooo\n";}
}
foreach $key (keys(%hash)) {
print "$key\n";
$input = <STDIN>;
chomp($input);
$valor=$hash{$key};
if ($input eq $valor) {print "yes\n";}
else {print "nooo\n";}
}
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
y así, funciona. El problema es cuando tengo que meter en el hash un archivo de texto que tiene esta disposición:
- Código: Seleccionar todo
manzana
apple
naranja
orange
donde cada elemento del hash es una línea.
Nada de lo que he intentado hasta ahora me ha salido. ¿Alguna idea?
