[Israel.pm] LWP Q.

Ernst, Yehuda yernst at nds.com
Sat Jun 30 21:58:03 PDT 2007


Thansk for you answer.

what do you mean by 

"Make sure to put $p in list context"

can you put in an example.


-----Original Message-----
From: perl-bounces at perl.org.il [mailto:perl-bounces at perl.org.il]On Behalf Of Gaal Yahas
Sent: Thursday, June 28, 2007 10:58 PM
To: Perl in Israel
Subject: Re: [Israel.pm] LWP Q.

I think your m// needs a /g modifier if you want @p to have more than one match.

If you want only the first,

my ($p) = (the match);

Make sure to put $p in list context! Otherwise it'll only indicate
whether the match succeeded.

On 6/28/07, Shlomi Fish <shlomif at iglu.org.il> wrote:
> On Thursday 28 June 2007, Ernst, Yehuda wrote:
> > hello!
> >
> > I am trying to run this
> >
> > $res = $browser->get ("http........................
> > my @p = $res-> =~ m|somthing(.*?)somthing|;
> >
> > $p[0] is empty.
> >
> > but if i print $res->as_string in the middle
> >
> > $res = $browser->get ("http........................
> > print $res->as_string;
> > my @p = $res-> =~ m|somthing(.*?)somthing|;
> >
> >
> > $p[0] is not empty.
> >
> This snippet works for me:
> {{{{{{{{{{{{{{
> #!/usr/bin/perl
> use strict;
> use warnings;
> use LWP::UserAgent;
> use Data::Dumper;
> my $ua = LWP::UserAgent->new();
> my $res = $ua->get("http://www.shlomifish.org/");
> my @p = ($res->content() =~ m{<p(.*?)</p>});
> print Dumper(\@p);
> }}}}}}}}}}}}}}
> I'm using perl-5.8.8-12mdv2008.0 on Mandriva Cooker. It would be useful if you
> could provide a full script that reproduces this problem, and mention your
> perl version and platform.
> Regards,
>         Shlomi Fish
> ---------------------------------------------------------------------
> Shlomi Fish      shlomif at iglu.org.il
> Homepage:        http://www.shlomifish.org/
> If it's not in my E-mail it doesn't happen. And if my E-mail is saying
> one thing, and everything else says something else - E-mail will conquer.
>     -- An Israeli Linuxer
> _______________________________________________
> Perl mailing list
> Perl at perl.org.il
> http://perl.org.il/mailman/listinfo/perl

Gaal Yahas <gaal at forum2.org>
Perl mailing list
Perl at perl.org.il
This e-mail is confidential, the property of NDS Ltd and intended for the addressee only.  Any dissemination, copying or distribution of this message or any attachments by anyone other than the intended recipient is strictly prohibited.  If you have received this message in error, please immediately notify the postmaster at nds.com and destroy the original message.  Messages sent to and from NDS may be monitored.  NDS cannot guarantee any message delivery method is secure or error-free.  Information could be intercepted, corrupted, lost, destroyed, arrive late or incomplete, or contain viruses.  We do not accept responsibility for any errors or omissions in this message and/or attachment that arise as a result of transmission.  You should carry out your own virus checks before opening any attachment.  Any views or opinions presented are solely those of the author and do not necessarily represent those of NDS.

To protect the environment please do not print this e-mail unless necessary.

More information about the Perl mailing list