codepad
[
create a new paste
]
login
|
about
Language:
C
C++
D
Haskell
Lua
OCaml
PHP
Perl
Plain Text
Python
Ruby
Scheme
Tcl
#TIMTOWDI for the win! for(1..100){ print "Fizz" if it_is_fizzy ($_); print "Buzz" if it_is_buzzy ($_); print "$_" if it_is_anything_else ($_); print "\n" # if it is anything at all } sub it_is_fizzy{ !($_[0]%3) } sub it_is_buzzy{ !($_[0]%5) } sub it_is_anything_else{ $_[0]%3 and $_[0]%5 }
Private
[
?
]
Run code
Submit