I would like to create a hash based on data contained in a file. Can I not use a
variable as both the key and the value as shown below? When I print as shown I do not
get a value however if I write the key as: alta_guard => $names[1] then I get
the correct value printed out.
open(NAMES, "d://perl/avalanche/names.txt") || die "Cant open names.txt\n";
while(<NAMES>){
chomp;
@names = split(/-/);
%stations = ( $names[0] => $names[1] );
@names = ();
} # End while.
$table = 'alta_guard';
print "Text: $stations{$table}\n";
Thanks!
-tyler
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]