- or download this
[root@myserver perl]# ./logtest2.module.pl
Undefined subroutine &main:pen_log called at ./logtest2.module.pl line
+ 23.
- or download this
#!/usr/bin/perl -w
...
write_log(10, "Another debugging message");
close_log();
- or download this
DB<1> print "@INC";
/usr/lib/perl5/site_perl/5.8.8/i386-linux-thread-multi /usr/lib/perl5/
+site_perl/5.8.7/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.
+6/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.5/i386-linux-t
+hread-multi /usr/lib/perl5/site_perl/5.8.8 /usr/lib/perl5/site_perl/5
+.8.7 /usr/lib/perl5/site_perl/5.8.6 /usr/lib/perl5/site_perl/5.8.5 /u
+sr/lib/perl5/site_perl /usr/lib/perl5/vendor_perl/5.8.8/i386-linux-th
+read-multi /usr/lib/perl5/vendor_perl/5.8.7/i386-linux-thread-multi /
+usr/lib/perl5/vendor_perl/5.8.6/i386-linux-thread-multi /usr/lib/perl
+5/vendor_perl/5.8.5/i386-linux-thread-multi /usr/lib/perl5/vendor_per
+l/5.8.8 /usr/lib/perl5/vendor_perl/5.8.7 /usr/lib/perl5/vendor_perl/5
+.8.6 /usr/lib/perl5/vendor_perl/5.8.5 /usr/lib/perl5/vendor_perl /usr
+/lib/perl5/5.8.8/i386-linux-thread-multi /usr/lib/perl5/5.8.8 .