my %hash = map { $_, 1 } @array; What is the usage of 1 in this code?
When you have any kind of doubt about a Perl structure, you can use Data::Dumper: use Data::Dumper; my %hash = map { $_, 1 } @array; print Dumper \%hash; Try it! -- Igor Sutton Lopes t: +55 51 9627.0779 e: [EMAIL PROTECTED]