This seems like what you want:
#! /usr/bin/perl use strict; use warnings; use Data::Dumper; my $str; do { local $/; $str = <DATA>; }; my $hash = { split /\s+/, $str }; print Dumper $hash; __DATA__ ER 34 9YT 44 EE 66
Those who know that they are profound strive for clarity. Those who
would like to seem profound to the crowd strive for obscurity.
--Friedrich Nietzsche
In reply to Re: output of dumper
by DamnDirtyApe
in thread regex issue
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |