Help for this page

Select Code to Download


  1. or download this
    use WWW::Mechanize;
use Log::Log4perl qw(:easy);
...

my @links = $agent->find_all_links();
print $#links;
  2. or download this
    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
...
</body>
</html>
-1