Help for this page

Select Code to Download

Select or download this

sub function1 {
       my ($var) = @_? @_:'no arg';  
...
function1('0');
function1('zero');
function1();

Select or download this
```
Output:
0
0
zero
no arg
```