$ perl -wE 'foreach my $i ( 0 .. 120 ) { say $i unless $i % 2 or $i % 3 or $i % 4 or $i % 5; }' 0 60 120