in reply to Re^6: read a hash from a file
in thread read a hash from a file

Try this: 

my $record = REC->new( 
    map{
        s/#.*//;
        s/^\s+//;
        s/\s+$//;
        m/(.*?)\s*=\s*(.*)/;
    } read_file($file)
);

[download]

In Section Seekers of Perl Wisdom