keymon has asked for the wisdom of the Perl Monks concerning the following question:
I'd like to add a "fuzzy border" to a bunch of images that are in JPEG format. The "script_fu_fuzzy_border" function in Gimp does what I want; but I'd like to script it.
Here's the gist of what I have:
The result is the same as the original image, no change. What am I doing wrong?my $img = eval { Gimp->file_jpeg_load($file, $file) }; my $drawable = $img->active_drawable; $img->script_fu_fuzzy_border($drawable, [255, 255, 255], "16", 1, +"4", 1, "100", 0, 1); eval { Gimp->file_jpeg_save($img, $drawable, $file, $file, 0.8, 0, 1, 1, "w/ border", 0, 1, 0, 2); };
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Help with Gimp-perl
by halley (Prior) on Sep 03, 2003 at 14:38 UTC | |
by Anonymous Monk on Sep 03, 2003 at 19:50 UTC | |
Re: Help with Gimp-perl
by IlyaM (Parson) on Sep 04, 2003 at 07:42 UTC | |
by Anonymous Monk on Sep 04, 2003 at 15:23 UTC | |
by IlyaM (Parson) on Sep 04, 2003 at 18:27 UTC | |
Re: Help with Gimp-perl
by mattr (Curate) on Sep 04, 2003 at 07:23 UTC | |
Re: Help with Gimp-perl
by Roger (Parson) on Sep 04, 2003 at 23:25 UTC | |
by keymon (Beadle) on Sep 05, 2003 at 18:42 UTC |
Back to
Seekers of Perl Wisdom