基于 PNG(可移植网络图形)文件的规范,一个非常 first chunk 必须是 IHDR
(4 字节),包含图像的宽度、高度和位深度。因此,IHDR
后面是代表图像宽度
的 4 个字节,接下来的 4 个字节代表图像的高度
。
使用正则表达式 /IHDR(.{4})(.{4})/s
并转换 $1
和 $2
是否安全> 转换为宽度
和高度
?如果是这样,我该如何进行这样的转换?我应该使用 unpack("N", $x)
还是 unpack("V", $x)
..?
我当前的代码(不确定它是否适用于大图像):
if ($png =~ m/^\x89PNG\x0D\x0A\x1A\x0A....IHDR(.{4})(.{4})/s) {
($width, $height) = (unpack("N", $1) , unpack("N", $2));
}
最佳答案
我刚刚查了一下png规范; 《国际人类发展报告》面前还有更多的事情要做。所以这应该有效:
open(IN, "<xx.png");
binmode(IN);
read(IN, $header, 24);
if (substr($header, 12, 4) ne "IHDR") {
die "this is not a PNG file";
}
($width, $height)=unpack("NN", substr($header, 16));
print "width: $width height: $height\n";
close IN;
关于regex - 无需库即可从 PNG 获取图像宽度和高度,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/20528928/