Revision history for Perl module WWW::Patent::Page

0.01 Tue Mar  1 21:54:47 2005
	- original version; created by ExtUtils::ModuleMaker 0.32

Got feedback from Usenet:

comp.lang.perl.modules

perl.module-authors

Patent::Retrieve Request for Comments

wanda_b_a...@yahoo.com

I have written a new module and propose to submit it to CPAN. Your 
comments would be appreciated. 

Patent::Retrieve is alpha software- my first module, and my intent is 
to see if the perl community has any interest in the idea. 

The module provides a consistent way to obtain patent documents from 
various patent offices that make them available on the web. Typically, 
doing this is relatively easy by hand, but involves screen-scraping if 
you want to do it effectively for many pages or doucments. The offices 
typically make it hard to get the whole document, presumably because 
that is one source of revenue. 

The module uses submodules, specific to patent offices, and comes with 
working examples for the USPTO and EPO, which between them supply 
granted patents in html and tiff (USPTO) and pdf (US, EP, and much of 
the world...). 

For casual users, this module should simplify life. Abusive users will 
likely find their IP address banned by the patent office being 
spidered. 

I propose a new name space, "Patent", because I see no related modules 
in another name space; I am happy to take suggestions. I think it is 
reasonable to have a "Patent" namespace, since patents involve a lot of 
text-wrangling that is single purpose. For example, searches of the 
prior art, patent family relationships, patent applications via XML, 
etc. With a namespace, related modules may be grouped easily. 

Here is the documentation as it now stands: 

Patent::Retrieve 

NAME 
  Patent::Retrieve - retrieve a patent page (from United States 
Patent and 
  Trademark Office (uspto) website or the European Patent Office 
  (espace_ep). ) 

SYNOPSIS 
  Please see the test suite for working examples. The following is 
not 
  guaranteed to be working or up-to-date. 

   use Patent::Retrieve; 

   my $patent_document = Patent::Retrieve->new(); # new object 

   my $document1 = $patent_document->provide_doc('6,123,456'); 
      # defaults:   office => 'uspto', 
      #        country => 'US', 
      #        format => 'htm', 
      #        page  => '1',   # typically htm IS "1" 
page 
      #        modules => qw/ us ep / , 

   my $document2 = $patent_document->provide_doc('US_6_123_456', 
              office => 'espace_ep' , 
              format => 'tif', 
              page  => 2 , 
              ); 

   my $pages_known = $patent_document->pages_available( # e.g. TIFF 
              document=> '6 123 456', 
              ); 

DESCRIPTION 
   Intent: Use public sources to retrieve patent documents such as 
   TIFF images of patent pages, html of patents, pdf, etc. 
   Expandable for your office of interest by writing new 
submodules.. 
   Alpha release by newbie to find if there is any interest 

USAGE 
   See also SYNOPSIS above 

   To install the module... 

  perl Makefile.PL 

  make 

  make test 

  make install 

  If you are on a windows box you could try to use 'nmake' rather 
than 
  'make'. 

  Examples of use: 

   $patent_document = Patent::Retrieve->new( 
              doc_id => 'US6,654,321(B2)issued_2_Okada', 
              office => 'espace_ep' , 
              format => 'tif', 
              page  => 2 , 
              agent  => 'Mozilla/5.0 (Windows; U; 
Windows NT 5.0; en-US; rv:1.4b) Gecko/20030516 Mozilla Firebird/0.6', 
              ); 

  # 'Windows IE 6' => 'Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 
  5.1)', # 'Windows Mozilla' => 'Mozilla/5.0 (Windows; U; Windows NT 
5.0; 
  en-US; rv:1.4b) Gecko/20030516 Mozilla Firebird/0.6', # 'Mac 
Safari' => 
  'Mozilla/5.0 (Macintosh; U; PPC Mac OS X; en-us) AppleWebKit/85 
(KHTML, 
  like Gecko) Safari/85', # 'Mac Mozilla' => 'Mozilla/5.0 (Macintosh; 
U; 
  PPC Mac OS X Mach-O; en-US; rv:1.4a) Gecko/20030401', # 'Linux 
Mozilla' 
  => 'Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.4) 
Gecko/20030624', # 
  'Linux Konqueror' => 'Mozilla/5.0 (compatible; Konqueror/3; 
Linux)', 

   my %attributes = $patent_document->get_patent('all'); # hash of 
all 

   my $document_id = $patent_document->get_patent('doc_id'); 
      # US6,654,321(B2)issued_2_Okada 

   my $office_used = $patent_document->get_patent('office'); # ep 

   my $country_used = $patent_document->get_patent('country'); #US 

   my $doc_id_used = $patent_document->get_patent('doc_id'); # 
6654321 

   my $page_used = $patent_document->get_patent('page'); # 2 

   my $kind_used = $patent_document->get_patent('kind'); # B2 

   my $comment_used = $patent_document->get_patent('comment'); # 
issued_2_Okada 

   my $format_used = $patent_document->get_patent('format'); #tif 

   my $pages_total = 
$patent_document->get_patent('pages_available');  # 101 

   my $terms_and_conditions = $patent_document->terms('us'); # and 
conditions 

   my $document = $patent_document->get_patent('document'); # the 
loot 

BUGS 
  Pre-alpha release, to gauge whether the perl community has any 
interest. 

  Code contributions, suggestions, and critiques are welcome. 

  Error handling is undeveloped. 

  By definition, a non-trivial program contains bugs. 

  For United States Patents (US) via the USPTO (us), the 'kind' is 
ignored 
  in method provide_doc 

SUPPORT 
  Yes, please. Checks are best. Or email me at Wanda_B_A...@yahoo.com 
to 
  arrange fund transfers. 

AUTHOR 
      Wanda B. Anon 
      Wanda_B_A...@yahoo.com 

COPYRIGHT 
  This program is free software; you can redistribute it and/or 
modify it 
  under the same terms as Perl itself. 

  The full text of the license can be found in the LICENSE file 
included 
  with this module. 

ACKNOWLEDGEMENTS 
  Andy Lester for WWW::Mechanize, that got me thinking, even if 
cygwin was 
  trouble., 

  The authors of Finance::Quote, which served as an example of 
providing 
  submodules, 

  Erik Oliver for patentmailer, serving as an example of getting 
patent 
  documents, 

  Howard P. Katseff of AT&T Laboratories for wsp.pl, version 2, a 
proxy 
  that speaks LWP and understands proxies, 

  and of course Larry and Randal and the gang. 

SEE ALSO 
  perl(1). 

 _countries_known() 
  Usage   : internal method only 
  Purpose  : list all entities that could give a patent 
  Returns  : ref to a hash with keys of abbreviations and values of 
entities (usually a country) ... 

-----------------------------------------------------------------------------

John Bokma
 Feb 12, 8:15pm   show options

wrote: 
> I propose a new name space, "Patent", because I see no related modules 
> in another name space; 

The webscraping modules? 

-- 
John          Small Perl scripts: http://johnbokma.com/perl/ 
       Perl programmer available:   http://castleamber.com/ 
      Happy Customers: http://castleamber.com/testimonials.html 

-----------------------------------------------------------------------------
anon-wb
 Feb 13, 7:19am  

> wrote: 
>> I propose a new name space, "Patent", because I see no related 
modules 
>> in another name space; 

> The webscraping modules? 

Which namespace do you propose? 

WWW:Patent:Retrieve might be reasonable. But the information source 
need not be the web, it could also be a file server of cached pages or 
documents or your own drive. Often the question is whether the patent 
document is already on my drive, or if I have to go out on the web. 

Also, WWW seems to take the opposite hierarchy: e.g. WWW:Search:Ebay 
implies we should name it WWW:Retrieve::Patent . That would 
necessitate reorganizing so that uspto.pm, espace_ep.pm, etc. are in 
folder Patent rather than Retrieve, which seems backward in logic. 
Also, it would put a patent searching module into WWW:Search::Patent, 
which is a long way from WWW:Retrieve:Patent. 

But it could work. The new namespace would not be top level. 

Any other suggestions? 

-----------------------------------------------------------------------------

John Bokma
 Feb 13, 2:13pm   

anon-wb wrote: 
>> wrote: 
>>> I propose a new name space, "Patent", because I see no related 
> modules 
>>> in another name space; 

>> The webscraping modules? 

> Which namespace do you propose? 

> WWW:Patent:Retrieve might be reasonable. But the information source 
> need not be the web, it could also be a file server of cached pages or 
> documents or your own drive. 

I can imagine that there is no problem at all for the namespace if the 
scraping module does smart caching. 

> Often the question is whether the patent 
> document is already on my drive, or if I have to go out on the web. 

That's just a cache. I can even imagine that other WWW:: modules use a 
caching mechanism, or otherwise can profit from one. 

I see there is a WWW::Mechanize::Cached or maybe Cache::Cached is better 
for your module. 

> Also, WWW seems to take the opposite hierarchy: e.g. WWW:Search:Ebay 
> implies we should name it WWW:Retrieve::Patent . 

WWW::Search:: 

Patent? 
> That would 
> necessitate reorganizing so that uspto.pm, espace_ep.pm, etc. are in 
> folder Patent rather than Retrieve, which seems backward in logic. 
> Also, it would put a patent searching module into WWW:Search::Patent, 
> which is a long way from WWW:Retrieve:Patent. 

The search modules also retrieve results. There is no point in searching 
and not getting results :-D. 

> But it could work. The new namespace would not be top level. 

To me more logical. 

-----------------------------------------------------------------------------

anon-wb
 Feb 15, 10:16am   show options

Regarding the naming of a new module to retrieve pages of patent 
documents: 

The module does not cache, the point about having documents on ones own 
drive (not WWW) was that the WWW is not the only source of the 
documents, you might scan them yourself- so maybe a file:// url would 
be a source. But that is more the exception than the rule, so I see no 
obvious reason to rule out the WWW hierarchy. 

I am leaning toward 

WWW::Patent::Page 

since this module will retrieve "pages", given a document identifier, 
(without parsing the page) such as html, tiff, pdf, and leads to 

WWW::Patent::Page::uspto.pm 
WWW::Patent::Page::espace_ep.pm 
etc. for the page sources. 

This hierarchy makes sense in light of future possible WWW 
interactions: 

WWW:Patent::Information (given a patent document ID, retrieve 
associated information such as inventors, assignees, earliest filing 
date, etc., family, possibly by screen-scraping some html or going to a 
database) 

WWW::Patent::Search (input topics, receive document identifiers or 
related information) 

WWW::Patent::Submit (input a patent application, receive 
acknowledgement of filing office) 

WWW::Patent::Submit::XML (use an XML interface, e.g. at the USPTO) 

We are somewhat distracted by focussing on screen scraping. The 
scraping only happens here to find out where the document resides, then 
the document is retrieved. The scraping results are mostly internal 
and not returned to the user, except gems like how many pages are 
available for the complete document. 

"Patents" work has three main information needs- "searching" for patent 
documents of interest, relating those documents to similar documents, 
e.g. in different countries or by the same inventor (a family, an 
inventor), "retrieving" documents of interest or associated information 
(cited documents, inventors, assignees), and "getting" (submitting an 
application and being granted) a new patent. 

Comments welcome- any objections to WWW::Patent::Page ? 

-----------------------------------------------------------------------------

John Bokma
 Feb 16, 10:45am  
anon-wb wrote: 
> I am leaning toward 

> WWW::Patent::Page 

> since this module will retrieve "pages", given a document identifier, 
> (without parsing the page) such as html, tiff, pdf, and leads to 

How about WWW:Patent::Document ? 

> WWW::Patent::Page::uspto.pm 
> WWW::Patent::Page::espace_ep.pm 
> etc. for the page sources. 

IIRC lower case module names are reserved for pragmas. 

-----------------------------------------------------------------------------

anon-wb
 Feb 16, 1:14pm   show options

> How about WWW:Patent::Document ? 

The module is lower level or more primitive than "Document"; mainly it 
retrieves a page at a time, as the offices typically allow. I leave it 
to the user to decide how to, if desired, stitch the pages together 
into a document. So, someone might take WWW::Patent::Page and use it 
for making WWW:Patent:Document . Thus, Page seems more accurate than 
Document as the finest level of naming. 

> IIRC lower case module names are reserved for pragmas. 

WWW::Patent::Page::Uspto.pm ? 
WWW::Patent::Page::USPTO.pm ? 

Is there a preferred way of naming modules that are worthless without 
their parent? 

John Bokma
 Feb 16, 2:20pm  

anon-wb wrote: 
>> How about WWW:Patent::Document ? 

> The module is lower level or more primitive than "Document"; mainly it 
> retrieves a page at a time, as the offices typically allow. 

Ah, ok, didn't know that. Yeah, in that case Page is more appropriate. 

> WWW::Patent::Page::Uspto.pm ? 
> WWW::Patent::Page::USPTO.pm ? 

The latter 

> Is there a preferred way of naming modules that are worthless without 
> their parent? 

I would use first upper case, and if it's an acronym I would use all 
uppercase especially if that's common: 

http://www.answers.com/uspto 

-- 

Peter Scott
 Feb 16, 1:25pm   show options

In article <Xns95FF81D68D10Bcastleam...@130.133.1.4>, 
John Bokma <postmas...@castleamber.com> writes: 

>anon-wb wrote: 
>> WWW::Patent::Page::uspto.pm 
>> WWW::Patent::Page::espace_ep.pm 
>> etc. for the page sources. 

>IIRC lower case module names are reserved for pragmas. 

Only when they're single words. They're okay on the end of modules that 
begin with capital letters. See, for example, LWP::Protocol::{http,ftp,...}.         

-- 
Peter Scott 
http://www.perlmedic.com/ 
http://www.perldebugged.com/ 

John Bokma
 Feb 16, 2:18pm   show options

Peter Scott wrote: 
> In article <Xns95FF81D68D10Bcastleam...@130.133.1.4>, 
> John Bokma <postmas...@castleamber.com> writes: 
>>anon-wb wrote: 
>>> WWW::Patent::Page::uspto.pm 
>>> WWW::Patent::Page::espace_ep.pm 
>>> etc. for the page sources. 

>>IIRC lower case module names are reserved for pragmas. 

> Only when they're single words. They're okay on the end of modules 
> that begin with capital letters. See, for example, 
> LWP::Protocol::{http,ftp,...}.         

Yeah, actually I saw those two days ago :-D. But personally I would stick 
to HTTP, FTP etc) 

-- 

Naming Proposal: WWW::Patent::Page (continued from earlier at comp.lang.perl.modules)

Fixed font - Proportional font



Wanda Anon
 Feb 21, 2:30pm   show options

I have written a new module, WWW::Patent::Page, and 
propose to submit it to CPAN. Your comments would be 
appreciated. 

Does the name seem reasonable? I am happy to take 
suggestions. I think it is reasonable to have a 
"Patent" namespace in WWW, since much patent 
information is available on the WWW. For example, 
searches of the prior art, patent family 
relationships, patent applications via XML, etc. With 
a namespace, related modules may be grouped easily. 
One can imagine future modules like 
"WWW::Patent::Apply", WWW::Patent::Family", or 
WWW::Patent::Search" for interacting with various web 
services. 

WWW::Patent::Page is alpha software- my first module, 
and my intent is to see if the perl community has any 
interest in the idea. It is rough around the edges, 
but passes what tests it has. 

The module provides a consistent way to obtain pages 
of patent documents from various patent offices that 
make them available on the WWW. Typically, doing this 
is relatively easy by hand, page by page, but takes a 
bit of work if you want to do automate it effectively 
for many pages or documents. The offices typically 
make it hard to get the whole document, presumably 
because supplying that is one source of revenue. 

From this primitive module, users can stitch together 
tiff or PDF into multipage documents by whatever 
method they prefer. 

The module uses submodules, specific to separate 
patent offices, and comes with working examples for 
the USPTO and EPO, which between them supply granted 
patents in html and tiff (USPTO) and pdf (US, EP, and 
much of the world...). Hopefully, other interested 
users will create new or improved submodules and feed 
them back into the distribution. 

For casual users, this module should simplify life. 
Abusive users will likely find their IP address banned 
by the patent office being spidered. 

Here is the documentation as it now stands: 

NAME 
  WWW::Patent::Page - retrieve a patent page (e.g. 
from United States 
  Patent and Trademark Office (USPTO) website or the 
European Patent 
  Office (ESPACE_EP). ) 

SYNOPSIS 
  Please see the test suite for working examples. 
The following is not 
  guaranteed to be working or up-to-date. 

   use WWW::Patent::Page; 

   my $patent_document = WWW::Patent::Page->new(); 
# new object 

   my $document1 = 
$patent_document->provide_doc('6,123,456'); 
      # defaults:   office => 'USPTO', 
      #        country => 'US', 
      #        format => 'htm', 
      #        page  => '1',   # 
typically htm IS "1" page 
      #        modules => qw/ us ep / , 

   my $document2 = 
$patent_document->provide_doc('US_6_123_456', 
              office => 'ESPACE_EP' , 
              format => 'tif', 
              page  => 2 , 
              ); 

   my $pages_known = 
$patent_document->pages_available( # e.g. TIFF 
              document=> '6 123 456', 
              ); 

DESCRIPTION 
   Intent: Use public sources to retrieve patent 
documents such as 
   TIFF images of patent pages, html of patents, 
pdf, etc. 
   Expandable for your office of interest by 
writing new submodules.. 
   Alpha release by newbie to find if there is any 
interest 

USAGE 
   See also SYNOPSIS above 

    Standard process for building & installing 
modules: 

       perl Build.PL 
       ./Build 
       ./Build test 
       ./Build install 

  Examples of use: 

   $patent_document = WWW::Patent::Page->new( 
              doc_id => 
'US6,654,321(B2)issued_2_Okada', 
              office => 'ESPACE_EP' , 
              format => 'tif', 
              page  => 2 , 
              agent  => 'Mozilla/5.0 
(Windows; U; Windows NT 5.0; en-US; rv:1.4b) 
Gecko/20030516 Mozilla Firebird/0.6', 
              ); 

  # 'Windows IE 6' => 'Mozilla/4.0 (compatible; MSIE 
6.0; Windows NT 
  5.1)', 

  # 'Windows Mozilla' => 'Mozilla/5.0 (Windows; U; 
Windows NT 5.0; en-US; 
  rv:1.4b) Gecko/20030516 Mozilla Firebird/0.6', 

  # 'Mac Safari' => 'Mozilla/5.0 (Macintosh; U; PPC 
Mac OS X; en-us) 
  AppleWebKit/85 (KHTML, like Gecko) Safari/85', 

  # 'Mac Mozilla' => 'Mozilla/5.0 (Macintosh; U; PPC 
Mac OS X Mach-O; 
  en-US; rv:1.4a) Gecko/20030401', 

  # 'Linux Mozilla' => 'Mozilla/5.0 (X11; U; Linux 
i686; en-US; rv:1.4) 
  Gecko/20030624', 

  # 'Linux Konqueror' => 'Mozilla/5.0 (compatible; 
Konqueror/3; Linux)', 

   my %attributes = 
$patent_document->get_patent('all'); # hash of all 

   my $document_id = 
$patent_document->get_patent('doc_id'); 
      # US6,654,321(B2)issued_2_Okada 

   my $office_used = 
$patent_document->get_patent('office'); # ep 

   my $country_used = 
$patent_document->get_patent('country'); #US 

   my $doc_id_used = 
$patent_document->get_patent('doc_id'); # 6654321 

   my $page_used = 
$patent_document->get_patent('page'); # 2 

   my $kind_used = 
$patent_document->get_patent('kind'); # B2 

   my $comment_used = 
$patent_document->get_patent('comment'); # 
issued_2_Okada 

   my $format_used = 
$patent_document->get_patent('format'); #tif 

   my $pages_total = 
$patent_document->get_patent('pages_available');  # 
101  

   my $terms_and_conditions = 
$patent_document->terms('us'); # and conditions 

   my $document = 
$patent_document->get_patent('document'); # the loot 

BUGS 
  Pre-alpha release, to gauge whether the perl 
community has any interest. 

  Code contributions, suggestions, and critiques are 
welcome. 

  Error handling is undeveloped. 

  By definition, a non-trivial program contains 
bugs. 

  For United States Patents (US) via the USPTO (us), 
the 'kind' is ignored 
  in method provide_doc 

SUPPORT 
  Yes, please. Checks are best. Or email me at 
Wanda_B_A...@yahoo.com to 
  arrange fund transfers. 

AUTHOR 
      Wanda B. Anon 
      Wanda_B_A...@yahoo.com 

COPYRIGHT 
  This program is free software; you can 
redistribute it and/or modify it 
  under the same terms as Perl itself. 

  The full text of the license can be found in the 
LICENSE file included 
  with this module. 

ACKNOWLEDGEMENTS 
  Andy Lester for WWW::Mechanize, that got me 
thinking, 

  The authors of Finance::Quote, which served as an 
example of providing 
  submodules, 

  Erik Oliver for patentmailer, serving as an 
example of getting patent 
  documents, 

  Howard P. Katseff of AT&T Laboratories for wsp.pl, 
version 2, a proxy 
  that speaks LWP and understands proxies, 

  and of course Larry and Randal and the gang. 

SEE ALSO 
  perl(1). 

 Subroutine _countries_known() 
  Usage   : internal method only 
  Purpose  : list all entities that could give a 
patent 
  Returns  : ref to a hash with keys of 
abbreviations and values of entities (usually a 
country) ... 

__________________________________________________ 
Do You Yahoo!? 
Tired of spam? Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 

Reply



Wanda Anon
 Feb 21, 3:43pm   show options

Comments interspersed. 

--- Andy Lester <a...@petdance.com> wrote: 

> On Mon, Feb 21, 2005 at 02:30:01PM -0800, Wanda Anon 
> (wanda_b_a...@yahoo.com) wrote: 
> > I have written a new module, WWW::Patent::Page, 
> and 
> > propose to submit it to CPAN. Your comments would 
> be 
> > appreciated. 

> First, please start it out with Module::Starter to 
> get the basic 
> framework in place. 

It is already written, using modulemaker. TIMTOWTDI: 
what benefits will I reap with Module::Starter, after 
I started? I am willing to try with a reason. But I 
would rather release early and often. 

> >   # 'Windows IE 6' => 'Mozilla/4.0 (compatible; 
> MSIE 
> > 6.0; Windows NT 

> Why are you cutting & pasting from Mech? Why not 
> use Mech directly? Or 
> is this just examples of which agents are available? 

It may be cut and pasted, I can not recall. I 
intended it as examples of agents, though the default 
agent is the module name and version number. I likely 
stole it from Mech, hope this does not offend. I can 
take it out or do it different or acknowledge better. 

Rather than use Mech directly, I decided to use a 
lower level than Mech, so that installation of Mech is 
not required. Mech is great, but last I checked, did 
not pass all tests on cygwin because of the proxy 
strategy in testing. I figured being lower level 
would encourage more use, by not having cygwin users 
need to think about installing Mech without passing 
all tests. 

> > ACKNOWLEDGEMENTS 
> >   Andy Lester for WWW::Mechanize, that got me 
> > thinking, 

> "Got me thinking." I can't ask much more than that. 

> If you're using Mech in this module, then I'll add 
> it to the list of 
> modules that use Mech. 

As noted above, this does not use Mech. 

> xoa 

> -- 
> Andy Lester => a...@petdance.com => www.petdance.com 
> => AIM:petdance 

Thanks for your comments. I take it the name seems 
ok. 

__________________________________ 
Do you Yahoo!? 
Yahoo! Mail - now with 250MB free storage. Learn more. 
http://info.mail.yahoo.com/mail_250 

Reply



Andrew Savige
 Feb 21, 5:31pm   show options

--- Wanda Anon wrote: 
> Mech is great, but last I checked, did not pass all tests on 
> cygwin because of the proxy strategy in testing. 

I'm not familiar with the cygwin test failures, but this test 
failure: 

http://www.nntp.perl.org/group/perl.cpan.testers/185037 

appears to be the same hang I experienced in t/local/back on 
Windows XP. A simple patch to t/local/back.t that fixes this 
hang is given at: 

http://rt.cpan.org/NoAuth/Bug.html?id=9026 

but has not yet been applied to WWW-Mechanize. 

/-\ 

Find local movie times and trailers on Yahoo! Movies. 
http://au.movies.yahoo.com 

Reply



Andy Lester
 Feb 21, 8:06pm   show options

> appears to be the same hang I experienced in t/local/back on 
> Windows XP. A simple patch to t/local/back.t that fixes this 
> hang is given at: 

> http://rt.cpan.org/NoAuth/Bug.html?id=9026 

> but has not yet been applied to WWW-Mechanize. 

Version 1.11_02 just got uploaded to CPAN. Should handle the "can't 
delete the tmp file". 

xoa 

-- 
Andy Lester => a...@petdance.com => www.petdance.com => AIM:petdance 

Reply



Andy Lester
 Feb 21, 3:10pm   show options

On Mon, Feb 21, 2005 at 02:30:01PM -0800, Wanda Anon (wanda_b_a...@yahoo.com) wrote: 
> I have written a new module, WWW::Patent::Page, and 
> propose to submit it to CPAN. Your comments would be 
> appreciated. 
First, please start it out with Module::Starter to get the basic 
framework in place 

. 

>   # 'Windows IE 6' => 'Mozilla/4.0 (compatible; MSIE 
> 6.0; Windows NT 
Why are you cutting & pasting from Mech? Why not use Mech directly? Or 
is this just examples of which agents are available 

? 

- Show quoted text -