regex - 无需库即可从 PNG 获取图像宽度和高度

Question

基于 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));  
}

Answer 1

我刚刚查了一下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;