Seems like you're just interested in stuff of the form:
(\w+)=<(.*?)>
So something like this should help:
while (<$log>) { my $info; $info{$1}= $2 while (/(\w+)=<(.*?)>/g); }
In reply to Re: Some assistance with splitting variables
by Skeeve
in thread Some assistance with splitting variables
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |