On Sat, 21 Feb 1998 11:08:17 +1300 (NZDT), [EMAIL PROTECTED] (Michael Beattie)
said:
>
> My only problem is that echoing the \a twice runs them together to
> sound like one... I would like a double beep, so i used `runq;runq'
> to get a suitable pause in between beeps... If anyone has a better
> idea.... :)
perl >/dev/tty1 -we '$| = 1;
print "\a";
select undef, undef, undef, 0.25;
print "\a"'
The 0.25 indicates a pause of 0.25 seconds.
--
Roderick Schertler
[EMAIL PROTECTED]
--
TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
[EMAIL PROTECTED] .
Trouble? e-mail to [EMAIL PROTECTED] .
