$ARGV[1] =~ y/A-Z/a-z/;

$cnt = tr/*/*/;

($HOST = $host) =~ tr/a-z/A-Z/;

y/a-zA-Z/ /c;

y/a-zA-Z/ /cs;

y/a-zA-Z//cd;
