print "\a";

##</code><code>##

$widget->bell();