Merge branch 'izifresh-new-branch'

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);