open my $test_fh, '<', @ARGV or die "Can not open file $!\n";