Help for this page

Select Code to Download


  1. or download this
    my $count = 0;
    $count++ while <FILE>;
    
  2. or download this
    1 while <FILE>;
    my $count = $.;