I am trying to remove all the links (urls) from text files located in specific directory.

Take a look at HTML::TokeParser's man page. There is an example there that might help you.

        
use HTML::TokeParser;
         $p = HTML::TokeParser‐>new(shift││"index.ht
+ml");

         while (my $token = $p‐>get_tag("a")) {
             my $url = $token‐>[1]{href} ││ "‐
+";
             my $text = $p‐>get_trimmed_text("/a");
             print "$url\t$text\n";
         }
[download]

That is the example verbatum. If you modify the while loop you probably can accomplish what you are after.

---

Peter L. Berghold	Brewer of Belgian Ales
Peter@Berghold.Net	www.berghold.net
Unix Professional