foreach $cmd (@commands)
{
    $ret = tlc($cmd);
    if ($ret >= 1)
    {
    }
}