http://www.perlmonks.org?node_id=257884


in reply to Ignore ALL characters and delete?

The link is not getting deleted because the pattern is never found in the file.
This is because of the meta characters in the link. To make sure that any special meta characters
are escaped in your regex you need the \Q an \E operators.

Try using this as your regex, then the you should be able to find the link.
if ($list =~ /\Q$link\E/i)

Wonko

Replies are listed 'Best First'.
Re: Re: Ignore ALL characters and delete?
by iamrobj (Initiate) on May 13, 2003 at 22:11 UTC
    Worked perfect, thanks Wonko!

    "eq" did not... why is that?

      The /i modifier makes the pattern match case-insensitive. To get the same effect with eq, you can do something like: if (uc($list) eq uc($link)) { Substitute lc for uc if you prefer. Unicode is left as an exercise for the reader.