Select Code to Download

G:\>perl -w -e "utime(undef, 1156817846, 'foo') #
Mon Aug 28 22:17:26 2006"
Use of uninitialized value in utime at -e line 1.

G:\>perl -w -e "utime(-A 'foo', 1156817846, 'foo') #Mon Aug 28 22:17:2
+6 2006"