ブログで趣味でプログラミングからお料理まで呟いています。よろしくー。(^-^)/


先月  2021年 9月  来月



1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 2122 23 24 25
26 27 28 29 30


文字サイズ変更:
トップページ > Perlについて

●Perlについて●

2021-09-21 18:43:42

標準モジュールで、画像の縦横サイズを取得する方法

画像の縦、横サイズは、Image::Magick(PerlMagick)で取得していますが、他のモジュールで取得可能です。
GDモジュールなら、Perl標準のモジュール(2021/09時点 Perl5 version24)なので、(但し、昔からあるモジュールのようです)後から手動でインストールする必要のないモジュールです。

use GD; my $img = newFromJpeg GD::Image("./sample/example.jpg"); my ($width, $height) = $img->getBounds(); print "$width:$width $height:$height ";


※newFromJpegのjpgをpngかgif、gd、xbmに変更して使用することができます。


($width,$height) = $image->getBounds();

このメソッドはそのイメージの幅と高さの2つ要素を持つリストを返します。 取得することはできますが、一度、作成したらイメージの大きさを変更することはできません。…と、Perldoc.jpには書かれていますが、画像のサイズを変更できない、ということはGDモジュール上の話ですので、それは頭の片隅に置いておいてください。

参照1「Perldoc.jp GD

参照2「cpan GD」(英語)


Print Twitter(test) short URL いいね:19

back to the TOP


PR (i)