Yahoo Web API の返り値を JSON で受け取って Perl で処理をする - make world
JSON は JavaScript での処理を前提にしたものが多く、Perl などほかの言語で処理をする場合のサンプルがなかったので、記しておく。 #!/usr/bin/env perl use strict; use warnings; use utf8; use Encode; use JSON; use LWP::UserAgent; use Data::Dumper; use URI::Escape; my $yahoo_app_id = 'your_app_id'; my $agent = 'Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)'; my $apibaseuri = 'http://jlp.yahooapis.jp/KeyphraseService/V1/extract'; my $referrer = 'http
Exif JSONサービス - Ogawa::Memoranda
Posted by: Hirotaka Ogawa @ January 26, 2007 11:49 AM | デジタルカメラなどで撮影した画像ファイルに含まれるExifメタ情報を取得し、JSON形式で出力するサービスを作ってみました。 JSON形式で取得する JSON形式でExif情報を取得する場合には以下の形式のURLをGETします。 http://as-is.net/exif/json?url=<Image-URL> 戻り値はJSON形式のExif情報です。 {"FocalLengthIn35mmFormat":28,"ThumbnailOffset":8096,"WhiteBalance (1)":"Auto", "Model":"DMC-LX2","FlashpixVersion":"0100","ShutterSpeed":"1/100", "ShootingMode":"Pr
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
