#!/usr/bin/env perl use strict; use warnings; use Net::OAuth; use HTTP::Request::Common; use LWP::UserAgent; my $consumer_key = 'xxxxxxxxxxxxxxxxxxxxxxxx'; my $consumer_secret = 'xxxxxxxxxxxxxxxxxxxxxxxx'; my $realm = 'xxxxxxxx'; my $url =…

GoogleのDevFest2010参加クイズ、結果がきたので公表しても良いんだろうか。公表するほどのものでもないか。 とにかく正解することだけを目標に書いたので、考慮漏れがあるとか、妙なデバッグ出力があるとか、そういうことは気にしない。 問題文はこちらの方…