Re^4: what would you like to see in perl5.12? (require $class)

No, I meant search @INC, like:

$ echo 1 > Foo::Bar
$ strace perl -e'require "Foo::Bar"' 2>&1 |grep Foo
execve("/usr/bin/perl", ["perl", "-erequire \"Foo::Bar\""], [/* 38 var
+s */]) = 0
stat64("/etc/perl/Foo::Bar", 0xbffcabac) = -1 ENOENT (No such file or 
+directory)
stat64("/usr/local/lib/perl/5.8.8/Foo::Bar", 0xbffcabac) = -1 ENOENT (
+No such file or directory)
stat64("/usr/local/share/perl/5.8.8/Foo::Bar", 0xbffcabac) = -1 ENOENT
+ (No such file or directory)
stat64("/usr/lib/perl5/Foo::Bar", 0xbffcabac) = -1 ENOENT (No such fil
+e or directory)
stat64("/usr/share/perl5/Foo::Bar", 0xbffcabac) = -1 ENOENT (No such f
+ile or directory)
stat64("/usr/lib/perl/5.8/Foo::Bar", 0xbffcabac) = -1 ENOENT (No such 
+file or directory)
stat64("/usr/share/perl/5.8/Foo::Bar", 0xbffcabac) = -1 ENOENT (No suc
+h file or directory)
stat64("/usr/local/lib/site_perl/Foo::Bar", 0xbffcabac) = -1 ENOENT (N
+o such file or directory)
stat64("./Foo::Bar", {st_mode=S_IFREG|0644, st_size=2, ...}) = 0
open("./Foo::Bar", O_RDONLY|O_LARGEFILE) = 3
[download]

Comment on Re^4: what would you like to see in perl5.12? (require $class) Download Code

Replies are listed 'Best First'.
Re^5: what would you like to see in perl5.12? (require $class) by ikegami (Patriarch) on Aug 22, 2007 at 20:05 UTC
The change I propose would have `require` search for `Foo/Bar.pm` and `Foo/Bar.pmc` when supplied `"Foo::Bar"` for argument, just like when it's supplied `Foo::Bar` for argument. The only thing it would break is the ability to require modules with `::` in the file name. That's extremely unlikely since it would break on Windows and old Macs.	[reply] [d/l] [select]