my ($dev, $ino, $rdev, $blocks, $gid, $uid, $nlink, $blksize) = (0,0,0,int(($size+BLOCK-1)/BLOCK),0,0,1,BLOCK);
my ($atime, $ctime, $mtime);
$atime = $ctime = $mtime = $files{$file}{ctime} || $ctime_start;
my ($dev, $ino, $rdev, $blocks, $gid, $uid, $nlink, $blksize) = (0,0,0,int(($size+BLOCK-1)/BLOCK),0,0,1,BLOCK);
my ($atime, $ctime, $mtime);
$atime = $ctime = $mtime = $files{$file}{ctime} || $ctime_start;