TEPCO-screen-status is a project mainly written in Perl, it's free.
東京電力の電力状況をscreen のステータスに表示
404: Not Found