package New;
use v5.42;
use feature 'unicodefilenames';

Old->foo($_) for <*>;

package Old;
use v5.38;

sub foo($fname) {
  open my $fh, "<", $fname;
}