D:\>perl -Te" require 'New.pm'"
Can't locate New.pm in @INC (@INC contains:...
D:\>perl -Te" require 'New.pl'"
Can't locate New.pl in @INC (@INC contains:...
D:\>perl -Te" require './New.pm'"
hi
D:\>perl -Te" require './New.pl'"
hi
D:\>perl -Te" require '.\New.pl'"
Can't locate .\New.pl in @INC (@INC contains:...

D:\>perl -Te" require '.\New.pm'"
Can't locate .\New.pm in @INC (@INC contains:...