Perlで画像の縦横サイズを簡単に取得できるモジュール Image::Size | heavy monologue

URLで指定された画像の縦横サイズ（width, height）を測る必要があったので、メモ。 ファイルハンドルなり、データ実体そのものを渡してやることにより、縦横のサイズを測ってくれるImage::Sizeモジュール。 広く知られる画像形式なら大抵対応してるし、画像形式の判断も勝手にやってくれる。 あらかじめ必要なモジュールはこれらかな。 CPANコマンドからでも、ダウンロードしてmakeでもいいので、とにかくインストールする。 Module::Build Compress::Zlib で、エラー処理とか無視してとっても簡単に書くと、こんな感じ。 簡単！（imgsize()にはファイルハンドラ渡してもOK） use strict; use Image::Size; use LWP::UserAgent; use HTTP::Request::Common; my $ua = LWP::U