From e90b36e8f91418105503e74e74bd4b9ecfa4c358 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 10 Feb 2020 04:36:12 +0100
Subject: [PATCH] display file size with hash

---
 termimg | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/termimg b/termimg
index bb66467..a79ecf6 100755
--- a/termimg
+++ b/termimg
@@ -37,12 +37,13 @@ my @info = eval {
 	);
 } or warn $@;
 
+my $filesize = (stat $file)[7];
 eval {
 	require Digest::MD5;
 	open my $bin, '<', $file;
 	binmode $bin;
-	my $md5 = Digest::MD5->new->addfile($bin);
-	push @info, ' # '.$md5->b64digest;
+	my $md5 = Digest::MD5->new->addfile($bin)->b64digest;
+	push @info, " # $md5 ($filesize)";
 } or warn $@;
 
 open my $pgm, '-|', convert => (
-- 
2.30.0