http://qs321.pair.com?node_id=10994


in reply to Array to Hash

foreach (@ary) {$hash{$_} = 1; }

[download]
Will this do?

#!/home/bbq/bin/perl
# Trust no1!

In Section Seekers of Perl Wisdom