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


in reply to Re^3: How to copy an array to a hash?
in thread How to copy an array to a hash?

It seems the OP uses Win32, that's the reason I used \r\n :-) I'm sorry, but I'm on Mac OS X so I can't test the input.

The \n+ trick does the job, like the example below:

use Data::Dumper; my $input = <<EOI a = 1 b = 2 c = 3 d = 4 EOI ; # clean empty lines $input =~ s/^\s*$//mg; # construct the dictionary from $input my %dict = split m/\s+=\s+|\n+/, $input; print Dumper \%dict;

Output:

$ perl test.pl $VAR1 = { 'c' => '3', 'a' => '1', 'b' => '2', 'd' => '4' };

Hope this helps!

Igor 'izut' Sutton
your code, your rules.