$title = $mech->title(); # get the new title?
print "$upLoadUrl is titled [$upLoadTitle]\n";
print "resp = [ " . Dumper( $resp ) . "]\n";
[download]

You probably meant to print out $title and not $upLoadTitle.

Linda