bit.lyの短縮URLを生成するPerlスクリプトを作ってみた | Pocketstudio.jp log3◆bit.lyの短縮URLを生成スクリプト bit.lyの短縮スクリプトを生成するのに、わざわざbit.lyを開くのは面倒(;´Д`) コマンドラインで一括変換してくれれば楽じゃね？と、コマンドラインで使えるモノをつくってみました。ちなみに、環境はPerlです。 出来たものは $ shorturl.pl <URL> こちらを実行すると、bit.ly のAPIを叩いて、短縮URLを返してくれるというモノ。 ◆前準備 今回使ったのは CPAN に公開されていた、WebService::Bitly モジュールを使います。サンプルコードが綺麗でわかりやすく、必要最低限のものがそろっていたので。組み込みは cpan コマンドを使えばとても簡単。 # cpan -i WebService::Bitly 私の環境では、結構いろいろな追加モジュールが必要になりました。必要になるものなので、全部いれてしまい
