seq 1 30 | perl -aple '$_.=" Fizz" unless $F[0] % 3' | perl -aple '$_.=" Buzz" unless $F[0] % 5'