書いた。 use strict; use warnings; use lib qw/lib/; use GNTP::Growl; my $growl = GNTP::Growl->new(AppName => "my perl app"); $growl->register([ { Name => "foo", }, { Name => "bar", }, ]); $growl->notify( Event => "foo", Title => "おうっふー おうっふー", Message => "大事な事なので\n2回言いました", Icon => "http://mattn.kaoriya.net/images/logo.png", ); こんなソースで こんな物が動く。 開発はこの辺で... mattn's perl-gntp-growl at master - GitHub