Help for this page

Select Code to Download


  1. or download this
      @aa = @bb = (1) x $nn;
    
  2. or download this
      push @ready, "@aa\n";
      ...
      push @ready, "@aa\n";
      ...
      push @ready, "@bb\n";
    
  3. or download this
      for (my $kk = $nn; $kk > 0; --$kk) {
        ...
      }