Select Code to Download

if (0) {
    print "This block is happening!\n";
...
DynaLoader.pm
AutoLoader.pm
Win32.pm           <------- Perl sees all uses (almost)

[root@devel3 root]# cat test.pl
#!/usr/bin/perl -wT
...
Can't locate Win32/TieRegistry.pm in @INC (@INC contains: /usr/local/l
+ib/perl5/5.6.2/i686-linux /usr/local/lib/perl5/5.6.2 /usr/local/lib/p
+erl5/site_perl/5.6.2/i686-linux /usr/local/lib/perl5/site_perl/5.6.2 
+/usr/local/lib/perl5/site_perl) at ./test.pl line 4.
BEGIN failed--compilation aborted at ./test.pl line 4.
[root@devel3 root]#