From 838222e500c9e01f44501219cd8a8d1c85d6161f Mon Sep 17 00:00:00 2001 From: Christoph Klaffl Date: Tue, 5 Nov 2019 17:33:43 +0100 Subject: [PATCH] also show current file version if available --- findoid | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/findoid b/findoid index 48301a4..108481c 100755 --- a/findoid +++ b/findoid @@ -77,6 +77,14 @@ sub getversions { } } + my $filename = "$dataset/$relpath"; + my ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime,$blksize,$blocks) = stat($filename); + + if (defined $size) { + $versions{$filename}{'size'} = $size; + $versions{$filename}{'mtime'} = $mtime; + } + return %versions; }