How to get the date of an input file 1

[fabien]

Hi!

$data_file="xxx/asidata.cgi";

open(DAT, $data_file) || die("Could not open file!");
@raw_data=<DAT>;
close(DAT);

I would like to display the date when xxx/asidata.cgi was created, how can get this info?

Thanks,

 

[PaulTEG]

(@filedata)=stat $data_file;
$change_time=$filedata[10];
$last_access=$filedata[9];

you can also use -C as a file test operator to return the nyumber of days since the inode was changed. What that is I'm not sure

HTH
--Paul

 

[fabien]

Thanks but I get 1078912114 as a result of $change_time what format is this?

 

[PaulTEG]

1078912114 is the number of seconds since the epoch Jan 1 1970

$var=1078912114 ;
 print scalar localtime($var);

HTH
--Paul