From: Laurent Destailleur <eldy@destailleur.fr>
Date: Thu, 18 Jun 2015 22:10:08 +0000 (+0200)
Subject: Show size of package to upload to SF
X-Git-Tag: AWSTATS_7_5~50
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a1bee78d8c1d9092a800b364c0f41d480242a303;p=thirdparty%2FAWStats.git

Show size of package to upload to SF
---

diff --git a/make/makepack-awstats.pl b/make/makepack-awstats.pl
index 0099a0e7..e18ef960 100755
--- a/make/makepack-awstats.pl
+++ b/make/makepack-awstats.pl
@@ -421,12 +421,15 @@ if ($nboftargetok) {
     		"$DESTI/$FILENAMETGZ.tar.gz"=>'AWStats',
     		"$DESTI/$FILENAMETGZ.zip"=>'AWStats'
     	);
+    	use POSIX qw/strftime/;
     	foreach my $file (sort keys %filestoscansf)
     	{
     		$found=0;
-    		my $filesize = -s $file;
-    		print $file." ".($filesize?"(found)":"(not found)");
-    		print ($filesize?" - ".$filesize:"");
+			my $filesize = -s $file;
+			my $filedate = (stat $file)[9];
+			print $file." ".($filesize?"(found)":"(not found)");
+			print ($filesize?" - ".$filesize:"");
+			print ($filedate?" - ".strftime("%Y-%m-%d %H:%M:%S",localtime($filedate)):"");
     		print "\n";
     	}