macro beep ($) {
   print LOG "BEEP: $_[0]\n";
}