print IMAGEOUT $$orientation->gif;
                 ^^^^^^^^^^^^^
[download]

Perhaps that should be   print IMAGEOUT $img->gif;