Cortisimo pero util script xDD.
#!usr/bin/perl
#XSS Generator 0.2
#Coded By Doddy H
head();
print "\n[+] Enter the code : "; $code = <STDIN>;
if ( $code ne "" ) {
print "\n\n[XSS] : <script>var code =String.fromCharCode(" . encode($code)
. "); document.write(code);</script>\n";
}
copyright();
sub head {
print "\n\n-- == XSS Generator 0.2 == --\n\n"; }
sub copyright {
print "\n\n-- == (C) Doddy Hackman 2012 == --\n\n"; <stdin>;
}
sub encode {
}
#The End ?