Help for this page
#!/usr/bin/perl -w ... print "$var\n"; print "$var - $hash{$var}\n"; print "$hash{'$var'}\n";
print $hash{"$var"}.$hash{$hash{"$var"}}."\n";