for my $pair ( split /\s+/, $restofstring ) { my ($key, $val) = split /=/, $pair; $hash{$type}{$key} = $val; } [download]
In reply to Re: Issues with Split by duyet in thread Issues with Split by cipher