my $filehandle = $cgi->upload('foto');

my $buffer;
read($filehandle, $buffer, 2);
unless ($buffer eq "\xFF\xD8") {
   die "Bild ist kein JPEG\n";
}