From 2f1d27e3fdca63eebd875960c6d9f07af5b4d782 Mon Sep 17 00:00:00 2001 From: Kjetil Skotheim Date: Mon, 13 Nov 2023 16:50:06 +0100 Subject: perl-weekly-challenge-243 --- challenge-243/kjetillll/perl/ch-2.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/challenge-243/kjetillll/perl/ch-2.pl b/challenge-243/kjetillll/perl/ch-2.pl index 6a3c903dcd..1f544f85d2 100644 --- a/challenge-243/kjetillll/perl/ch-2.pl +++ b/challenge-243/kjetillll/perl/ch-2.pl @@ -6,7 +6,7 @@ use strict; use warnings; sub sum_of_floors { eval join '+', - map { /_/; "int($`/$')" } + map { /_/; int($`/$') } glob "{@_}_{@_}" =~ s/ /,/gr } -- cgit