Select Code to Download

my $remotefile = param("image");
# make new variable to prevent overwriting
...
$x = $image->Write($newfilename);

warn "$x" if "$x";