[chad@thepurplebuffalo ~/w/x]$ date > asdf
[chad@thepurplebuffalo ~/w/x]$ perl                      
$now = localtime;
rename 'asdf' , "$now asdf"
[chad@thepurplebuffalo ~/w/x]$ ls -l *asdf*
-rw-------  1 chad users 29 2006-10-28 22:02 Sat\ Oct\ 28\ 22:02:59\ 2006\ asdf