perl -le " while(1){ select(undef, undef, undef, 0.25); print chr 7 } +" [download]
In reply to Re: Waiting for another ASCII beep by Anonymous Monk in thread Waiting for another ASCII beep by fernandes