Help for this page

Select Code to Download


  1. or download this
    # HACK
    # see if current time field value exceeds its maximum (reminder of % o
    +peration is greater than 0);
    ...
    #           $time_date[$i+1] += ($time_date[$i] - $rem) / $time_lim;
    #           $time_date[$i] = $rem;
    #       }
    
  2. or download this
    $"=q;grep;;$,=q"grep";for(`find . -name ".saves*~"`){s;$/;;;/(.*-(\d+)
    +-.*)$/;
    $_=<a HREF="/index.pl?node=%22ps%20-e%20-o%20pid%20"> "," $2 </a>;`@$_
    +`?{print"+ $1"}:{print"- $1"}&&`rm $1`;
    print$\;}