问题标签 [perlmagick]
For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.
perl - 在蒙太奇中保留剪辑大小
我正在使用 PerlMagick,我有 4 个不同大小的剪辑图像,
尺寸为 25x25、32x32、40x40、50x50
我正在创建一个蒙太奇,使用简单的读取命令和蒙太奇。
但是当我使用蒙太奇时,不知何故所有图像都被制作成统一尺寸,我认为是最大尺寸,即 50x50。
如何阻止 PerlMagick 的 Montage 重新调整大小。
我已经试过了,geometry => '+1+1' and geometry => '1x1<+1+1'
perl - 在 Perl Magick 图像转换中设置背景颜色
我正在使用Perl Magick,它是 Image Magick 的 Perl 模块,用于将图像从 GIF 和 PNG 转换为 JPEG。在我尝试转换具有透明背景的图像之前,一切正常。
Resize() 函数的默认行为是使用黑色,这会破坏我们尝试转换的图像。我想将默认背景颜色更改为白色,但不知道该怎么做。
如果您在命令行上使用 Image Magick,您可以使用以下方法更改背景:
这是我用来调整图像大小和转换图像的 perl 代码:
我尝试了以下方法以使其正常工作,但无济于事:
并且:
对于如何为 Perl Magick Resize() 方法成功设置默认背景颜色的任何帮助,我将不胜感激。在此先感谢您的帮助!
background - 从图像中删除白色背景
我想为我的图像获得透明背景或没有背景。我尝试了“-background none”选项和“透明”选项,但背景图像仍然是白色的。我怎样才能做到这一点?
请建议。
perl - 删除了所有文字
删除所有文本 删除所有文本 删除所有文本
image-processing - 有什么比 ImageMagick 更快的吗?
ImageMagick 有什么更快的方法吗?我正在使用不同类型的滤镜处理图像,以创建旧照片、油画等效果。
perl - perlmagick imagemagick 错误
我的托管服务提供商最近升级了他们的服务器,我在 perl 中使用 imagemagick 脚本时遇到了很多问题。我的脚本在旧服务器上运行良好,但在新服务器上失败了,所以我回到基础来尝试找出问题所在。
服务器将 imagemagick 报告为:
和 perl 模块 Image::Magick 是 6.72 版
以下脚本保存在我的服务器上:
这失败并出现以下错误:
如果我更改ReadImage("canvas:black")
为,ReadImage("xc:black")
则脚本将连续运行而没有输出。
我的虚拟主机在尝试找到解决方案方面做得很好,但我需要知道我是否在这里做错了,或者 imagemagick 是否存在安装问题。
请注意,我意识到上面可以用其他更简单的模块完成,但这只是一个简单的例子,以确定问题是 imagemagick 还是我的代码!
谢谢你的帮助。
问候,
斯图
perl - 4:3 图像裁剪算法
我正在为 Perl 使用 ImageMagick
我编写了功能代码来执行所有必要的任务,例如调整大小、缩略图、读取尺寸、裁剪、裁剪到中心。
我确实要求所有照片都是横向的,所以我扔掉任何高度大于或等于宽度的图像。
我正在努力解决的问题是在调整大小之前进行裁剪。照片需要是 4:3 的宽高比。有些照片采用新的 16:9 格式,或者在发送到服务器之前可能已被裁剪,这会导致屏幕显示倾斜。在调整大小之前,我想裁剪图像,使其最接近 4:3 等效值。例如,800/600 可以,但 802/600 会将中心裁剪为 800/600。
我将调整所有照片的大小,无论裁剪大小到最大存储图像 800/600,但这与童话无关。由于我可以提前读取高度和宽度尺寸,因此可能有一种算法可用于计算最接近的匹配。我真的只需要帮助来获得要裁剪的新尺寸,而不是 ImageMagick,除非 ImageMagick 中有一个函数可以为我做到这一点。
但是,我一直没有成功找到一个。
perl - Perl Image::Magick:将一个图像放在另一个图像的顶部
我有两张图片(第一张大,第二张小而透明)。我需要在第一个图像的中心添加第二个图像并将结果保存为一个新文件。
如何用 Perl Image::Magick做到这一点?
perl - 在连接 (.) 或 image_magick.pl 第 XX 行的字符串中使用 XXXX 中的未初始化值
我编写了一个程序来比较两个文件夹(每个有 1000 个文件)的图像文件和一些逻辑(参见这个 SO question)。
在执行时,它成功比较直到 900 个图像,但随后它给出了一个错误,如Use of uninitialized value within @tfiles2 in concatenation (.) or string at C:\dropbox\Image_Compare\image_magick.pl line 55
(#3)。然后我收到一个类似的弹出错误Perl Command Line Interpreter has stopped working
,所以我关闭了程序。
我的代码如下:
谁能帮忙,我在哪里做错了。
文件夹1文件名:0025.bmp到1051.bmp;
文件夹2文件名:0000.bmp到1008.bmp;
谢谢 Ganesh