use strict; #dammit! my %hash; open(CONF," conf.file") || die 'didn't open for reading'; while() { my ($name,$data) = split; # look ma, no args! $hash{$name} = $data; } close CONF;