Select Code to Download

>Parseable::new, pckg= 'main{}'
 >URL::Fetchable::new       ## >=entering function...
...
        URL::Cacheable::new_URL_Cacheable('main=HASH(0x1be4338)', 'HAS
+H(0x1be7b30)') called at ./crawl.pl line 666
        URL::Fetchable::new_URL_Fetchable('main=HASH(0x1be4338)', 'HAS
+H(0x1be7b30)') called at ./crawl.pl line 1235
        Parseable::new_Parseable('main=HASH(0x1be4338)', 'HASH(0x1be7b
+30)') called at ./crawl.pl line 1389

  # host_base set from 'host' when host_mask is set;     Example:
  # if host_base==www.first.host & hostmask gets us "first.host"
...
    
    ( ($p->host =~ m{$host_mask/})[0] eq $host_base ) ? '' : $p->host;
  }