Help for this page

Select Code to Download


  1. or download this
    ### try.pl ###
use strict;
...
# Apart from the building output, this script
# finally outputs -5 (== 1 + 2 + 3 - 11)
foo(1,2,3,-11);
  2. or download this
    #include "EXTERN.h"
#include "perl.h"
...
        return; /* assume stack size is correct */
  3. or download this
    void
foo (x, ...)
...
        PL_markstack_ptr++;
        foo(x);
        XSRETURN_EMPTY;