perl -e 'print map{(("Fizz")x!($_%3).("Buzz")x!($_%5))||$_}(1..100)'
