Changeset 2341

Show
Ignore:
Timestamp:
09/15/07 09:46:34
Author:
miyagawa
Message:

make UserAgent? variable accessible

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • Web-Scraper/trunk/lib/Web/Scraper.pm

    r2338 r2341  
    2121} 
    2222 
    23 my $ua
     23our $UserAgent
    2424 
    2525sub __ua { 
    2626    require LWP::UserAgent; 
    27     $ua ||= LWP::UserAgent->new(agent => __PACKAGE__ . "/" . $VERSION); 
    28     $ua
     27    $UserAgent ||= LWP::UserAgent->new(agent => __PACKAGE__ . "/" . $VERSION); 
     28    $UserAgent
    2929} 
    3030