....
		my $thumb = $img->crop(left=>$x, width=>1200/$sc);
		$thumb->write(file=>$name);
....