Δημοσιεύτηκε: 23 Αύγ 2011, 12:52
Γιατί κουράζεστε ; από το command line
- Κώδικας: Επιλογή όλων
perl -E'use Time::Local;say int(($^T-timelocal(0,0,0,$ARGV[0],($ARGV[1]-1),$ARGV[2]))/86400)' 31 12 2001