you didn't put it in a container, so your pipes aren't doing what you expect...

if ($line =~ /^\W*(?:$not_method)/) {
[download]

Update a \b at the end would also help make sure you don't match a string starting with as or if etc...

if ($line =~ /^\W*(?:$not_method)\b/) {
[download]