From 7b7382ff65f4682381398630cdbd51ccf6466801 Mon Sep 17 00:00:00 2001 From: Alex 'AdUser' Z Date: Sun, 19 Jul 2015 23:59:51 +1000 Subject: [PATCH] = fix map {} --- lib/LDV/Imgbin.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/LDV/Imgbin.pm b/lib/LDV/Imgbin.pm index 2c5eb5f..0c97419 100644 --- a/lib/LDV/Imgbin.pm +++ b/lib/LDV/Imgbin.pm @@ -157,7 +157,7 @@ sub prune { opendir(my $DH, $root) or die("opendir: $!\n"); my @files = grep { m/\d+\.json/oi } readdir($DH); - my @times = map { s/\.json//oi } @files; + my @times = map { s/\.json//oi; $_ } @files; closedir($DH); my $now = time();