You can also declare your variables when assigning them:

use strict;
my ($second, $minute, $hour, $dayOfMonth, $month, $yearOffset, $dayOfW
+eek
, $dayOfYear, $daylightSavings) = localtime();
[download]