document.write('');
document.write('
');
document.write('
sub deScreamer
{');
document.write('
');
document.write('
$str=
shift;
');
document.write('
');
document.write('
if($str!~
m/
[a-z
]/
){');
document.write('
$str=
lc($str);
');
document.write('
$str=~
s/\b
(\w
)/
uc($
1)/eg;
');
document.write('
}');
document.write('
');
document.write('
return str;
');
document.write('
}');
document.write('
');
document.write('
');