Well maybe it was only worth 1 cent. Here's another 1 cents worth:my %hash; foreach (@ARGV) { $_ =~ m/^(.*?)=(.*)$/; $hash{$1} = $2; }
my %hash = map{m/^(.*?)=(.*)$/;$1=>$2} @ARGV;
In reply to Re: parsing arguments
by ChrisR
in thread parsing arguments
by mifflin
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |