PerlMagick: append push

Hallo,

ich möchte zwei Bilder mit der append Methode zu
einem verbinden, doch das funktioniert nicht. In
http://www.imagemagick.org/script/perl-magick.php
steht:

"$image->Append(stack=3D>{true,false})
appends all the images associated with object $image. "

Ich habe also zwei Bilder pmm_G and pmm_G_flop mit
push in einem Objekt $pmm_tile_row kombiniert und wollte
dann append anwenden. Doch ein Write gibt danach die
beiden Bider anstatt das eine kombinierte Bild aus.

Danke für Hinweise!!

Günter


...

#convert pmm_G.png -flop pmm_G_flop.png
$pmm_G_flop =3D $pmm_G->Clone();
$pmm_G_flop->Flop();

#convert pmm_G.png pmm_G_flop.png +append pmm_tile_row.png
$pmm_tile_row =3D $pmm_G->Clone();
push (@$pmm_tile_row, $pmm_G_flop); #<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
$pmm_tile_row->Append(stack=3D>false);

Re: PerlMagick: append push

guba@vi-anec.de schrieb:
> #convert pmm_G.png -flop pmm_G_flop.png
> $pmm_G_flop = $pmm_G->Clone();
> $pmm_G_flop->Flop();
>
> #convert pmm_G.png pmm_G_flop.png +append pmm_tile_row.png
> $pmm_tile_row = $pmm_G->Clone();
> push (@$pmm_tile_row, $pmm_G_flop); #<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

$pmm_G_flop enthält ein Arrayref-Objekt das dereferenziert werden sollte:

push (@$pmm_tile_row, @$pmm_G_flop);

(ungetestet)

-Sven