Select Code to Download

use Errno qw(EINVAL);
use Tie::Scalar;

sub AUTOLOAD {
    my $constname;
...
    eval "sub $AUTOLOAD { $val }";
    goto &$AUTOLOAD;
}

$ make test
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e" "test_h
+arness(0, 'blib/lib', 'blib/arch')" t/*.t
...
# Looks like you planned 18 tests but ran 4.
# Looks like your test exited with 255 just after 4.
$

ok (tie(my $tiedScalar, 'IPC::MMA::Scalar', $scalar), "tie scalar");