Evaluated proc jpegm {url {step 5} {lmax 444} {min 70} {max 120}} { jpg get $url; jpegmaxsize $min $max $step $lmax}