Select Code to Download

Select or download this

use strict;
use warnings;
...
        $j++;    
    }
}

Select or download this

(in cleanup) Can't call method "cmd" on an undefined value at /Library
+/Perl/5.10.0/MozRepl/Client.pm line 186,<DATA>  line 42 during global
+ destruction.
    
    (in cleanup) Can't call method "execute" on an undefined value at 
+/Library/Perl/5.10.0/MozRepl.pm line 372,<DATA>  line 42 during globa
+l destruction.

    (in cleanup) Can't call method "is_debug" on an undefined value at
+ /Library/Perl/5.10.0/MozRepl/Client.pm line 188,<DATA>  line 42 duri
+ng global destruction.