$ perl buk.pl 
Estimated duration: 19398 seconds
Estimated finish time: Tue Dec 29 16:22:14 2009 (if we start now)