Help for this page

Select Code to Download


  1. or download this
    if ( defined &test_sub ) {
    test_sub();
} else {
    print "Subroutine doesn't exist";
}
  2. or download this
    if ( defined &$TEST->test_sub ) {
    TEST->test_sub;
} else {
    print "Method doesn't exist";
}
  3. or download this
    Not a CODE reference at (eval 22)[/opt/perl/5.8.0/lib/perl5db.pl:17] l
+ine 2, <STDIN> line 3.