aboutsummaryrefslogtreecommitdiff
path: root/challenge-030/izifresh
diff options
context:
space:
mode:
authorroot <rederni@mail.ru>2019-10-18 18:42:21 +0000
committerroot <rederni@mail.ru>2019-10-18 18:42:21 +0000
commitb0134fce74356142bd490e5a85730de752b40fc2 (patch)
tree076c594ae7dc33fab7c8cece75490d7632f8733f /challenge-030/izifresh
parentc97e1abd5def1ad732c0d082390b0e525956360d (diff)
downloadperlweeklychallenge-club-b0134fce74356142bd490e5a85730de752b40fc2.tar.gz
perlweeklychallenge-club-b0134fce74356142bd490e5a85730de752b40fc2.tar.bz2
perlweeklychallenge-club-b0134fce74356142bd490e5a85730de752b40fc2.zip
update
Diffstat (limited to 'challenge-030/izifresh')
-rw-r--r--challenge-030/izifresh/Perl 5/numbers6
1 files changed, 3 insertions, 3 deletions
diff --git a/challenge-030/izifresh/Perl 5/numbers b/challenge-030/izifresh/Perl 5/numbers
index 9c737c11b7..aac6b66a6c 100644
--- a/challenge-030/izifresh/Perl 5/numbers
+++ b/challenge-030/izifresh/Perl 5/numbers
@@ -4,9 +4,9 @@ package Numbers;
use strict;
use warnings;
use v5.10;
- for my $i (0..10) {
- for my $j (0..10) {
- for my $k (0..10) {
+ for my $i (1..10) {
+ for my $j (1..10) {
+ for my $k (1..10) {
if (($i+$j+$k) == 12) {
if ( $i % 2 == 0 or $j % 2 == 0 or $k % 2 == 0 ) {
my @m = ($i,$j,$k);