Select Code to Download

void test2 ( char* text ) {
    PerlIO_printf( PerlIO_stderr(), "Got:'%s'\n", text );
}

use warnings;
use strict;
...
    elsif(@_ == 2) { _foo2($_[0], $_[1]) }
    else {die "Wrong no. of args to foo" }
}