No, its not expected, but some insight

C:\>perl -T -e"do'.\t\t.pl' or die sprintf '(%d)(%s)(%d)(%s)($@)(%s)',
+int($!),$!,int($^E),$^E,$@"
(2)(No such file or directory)(3)(The system cannot find the path spec
+ified)($@)() at -e line 1.
[download]

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:...
[download]