[linux] Re: Perl: to hash or not to hash

[Ton Smeele]

Hugo,

Bij perl heb je al gauw een verkeerde referentie naar een variabele of
zo en dan kun je makkelijk ergens een nullstring als resultaat hebben.
Om te kijken wat er nu echt in je variable aan structuur zit kun je de
data dumper module gebruiken:

use Data::Dumper;
...
my %moeilijke_var= ...

print Data::Dumper::Dumper(%moeilijke_var);


De module Data::Dumper zit dacht ik standaard bij alle Perl
distributies.
Suc6,

Ton



On Sun, 2006-05-07 at 23:07 +0200, Hugo van der Kooij wrote:
> Hoi,
> 
> Ik heb iets mafs met perl wat waarschijnlijk aan mij ligt. Maar ondanks
> het nodig leesvoer kom ik er nog niet uit.
> 
> Ik begin met een hash om namen naar een numeriek ID te vertalen:
> 
> 	my %avid = {
> 	   "Aladdin Knowledge Systems" => 999,
> 	   "Authentium" => 999,
> 	   "Avira" => 9,
> .....
> 	   "Trend Micro" => 3,
> 	};
> 
> En daarna wil ik het juiste ID ophalen met iets als:
> 
> 	my $antivirus_id = $avid{"$antivir"};
> 
> En druk het af met:
> 
> 	print "\t\t$item\t$antivir($antivirus_id)\t$virusname";
> 
> Maar daar is $antivirus_id altijd een lege string.
> 
> Ik zie dan bijvoorbeeld:
> 
> 	1       Authentium()    W32\/Downloader\.SEL\@dl
> 
> En waar ik nu de bok schiet ontgaat me dus even totaal. Maar wellicht dat
> iemand anders het wel zo ziet.
> 
> Hugo.
>