Convert
file: potd_handle_image.pl 14: my $exif = ImageInfo($src); 15: if ($exif->{Orientation} && $exif->{Orientation} =~ /(\d+)/) { 16: my $degrees = $1; 17: my $rotated = $image->rotate(right=>$degrees); 18: say "Rotating image $degrees right"; 19: $image = $rotated; 20: }
but I need to make sure images are rotated correctly
'Rotate 90 CW'