open my $fIn, '<', $filename or die "Can't open '$filename': $!";