#!/bin/perl
my $_ = "MAL TIRRUEZF CR MAL RKZYIOL EX MAL OIY UAE RICF \"MAL ACWALRM DYEUPLFWL CR ME DYEU MAIM UL IZL RKZZEKYFLF GH OHRMLZH\"";
my @most_used_wikipedia = ("e","t","a","o","i","n","s","h","r","d","l","c","u","m","w","f","g","y","p","b","v","k","j","x","q","z");
my %letters = ("a",0,"b",0,"c",0,"d",0,"e",0,"f",0,"g",0,"h",0,"i",0,"j",0,"k",0,"l",0,"m",0,"n",0,"o",0,"p",0,"q",0,"r",0,"s",0,"t",0,"u",0,"v",0,"w",0,"x",0,"y",0,"z",0);
while( ($letter, $number) = each( %letters ) ){
$letters{$letter} = () = $_ =~ m/$letter/gi;
}
print "Cipertext:\n$_\n\n";
# Print out frequency table
print "Frequency Table\n";
foreach my $letter (sort {$letters{$b} <=> $letters{$a}} keys %letters){
print "$letter $letters{$letter}\t";
}
print "\n\n";
# Guess plaintext based on wikipedia stat attack
print "Wikipedia Statistical Attack\n";
print "=================================\n";
my $wikipedia_attack_plaintext = $_;
my $counter = 0;
foreach my $letter (sort {$letters{$b} <=> $letters{$a}} keys %letters){
$letter = uc($letter);
$wikipedia_attack_plaintext =~ s/$letter/$most_used_wikipedia[$counter]/g;
++$counter;
}
print $wikipedia_attack_plaintext;
#!/bin/perl
my $ciphertext = "MAL TIRRUEZF CR MAL RKZYIOL EX MAL OIY UAE RICF \"MAL ACWALRM DYEUPLFWL CR ME DYEU MAIM UL IZL RKZZEKYFLF GH OHRMLZH\"";
print "Ciphertext:\n$ciphertext\n\n";
print "Replace what letter with what letter? (syntax: \"letter,replacement\", \"exit\" exits, CASE SENSITIVE)\n\n";
while( 1 ){
$_ = <STDIN>;
chomp;
if( /exit/ ){
exit;
}
# Check syntax
if( /^[a-zA-Z],[a-zA-Z]$/ ){
my ( $regex, $replacement ) = split( /,/ );
$ciphertext =~ s/$regex/$replacement/g;
}
print "Ciphertext:\n$ciphertext\n\n";
}
, but if not ill pay the 10 dollars. pm or aim me at caracasbaseball . alright thanks 
Also, many developers don't put up any type of rating system. I believe that IE handled this by not allowing access to any site without a rating (if parental controls were turned on). P3P and ICRA are just two different rating tools/codes that Web developers can use to rate their sites.