Help for this page

Select Code to Download


  1. or download this
    open RECORD_NUMBER, '<', "counter_data.dat" or die;
    $count = <RECORD_NUMBER>;
    ...
    open FILE, '>', "counter_data.dat" or die;
    print FILE $count;
    close FILE;
    
  2. or download this
    perl -i -pe '++$_' counter.dat