my $errmsg = eval(SubCall($silly));
ok ("Stop messing around." eq $errmsg);