Help for this page

Select Code to Download

Select or download this

    my $i = 1;
    sub f {$i += 1; $_[0] * $i}
    print f(2) + f(3);