Thank you, zentara!

Sorry, I wasn't paying attention (it was too late at night).

I changed ...

$img_mirror->flip( dir => "v" );  ## "h"
[download]

and...

#make a unified image


#~__ my $img_uni =  Imager->new(xsize=>$pos_width * 2,ysize=>$global_a
+scent,channels=>4);


#~__ $img_uni->paste(left=>$pos_width,top=>0,img=>$img1);

#~__ $img_uni->paste(left=>0,top=>0,img=>$img_mirror);


my $img_uni =  Imager->new(xsize=>$pos_width ,ysize=>$global_ascent * 
+2,channels=>4);

$img_uni->paste(left=>0,top=>$global_ascent,img=>$img_mirror);
$img_uni->paste(left=>0,top=>0,img=>$img1);
[download]

To get the reflection that I was looking for.

Is it possible to overwrite the generated image with another one?

That is a Graphic Design technique to obtain sort of 3D characters that are easy to read on any background:

• 1) write the text in white (##FFFFFF),
• 2) overwrite the same text but changing the y offset 3 pixels down and offset x 5 pixels right , and in blue, for the example.

Or even, overwriting the text three times: step 1, then overwrite with y offset of 6 pixels down and offset x 10 pixels right and in black, and finally overwrite with y offset of 3 pixels down and offset x 5 pixels right in blue.

Then, in the mirror image it should be done in the opposite way: offset y up instead of down and offset x left instead of right.

  A  \ \        / |                                        _ _|  __ \
<-|-> \ \  \   /  __ \   _ \  __| _ \     _` | __ `__ \      |      /
  V    \ \  \ /   | | |  __/ |    __/    (   | |   |   |     |    _|
        \_/\_/   _| |_|\___|_|  \___|   \__,_|_|  _|  _|   ___|   _)
        /"\/"\   "| |"|/"""|"|  /"""|   /""`"|"|  "|  "|   """|   ")
  A    / /  / \   | | |  ""\ |    ""\    (   | |   |   |     |    "|
<-|-> / /  /   \  "" /   " /  ""| " /     ", | "" ,"" /      |      \
  v  / /        \ |                                        " "|  "" /
[download]

(done with http://figlet.de)

Anyway, thank you for the snipet.-