in reply to
Having trouble loading a hash with map
It is because you are only applying the map to the first line of the file. Try:
use strict;
use Data::Dumper;
my %hash;
%hash = map {map { chomp; $_ => '1' } split /(\s+|\W+)/} <DATA>;
print Dumper(\%hash);
__DATA__
LOW-RES PDF
NOT PRINT-READY
MY BIG TOE
BOOK 1:
A WAKENING
Section 1
Delusion or Knowledge:
Is This Guy Nuts, or What?
Section 2
Mysticism Demystified
The Foundations of Reality
LOW-RES PDF
NOT PRINT-READY
The My Big TOE reality model will help
you understand your life, your purpose,
