TOP > Web制作

画像のサイズ取得 perl



#内部ファイルサイズ取得
use Image::Size;
($img_width, $img_height) = imgsize("$img_file");

#外部ファイルサイズ取得
use LWP::Simple;
use GD;

my $img_url = "http://www.xxx.xxx/xxx.jpg"
my $get_img = &get("$img_url"); die "取得失敗" unless $get_img;

my $img = GD::Image->new($get_img);
my $img_width = $img->width;
my $img_height = $img->height;
(2013年11月22日)


スポンサーリンク

スポンサーリンク





Copyright(C) 2009-2018 「気ままにMyRoad」 All Rights Reserved.