open(FD, ">/dev/console") or die;
print FD "\a";
close(FD);