Help for this page

Select Code to Download

Select or download this

sub test1 {
  ++$_[0] ;
...
my $n = 10 ;
test1($n) ;
print "N: $n\n" ;

Select or download this
```
T1 [11]
T2 [12]
T3 [13]
end
N: 13
```