Select Code to Download

int 
MyLib::strToInt(passfail)
...
OUTPUT:
    RETVAL
    passfail

my $passfail = 0;
my $tmp = MyLib->new("12");
my $t = $tmp->strToInt(\$passfail);
print "It's $t\n" if $passfail eq 1;

It's false in xs. 0
It's true out xs. 1