Help for this page

Select Code to Download

Select or download this

use Modern::Perl;

sub create_output (\@$) {
...
}
my @array = qw/1 2 3 4/;
create_output @array, 5;

Select or download this
```
array:  1 2 3 4
scalar: 5
```