Help for this page

Select Code to Download


  1. or download this
    my $x = 0 if 1 == 2;
    
  2. or download this
    sub f {
      my ($n) = @_;
    ...
    f(3); # 1,1,1
    f(2); # 2,2
    f(3); # 3,3,2