Help for this page

Select Code to Download


  1. or download this
    #! perl -slw
use strict;
...

print join ' ', do_nothing4( \@c );
  2. or download this
    C:\test>1159002.pl
1
1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1
  3. or download this
    C:\test>type _Inline\build\_1159002\_1159002.xs
#include "EXTERN.h"
...
        AV *    x