Help for this page

Select Code to Download


  1. or download this
    my $st = stat($fh) or die $!;
    my ($atime, $mtime) = ($st->atime, $st->mtime);
    ...
    
  2. or download this
    use File::stat ":FIELDS";
    ...
    stat($fh) or die $!;
    my ($atime, $mtime) = ($st_atime, $st_mtime);
    ...