BEGIN{ open IN, $myfile or die "can't open $!"; local $/; $char{ ( /Character=(.*)/ )[0] } = $hex{ ( /Hexidecimal=(.*)/ )[0] + } = { map{ /(.*?)=(.*)/ } split /\n/ } for split /\n-+\n/, <IN>; }
In reply to Re: Reading into a hash from regex
by strictvars
in thread Reading into a hash from regex
by songahji
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |