[MacPerl] Net::FTP mdtm() puzzler

[robinmcf]

I'm puzzled by the output of this script: why is '$flag' gibberish and '$File_Modified_time' isn't? ====script follows======= #! perl -w use strict; use diagnostics-verbose; use Net::FTP; my($ftp,$flag,$File_Modified_time); $ftp = Net::FTP->new("your.site.com"); # server name $ftp->login("login","password"); # login ([LOGIN [,PASSWORD [, ACCOUNT] ] ]) $ftp->cwd('www'); # change to the root directory $flag=$ftp->mdtm('index.html'); $File_Modified_time= localtime($ftp->mdtm('index.html')); $ftp->quit; print "\$flag converted is :\t",localtime($flag),"\n"; print "\$File_Modified_time is:\t$File_Modified_time\n"; #====script is above this line ======= this outputs (for me): $flag converted is : 1014111014310 $File_Modified_time is: Thu Feb 1 04:01:10 2001