diff options
| author | Luis Mochan <mochan@fis.unam.mx> | 2022-10-25 07:35:25 -0500 |
|---|---|---|
| committer | Luis Mochan <mochan@fis.unam.mx> | 2022-10-25 07:35:25 -0500 |
| commit | 50b08241503a29dfc16335429344cce741bd6642 (patch) | |
| tree | 810ef6228715179c49d2cecd11888ff6d394a108 | |
| parent | 82bb0ee8a7a5211443dda553bcbd7afff6794a14 (diff) | |
| download | perlweeklychallenge-club-50b08241503a29dfc16335429344cce741bd6642.tar.gz perlweeklychallenge-club-50b08241503a29dfc16335429344cce741bd6642.tar.bz2 perlweeklychallenge-club-50b08241503a29dfc16335429344cce741bd6642.zip | |
Fix message
| -rwxr-xr-x | challenge-188/wlmb/perl/ch-1.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-188/wlmb/perl/ch-1.pl b/challenge-188/wlmb/perl/ch-1.pl index 469f5b67b1..2ec087eec5 100755 --- a/challenge-188/wlmb/perl/ch-1.pl +++ b/challenge-188/wlmb/perl/ch-1.pl @@ -18,4 +18,4 @@ while(my $z=$iter->next){ ++$count if ($x+$y)%$divisor==0; } say "The number of pairs from the list ", - join(", ", @ARGV), " divisible by $divisor is $count"; + join(", ", @ARGV), " with sum divisible by $divisor is $count"; |