我有一个 Perl 脚本: 当我从命令行运行它时,我得到: 我期望(并且想要): 是什么赋予了? ...
我有一个 Perl 脚本: 当我从命令行运行它时,我得到: 我期望(并且想要): 是什么赋予了? ...
如何将 svg 图像转换为 png、将其保存到文件并收集有关它的基本信息? 当我运行它时,我得到: (undef) x (undef), (undef) 字节没有错误,没有test.png ,并且图像尺寸未定义。 如何在 PerlMagick 中将 svg 图像转换为 png? 至于这是否是重复 ...
我有一个图像 (JPEG),我想无缝地叠加在另一个图像上。 如果我在 Photoshop 中尝试这样做,我会羽化边缘。 但是我不知道如何使用 PerlMagick api 来实现这一点。 我曾尝试使用 Vignette 创建一个模糊的边框,但这并不像我希望的那样工作。 ...
有没有人最近在 Windows 上使用最新版本的草莓 perl 安装 imagemagick/perlmagick 取得了任何成功? 我已经阅读并尝试了许多建议我在网上找到的东西,但是没有一个是最近的,也没有一个对我有用。 我也将所有 imagemagick 文件夹添加到路径中。 似乎使用 imag ...
我一直在编写一个从网站检索收藏夹图标的脚本,该脚本现在大部分工作正常,但我遇到了一个巨大的障碍。 当我调用 Perl 中的 ImageMagick 模块时,它似乎不知道如何处理古老的 favicon.ico 文件(当站点具有非 ICO 图标时,一切都很好)。 我可以找到很多关于转换为ICO 以创建网 ...
我正在尝试剪切图像并将其放置在另一个图像上,例如蛋糕上的照片,我正在Perl中工作并使用Image :: Magick Perl库。 这是我能够生成的输出,我无法制作剪切图像的背景。 这是我的代码: 另外,我看到了一些使用AffineTransform的帖子,但是使用这些帖子我无法 ...
我正在尝试使用Graphics :: Magick将PNG文件转换为Perl中的无损WebP。 命令行是: 我的Perl代码如下所示: 这段代码完美地编写了有损WebP文件,但是如何用Perl API表示“ -define”呢? 谢谢, 更新:看来我需要调用AddD ...
我正在阅读没有 alpha 通道的图像: 然后尝试将某些像素设置为不同的颜色/alpha 值: 但是除非起始图像文件已经有一个 alpha 通道,否则我写的文件: 不包含 alpha 通道。 我一直在阅读 PerlMagick 文档,但我一定不是在寻找正确的东西。 有没有办法向我的$i ...
我正在使用Perl和ImageMagick(Perl-API)。 第一步,我拍摄图像的矩形并模糊图像的这一部分(加上该矩形的旋转)。 多亏了Mark Setchell,这才可以发挥更大的作用(请参阅此处的stackoverflow问题: 如何使用ImageMagick来模糊/像素化图像的一部 ...
以下代码使用100x100切片作为源图像生成300x100图像: 仅从磁盘读取一次时,如何获得相同的结果? ...
此Perl脚本将图像上传到服务器,然后保存:-适合900x900 px的图库图像-正方形图库缩略图140x140 px-在js文件中添加带有图像和缩略图名称的一行 问题是该脚本有时有效,有时-无效。 每十次尝试中的一两次,效果就会很好。 当它不起作用时,通常会返回“内部服务器错误”,并 ...
我想在具有颜色名称或其十六进制代码的图像中获得唯一颜色的直方图。 我无法使用QueryColorname方法将直方图方法的输出值转换为颜色名称或十六进制代码; 它始终返回黑色,不返回十六进制代码。 可能是由于histogram()方法的(0 ... 65535)结果范围,我无法将其 ...
我在某个论坛中找到了以下ImageMagick命令,可以很好地比较图像。 结果是一个浮点数和低值(例如0.5等)意味着:图像相似。 使用附带的图像,它产生一个数字: 0.0419167 。 (图像非常相似) 我想使用Image :: Magick(perlmagick)。 ...
我想使用PERL从文件夹中检测黑色/几乎黑色的JPEG图像。 您对我应该使用的方法/模块有什么建议吗? ...
我的主管要求我将使用PerlMagick的Perl脚本部分转换为管道并使用ImageMagick的命令行版本(出于各种不相关的原因)。 使用我们现有的界面(裁剪,缩放,保存等),我正在建立一个用户想要对图像执行的操作列表,构建语句到管道然后执行它。 我想知道的是: 转换操作 ...
我刚刚找到了一段代码,用于确定图像是否具有透明像素: 显然,这是行不通的。 我使用具有透明像素的打开图标库的图像user-desktop.png进行了尝试。 支票返回-1。 我只能猜测为什么使用此命令。 GD的手册说: 如果不带任何参数调用此方法[transpare ...
我想在Perl中将自定义文本设置为IPTC字段“特殊说明”。 不使用模块怎么办? ...
我需要将大图片(最大16384x16384px)拆分为较小的块,通常为512x512。 为此,我使用以下简单的perl脚本: 现在,我需要构建一个较小的索引,其中包括原始图像中的位置偏移,例如在1024x1024源图像的情况下: ...或类似的东西。 基本上,只是为了跟踪每个 ...
有背景图片。 (对于这个例子, mesh.png ) 对图像需要添加一个圆圈,边框模糊。 目前有这个: 这会产生下一个图像: 但是我需要一个带有“模糊边缘”的圆圈,就像下一个(手动创建) 任何人都可以帮助如何使用Image :: Magick获得这样一个模糊的圈 ...
我最近接手了其他人在项目中的职位。 当以下代码在其旧计算机上运行时,它可以正常工作。 但是当我运行它时,我得到了一条空白的白线和一个带有红色轮廓的黄色矩形。 本质上,Draw()方法可以正常工作,但Annotate()方法却无能为力。 无论我为文本,字体,字体大小或颜色传递什么值,都不会 ...