Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    use strict;
    ...
    
    print "Estimated duration: $estimated_duration seconds\n";
    print "Estimated finish time: $estimated_finish_time (if we start now)
    +\n";
    
  2. or download this
    $ perl buk.pl 
    Estimated duration: 19398 seconds
    Estimated finish time: Tue Dec 29 16:22:14 2009 (if we start now)