I see:

for (($i=0; $i<$len; $i++) {
    $tmp = uc(substr(($indata,$i,1));
    
    switch (($tmp) {

    ...

    }
    }
}
[download]

Which is wrong in three ways - at least - with regards to brackets and parentheses. Four, if the "design" of the program is included.