Temporäre Dateien und Verzeichnisse sollten nur mit File::Temp erzeugt werden. Das hat einige Vorteile (funktioniert auch unter Nicht-Unix-Systemen, keine Möglichkeiten von Exploits, unterschiedliche Benutzer auf der gleichen Maschine kommen sich in die Quere).

Du erlaubst anscheinend nur .gif und .jpg, aber es gibt auch andere populäre Bildformate (png!) oder andere Schreibweisen für die Extension (.jpeg). Du könntest, falls der User das Modul installiert hat, Image::Info benutzen, um festzustellen, ob die Datei ein Bild ist. Oder vielleicht hat Image::Magick eine ähnliche Funktion.

PS: der Syntaxhighlighter auf der Webseite kommt mit PODs nicht klar.