Nikola Janceski wrote: > > That would be my grep method > > $pc = grep $testvalue eq $HASH{$_}, keys %HASH; > > any ideas on how to create reverse hash quick? > This returns an odd number of elements: > > my %BYNAME = map { { "$ALL{$_}" => "$_" } } keys %ALL;
$ perl -le' %hash = ( PC1 => "Nikola Janceski", PC2 => "Some Moron", PC3 => "Some Other Moron" ); print $hash{PC2}; %byname = reverse %hash; print $byname{"Some Moron"}; ' Some Moron PC2 John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]