perl -e " use File::Stat; my $mtime = (stat $ARGV[0])[9]; my($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($mtime);prin t qq!file = $file $mday/$mon/$year\n!; " web-browser-gtk2.pl file = 11/2/110 #OK