http://www.perlmonks.org?node_id=607689


in reply to Should I leave behind beautiful code or readable code?

It's no good, I can't resist.

Why doesn't anyones code look like mine?

sub MySub { ...some stuff... #print scalar @somearray; my @jiggered = map{uc $_} @somearray; #print Dumper \@jiggered; my %hash = map {split(/ /, $_, 2)}, @jiggered; #print Dumper \%hash; #{ # my $file = 'tmp/hash_dump.txt' # # open my $fh, '>', $file # or die "can't open $file to write: $!"; # print $fh Dumper \%hash; #} #email_home('hey, we got to here!'); return %hash; }
:-)