Advertisement
Guest User

Untitled

a guest
Jul 20th, 2017
43
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 0.15 KB | None | 0 0
  1. print map {
  2.     my $result;
  3.     $result  = 'Fizz' if $_ % 3 == 0;  
  4.     $result .= 'Buzz' if $_ % 5 == 0;
  5.     $result || $_;
  6. } ($ARGV[0]..$ARGV[1]);
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement