open my $input_fh, '<', $filename or die $!;