if ($line =~ m/\breject \b)