#system "convert $image -scale 100x100 -gravity center -background white -extent 100x100 $thumb";
system qq{convert $source -fill white -draw "color 1,1 floodfill" -scale 100x100 -gravity center -background white -extent 100x100 $thumb};
$i->{image} = $image;
#system "convert $image -scale 100x100 -gravity center -background white -extent 100x100 $thumb";
system qq{convert $source -fill white -draw "color 1,1 floodfill" -scale 100x100 -gravity center -background white -extent 100x100 $thumb};
$i->{image} = $image;