Select Code to Download

($day, $month, $year) = (localtime)[ 3, 4, 5 ];

$date = `Date /T`;
print FILENAME $date;