image-jpegminimal:创建不带标题的JPEG预览

时间:2024-05-29 16:25:37
【文件属性】:

文件名称:image-jpegminimal:创建不带标题的JPEG预览

文件大小:118KB

文件格式:ZIP

更新时间:2024-05-29 16:25:37

Perl

名称 Image :: JpegMinimal-创建不带标题的JPEG预览 概要 my $compressor = Image::JpegMinimal->new( xmax => 42, ymax => 42, jpegquality => 20, ); sub gen_img { my @tags; for my $file (@_) { my $imager = Imager->new( file => $file ); my $preview = $compressor->data_preview( $file ); my ($w, $h ) = ($imager->getwidth,$imager->getheight); my $html = <<HTML; <im


【文件预览】:
image-jpegminimal-master
----README.mkdn(8KB)
----MANIFEST(360B)
----t()
--------data()
--------01-synopsis.t(1KB)
----MANIFEST.SKIP(195B)
----README(8KB)
----Makefile.PL(3KB)
----META.json(1KB)
----examples()
--------gen-data.pl(4KB)
----.gitignore(135B)
----lib()
--------Image()
----xt()
--------99-todo.t(1KB)
--------99-unix-text.t(812B)
--------99-changes.t(698B)
--------99-manifest.t(870B)
--------99-pod.t(666B)
--------99-versions.t(1KB)
--------99-examples.t(348B)
----META.yml(624B)
----Changes(54B)

网友评论