Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    ...
      carp "Want " . (wantarray ? "array" : "scalar");
      (1,2);
    }
    
  2. or download this
    Want scalar at t3 line 17
            main::foo() called at t3 line 8
    ...
    Want array at t3 line 17
            main::foo() called at t3 line 12
    ret is 1 at t3 line 13.