aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMohammad S Anwar <mohammad.anwar@yahoo.com>2019-10-18 19:50:23 +0100
committerMohammad S Anwar <mohammad.anwar@yahoo.com>2019-10-18 19:50:23 +0100
commit47319e15ff95e001c1741a4628ee634bc7e89a67 (patch)
tree52cf1ff0c500b9f7803cab087e90d9d305e7735b
parent5649e2d911b575356a5e16350e4db9367ac381c5 (diff)
parentb0134fce74356142bd490e5a85730de752b40fc2 (diff)
downloadperlweeklychallenge-club-47319e15ff95e001c1741a4628ee634bc7e89a67.tar.gz
perlweeklychallenge-club-47319e15ff95e001c1741a4628ee634bc7e89a67.tar.bz2
perlweeklychallenge-club-47319e15ff95e001c1741a4628ee634bc7e89a67.zip
Merge branch 'new-branch' of git://github.com/izifresh/perlweeklychallenge-club into izifresh-new-branch
-rw-r--r--challenge-030/izifresh/perl5/ch-2.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/challenge-030/izifresh/perl5/ch-2.pl b/challenge-030/izifresh/perl5/ch-2.pl
index 9c737c11b7..aac6b66a6c 100644
--- a/challenge-030/izifresh/perl5/ch-2.pl
+++ b/challenge-030/izifresh/perl5/ch-2.pl
@@ -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);