On Sat, 2003-08-30 at 22:14, [EMAIL PROTECTED] wrote:
> I have a text file with HTML tags just like this:
>
> <li><b>ABI/INFORM<br>
> <li><b>Academic Search Premier</b><br>
> <li><strong>Business Source Premier </strong><br>
>
> How do I go about pulling the text only without the tags. This is what I am
> trying and it is not properly working:
>
> while ( my $line = <IN> ) {
>
> if($line =~ m/^<li>(<b>|<strong>|\t)(.*)(<|\t)/g)
> {
> print "Database = $2\n";
> }
>
> Thanks.
Have a look at the HTML::Parser module at
http://search.cpan.org/dist/HTML-Parser/
Hope this helps,
Kevin
--
K Old <[EMAIL PROTECTED]>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]