foreach ($a, $b, $c, $d)
{
     tr/a-z/A-Z/;
}