I've yet to see a pure perl script to make a thumbnail from an image. The all use ImageMagick, GD, or Imager. There are a few scripts for getting the "image size" in pure Perl, but they won't do the resizing.