Help for this page

Select Code to Download


  1. or download this
    P:\test>426324
GOT PAGE: 61833 bytes
...
warnings.pm
warnings/register.pm
        (in cleanup) Can't call method "PUSH" on an undefined value at
+ c:/Perl/site/lib/Thread/Isolate.pm line 224 during global destructio
+n.
  2. or download this
    P:\test>426297
GOT PAGE: 61637 bytes
...
vars.pm
warnings.pm
warnings/register.pm
  3. or download this
    #! perl -slw
use strict;
...
print 'GOT PAGE: ', length $thr->join, ' bytes';

print for sort keys %INC;