Select Code to Download

       1  #!/usr/local/bin/perl5.10.0
       2  use feature ":5.10";
...
main::ret_scalar:29 wantarray: no
main::ret_list:29 wantarray: yes
match