Help for this page

Select Code to Download

Select or download this

                                                                      
+        
package Devel::Lite;

...
    return wantarray ? @ret : $ret[0];
}
1;

Select or download this

perl -I. -d:TobyLite -e "sub x { print qq{okay\n}; } x();"