Does perl have a built in function to make the system speaker beep?
If not how do you call another exe file? Thanks!
-Skeeter

This message was edited by Jonathan at 2003-6-7 16:13:45

---

: Does perl have a built in function to make the system speaker beep?
Don't believe there is a built in function, but there is a CPAN module:-
http://search.cpan.org/author/GIULIENK/Audio-Beep-0.10/Beep.pm

Oh man...look at the example...
my $beeper = Audio::Beep->new();
Sorry, it's just gone midnight and that line of code has cracked me up...

: If not how do you call another exe file? Thanks!
Try system('command');. Alternatively there is exec, or you can open a pipe to/from it depending on whether you want to pipe data in our out, or put the name of the command between `backticks`. ONLY use backticks if you want to harvest the return value of the program, otherwise it's a waste of resources.

BEEEEEP,

Jonathan

###
for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
(tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
/(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");