僕のトークでなんか気になった人がいるとのことなので僕の使っているスクリプトを置いておきますね。 #!/usr/bin/env perl use strict; use warnings; use utf8; use Cocoa::BatteryInfo; use Cocoa::EventLoop; use Cocoa::Growl ':all'; growl_register( app => 'Battery Notifier', notifications => ['NotifyLastOneMinite', 'NotifyTimeRemaining'], ); Cocoa::BatteryInfo::time_remaining_handler { my $sec = Cocoa::BatteryInfo->time_remaining_estimate; return unless