Re: Golfing dubstep.pl

Replies are listed 'Best First'.
Re^2: Golfing dubstep.pl by choroba (Cardinal) on Sep 02, 2013 at 22:29 UTC
86 `1 2 3 4 5 6 + 7 8 12345678901234567890123456789012345678901234567890123456789012345 +678901234567890123456 perl -e'use Time::HiRes"usleep";$\|=1;{print+(int rand 9)%2?"wub ":"woo +o ";usleep 1e5;redo}'` [download] Update: Or even 69: `perl -e'$\|=1;{print+(int rand 9)%2?"wub ":"wooo ";select$u,$u,$u,.1;re +do}'` [download] Update: 64, thanks hdb: `perl -e'$\|=1;{print rand(9)%2?"wub ":"wooo ";select$u,$u,$u,.1;redo}' 1 2 3 4 5 6 1234567890123456789012345678901234567890123456789012345678901234` [download] لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ	[reply] [d/l] [select]
Re^3: Golfing dubstep.pl by hdb (Monsignor) on Sep 03, 2013 at 06:40 UTC
`int` is not needed.	[reply] [d/l] [select]
1052206 by perlaintdead (Scribe) on Sep 04, 2013 at 03:56 UTC
Doesn't catch the first "w" but here is a slight variation. `select$u,$u,$u,.1while$\|=print rand>5/9?ub:ooo,$".w`	[reply] [d/l]
Re^2: Golfing dubstep.pl by perlaintdead (Scribe) on Sep 02, 2013 at 21:27 UTC
after research this has by far the weirdest operator i've seen	[reply]