Re: tricky problem about stat function

2005-11-13 Thread Jeff 'japhy' Pinyan
On Nov 13, ZHAO, BING said: opendir GOP, "SCRATCH/BACKUP" or die "cannot open directory SCRATCH/BACKUP:$!"; my @smm=grep{($_ ne ".") && ($_ ne "..")} readdir GOP; foreach (@smm){ my($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime, $ctime, $blksize, $blocks) = stat

Re: tricky problem about stat function-follow up

2005-11-13 Thread ZHAO, BING
On Sun, 13 Nov 2005 17:36:39 -0800 "ZHAO, BING" <[EMAIL PROTECTED]> wrote: opendir GOP, "SCRATCH/BACKUP" or die "cannot open directory SCRATCH/BACKUP:$!"; my @smm=grep{($_ ne ".") && ($_ ne "..")} readdir GOP; foreach (@smm){ my($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime,

tricky problem about stat function

2005-11-13 Thread ZHAO, BING
opendir GOP, "SCRATCH/BACKUP" or die "cannot open directory SCRATCH/BACKUP:$!"; my @smm=grep{($_ ne ".") && ($_ ne "..")} readdir GOP; foreach (@smm){ my($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime, $ctime, $blksize, $blocks) = stat($_); print $ctime; } cl