open my $fh, "<", "hard-coded-filename"; # instead of: open my $fh "