sumikawa · October 12, 2011 07:17
diff --git a/fizzbuzz b/fizzbuzz
 #!/usr/bin/perl
 for $i (1..$ARGV[0]) {
    $r = "";
    $r .= ((Fizz)[$i % 3]);
    $r .= ((Buzz)[$i % 5]);
    print $r || $i;
    print "\n";
 }
	#!/usr/bin/perl
	for $i (1..$ARGV[0]) {
	$r = "";
	$r .= ((Fizz)[$i % 3]);
	$r .= ((Buzz)[$i % 5]);
	print $r \|\| $i;
	print "\n";
	}