Thanks for that but I still have a problem.
In my original Perl I had the lines

$pic_cur ->{Width}  = 200;
$pic_cur ->{Height} = 100;
[download]

The issue is that setting the width to 200 is, in effect, ignored because I believe some setting is there which
means that the aspect ratio of the image is kept the same.
Therefore the Height setting and the 'fixed' aspect ratio means that after setting the Height the Width is reset to 81.818.
Therefore I am still puzzling how to say that I do not want the aspect ratio of the image to be constant.
Then I will be able set the Width and Height to what I want.