How could your code possibly achieve the example array you've shown? If you split "john.doe = 18192812" on whitespace, you will get this: @data = ( 'john.doe', '=', '18192812' ), not @data = ('john.doe = 18192812'). In other words, the results you're describing aren't possible given the raw data you've described, and the code you've shown.
You could populate a hash like this:
my %data; while( $html_page =~ m/([\w.]+)\s*=\s*([\w.-]+)/g ) { $data{$1} = $2; } print "$_ $data{$_}\n" foreach keys %data;
Or if maintaining order is important, you could do it this way:
my @data; while( $html_page =~ m/([\w.]+)\s*=\s*([\w.-]+)/g ) { push @data, [ $1, $2 ]; } print $data[$_]->[0], ' ', $data[$_]->[1], "\n" foreach 0 .. $#data;
Dave
In reply to Re: Need to get multiple values.
by davido
in thread Need to get multiple values.
by frank_2k4
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |