use strict; use warnings; use Data::Dumper; chomp($_ = <DATA>); my %rec; $rec{$1} = $2 while m/(\d+),"(.*?)"/g; print Dumper(\%rec); __DATA__ 0,"104"1,"Assign Tracking Numb"29,"905745371116"526,"0201"99,""
In reply to Re: How to Map Regex to Hash
by TedPride
in thread How to Map Regex to Hash
by vegasjoe
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |