if (($match[0] =~/\Q$sTab[1]\E/) and (define $match[1])){