my $sc = $sz/$max;
my $scaled = $img->create_scaled_image($sc*$wd, $sc*$ht);
$scaled->image_set_format($ty->imlibfmt);
$scaled->set_quality(90);
my $sc = $sz/$max;
my $scaled = $img->create_scaled_image($sc*$wd, $sc*$ht);
$scaled->image_set_format($ty->imlibfmt);
$scaled->set_quality(90);