$5 reward for this Perl script (regular expression searches through an entire directory of files)

*** I offer $5 via Paypal for the first working complete Perl script
***


I have thousands of files named like these:

c:\input\pumico-home.html
c:\input\ofofo-home.html
c:\input\cimaba-office.html
c:\input\plata-home.html
c:\input\plata-office.html
c:\input\zito-home.html

I need a Perl script that passes through both the categories of these
files (*-home.html and *-office.html) searching for some regular
expressions:

for *-home.html:
regexAone: abc\d+def
regexAtwo: lmn\d+ofg
regexAthree: pqr\d+stu

for *-office.html:
regexBone: artemis\d+lock
regexBtwo: pretamus\d+balim

It must output each regular expression match result to a txt file with
the same name as the input html file plus a suffix corresponding to
the name of the processed regular expression like above defined,
producing an output scenery like this:

c:\output\pumico-home-regexAone.txt
c:\output\pumico-home-regexAtwo.txt
c:\output\pumico-home-regexAthree.txt
c:\output\ofofo-home-regexAone.txt
c:\output\ofofo-home-regexAtwo.txt
c:\output\ofofo-home-regexAthree.txt
c:\output\cimaba-office-regexBone.txt
c:\output\cimaba-office-regexBtwo.txt
c:\output\plata-home-regexAone.txt
c:\output\plata-home-regexAtwo.txt
c:\output\plata-home-regexAthree.txt
c:\output\plata-office-regexBone.txt
c:\output\plata-office-regexBtwo.txt
c:\output\zito-home-regexAone.txt
c:\output\zito-home-regexAtwo.txt
c:\output\zito-home-regexAthree.txt

__________________

For example, supposing that the c:\input\cimaba-office.html file
contains the following 5 lines:
dfgdfsgdf
setertert
artemis123456lock
garumbzeta
pretamus9999balim
popolissss

c:\output\cimaba-office-regexBone.txt will be generated containing:
artemis123456lock

c:\output\cimaba-office-regexBtwo.txt will be generated containing:
pretamus9999balim


Thanks in advance

Re: $5 reward for this Perl script (regular expression searches through an entire directory of files

Luca Villa wrote in news:1194657293.592532.320230
@v3g2000hsg.googlegroups.com:

> *** I offer $5 via Paypal for the first working complete Perl script
> ***

It is much more satisfying to say:

*PLONK*

Sinan

--
A. Sinan Unur <1usa@llenroc.ude.invalid>
(remove .invalid and reverse each component for email address)
clpmisc guidelines:

Re: $5 reward for this Perl script (regular expression searches through an entire directory of files

On Nov 9, 5:14 pm, Luca Villa wrote:
> *** I offer $5 via Paypal for the first working complete Perl script

Make it a $25 contribution to The Perl Foundation (via PayPal to
billing@yapc.org), and send the submitter a copy of the receipt, and
you might get more interest. I might write it.


--
The best way to get a good answer is to ask a good question.
David Filmer (http://DavidFilmer.com)

Re: $5 reward for this Perl script (regular expression searches through an entire directory of files

use...@DavidFilmer.com ha scritto:

> On Nov 9, 5:14 pm, Luca Villa wrote:
> > *** I offer $5 via Paypal for the first working complete Perl script
>
> Make it a $25 contribution to The Perl Foundation (via PayPal to
> billing@yapc.org), and send the submitter a copy of the receipt, and
> you might get more interest. I might write it.
>
>
> --
> The best way to get a good answer is to ask a good question.
> David Filmer (http://DavidFilmer.com)

David, thanks for the suggestion!
This time I got it answered in another forum for $5 but next time I'll
really add the option to give the money to The Perl Foundation. Very
good idea!
Offer retracted.