X-Git-Url: https://git.deb.at/?p=debienna.git;a=blobdiff_plain;f=Kata4L%C3%B6sungen%2FPerl%2Findex.mdwn;fp=Kata4L%C3%B6sungen%2FPerl%2Findex.mdwn;h=ec090a82c515b2da802904482eab4b71adbfd21a;hp=9e07b54972a4f688cc4a34fd14dd429631f8b49f;hb=0c24fec7e226eb937bb5bc2b876bca6834a7c4fb;hpb=20a0f23c68ffa5790d886d4efa3152bd3a21966f diff --git "a/Kata4L\303\266sungen/Perl/index.mdwn" "b/Kata4L\303\266sungen/Perl/index.mdwn" index 9e07b54..ec090a8 100644 --- "a/Kata4L\303\266sungen/Perl/index.mdwn" +++ "b/Kata4L\303\266sungen/Perl/index.mdwn" @@ -12,7 +12,7 @@ while(<>) next unless ($_[0] > 0 and $_[0] < 31); $day = $_[0]; $spread = $_[1] - $_[2]; - unless (defined $min_spread) + unless (defined $min_spread) { $spread_day = $day; $min_spread = $spread; @@ -98,4 +98,4 @@ print "part2: ", dm("../K4Soccer.txt", 1, 6, 8), "\n"; --- - [[CategoryCodeSnippets|CategoryCodeSnippets]] + [[CategoryCodeSnippets|CategoryCodeSnippets]]