livedoor 天気情報のWeather Hacksが面白そうなので、少しいじってみた。 push_weather.plというツールが完成。まぁ登録している地域の天気予報を、登録しているメールアドレスに送るツール。手動でやるとナンセンスこの上ないけど、玄箱にいれて、cronで回すとちょっとは使いでがあるかな。 Weather HacksのRSS URLを$urlに、メールの送信に使えるSMTPサーバのサーバ名を$smtp_serverに、そのSMTPサーバを使うときの送信者メールアドレスを$sender_address、そして$recipientにはメールを送信したいアドレスを設定すると動かす度にメールが出ると思う。あぁ、いつものように漢字コードはEUC-JP前提で作っている。 しかし、このレベルのツールが1時間弱でできてしまうのはいいね。perlつかいやすいや。
Weather Hacks お天気Webサービス仕様 - Weather Hacks REST的実装になってる．早速Perlで叩いてみた．すっごい手抜き実装ですけどー． use strict; use LWP::UserAgent; use URI; use XML::Simple 'XMLin'; use Template; my $uri = URI->new('http://weather.livedoor.com/forecast/webservice/rest/v1'); $uri->query_form(city => 70, day => 'today'); # 70 = 横浜市 my $xml = XMLin( LWP::UserAgent->new->get($uri)->content ); Template->new->process(\*DATA, { weathe
WebService::Livedoor::Weather すでに誰かが作っていそうな、PerlでLivedoor Weather Hacksにアクセス。とりあえず版。 id:p4lifeさんのPHP で Livedoor のお天気Webサービスを使うとほぼ同じインターフェイス。地域名とidとの結び付けデータのforecastmap.xmlをモジュール内部ではなくサーバから持ってくるところが違うぐらい。 my $lwws = WebService::Livedoor::Weather->new(); my $ret = $lwws->get('70','tomorrow'); #my $ret = $lwws->get('東京','today'); #print Dumper($ret); print $ret->{title},"¥n"; print $ret->{description
1これが「よかれと思って」ウザイやつまめきちまめこニー... 2ひろゆき「漫画喫茶ってホテルの上位互換ですよね？漫画読み放...オレ的ゲーム速報＠... 3【悲報】水原一平さん、カジノの学校を中退していたWMWMWMWMWM...なんじぇいスタジア... 4日本国民「賃金が増えないの！助けて！」国民民主党・玉木「ふ...ハムスター速報 5【画像】飲食店員「すいません。チキン南蛮とチキンカツを間違...はちま起稿 6内定辞退したら「わかった。もしよかったらいつでも戻って来て...不思議.net - 5ch(2... 7【悲報】カンニング→自殺アルファルファモザ... 8バレンタインの苦い思い出【47】ヤゴヴのマンガ劇場 9【れいわ信者】元れいわ新選組ボランティア「山本太郎を支持す...痛いニュース(ﾉ∀`... 10【値上げ】5月電気代、大手全社値上がり政府の再エネ賦課金引...ツイッター速
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
