image_events.pl 

my $audio = Clutter::Gst::Audio->new;
$audio->set_filename("$FindBin::Bin/bell.ogg");
$icon->signal_connect(
    'button-press-event' => sub { $audio->set_playing(TRUE); }
);