This was posted some time back by gunnar. How does this exactly work ? Can someone point to help on map ?
> my %myNEWhash =
> map { $_, delete $myhash{$_} } grep /^1\D/, keys %myhash;
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
