PerlMagic composite displace parameter?

[Ryland]

How do I replicate this command line:

Code: Select all

composite gradient.png source.png -displace 0x20 curved.gif

in Perl? I'm sure it's something like:

Code: Select all

$source->Composite(image=>$gradient,compose=>'Displace',[parameter]=>'0x20',gravity=>'Center');

...except I don't know what [parameter]'s name is. I tried geometry=>'0x20' and x=>0,y=>20 and neither of those worked.

[Ryland]

Never mind, I figured it out. (It's "blend=>'0x20'", by the way.)