new files

2013-04-10 12:38:42 -07:00 · 2013-04-10 12:38:42 -07:00 · 86c034bb8b
commit 86c034bb8b
parent 3af7344581
1364 changed files with 21352 additions and 0 deletions
--- a/Task/FizzBuzz/Perl/fizzbuzz-1.pl
+++ b/Task/FizzBuzz/Perl/fizzbuzz-1.pl
@ -0,0 +1,14 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use feature qw/say/;
+
+foreach my $i (1 .. 100) {
+    say + (0 == $i % 15) ? "FizzBuzz"
+        : (0 == $i % 3) ? "Fizz"
+        : (0 == $i % 5) ? "Buzz"
+        : $i
+        ;
+}