# 61 print substr FizzBuzz.$_,$_%3?$_%5?8:4:0,$_%15?4:8 for 1..100 #### # 58 print+($_,Fizz,Buzz,FizzBuzz)[!($_%3)+!($_%5)*2]for 1..100