Select Code to Download

   my $image_name = 'foobar.jpg';    #from user
   my $upload_dir = '../clients/images'; #hard coded
...
   $img->write(file=>$to_write, type=>$file_exten)
         or $self->push_error("Cannot write thumbname because: $!");
}