No modified codes have been submitted for this Microcode.
Insecure II (uNcode)
Reads ncode.txt generated by Insecure I (Ncode)
25. July 2009
Reads ncode.txt generated by Insecure I (Ncode)
25. July 2009
#!/usr/bin/perl
$text=`cat ncode.txt`;@text=split('N',$text);
foreach(@text){
$ascii=length($_) unless $_=~/[^n]/g;
$uNcode.=chr($ascii);
}
print "$uNcode\n";