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
API, blosxom, C, c, c++, chrome, firefox, freenode, github, go, golang, google, google app engine, google reader, greasemonkey, growl, gtk, gtktwitter, irc, javascript, jquery, json, linux, lua, memcached, microformats, minibuffer, mixi, opera, perl, plagger, python, ruby, tinytinyhttpd, tips, tthttpd, tumblr, twitter, vim, vimperator, wassr, webscraper, windows, WSSE, はてな, はてなスター, はてなブックマーク, もごもご, ネタ
![[Valid RSS]](http://mattn.kaoriya.net/images/valid-rss.png "Validate my RSS feed")
