open FH, "< $fname" or die "Cannot open datfile: ", $!;