if ($after =~ /\$scur/) { do something; }