Hi all
sub submit_form {
print "Content-type: text/html\n\n";
use HTTP::Request::Common qw(POST);
use lwp::UserAgent;
$ua = lwp::UserAgent->new();
my $req = POST '
http://cgat.ukm.my/spores/Predictory/sporulate/s_predict_metaserver.html',
['sequence' => $sequence, 'email' => $email, 'seqname' =>
""Dr.Ruud"" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
> Shourya Sengupta [EMAIL PROTECTED] schreef:
>> Ruud:
>>> Shourya:
>
My perl program calls a batch file on a remote machine.
Now my question is how to return a value from that batch script and
how to grab it i
Peter Daum wrote:
> Hi,
Hello,
> when trying to process continuation lines in a file, I ran
> into a weird phenomenon that I can't make any sense of:
>
> $s contains a line read from a file, that ends with a backslash
> (+ the newline character), so
>
> $s='abc \
> ';
>
> $s =~ /^(.*)$/; print
Wesley Bresson wrote:
>
> Thanks for your example script using HTML::Treebuilder, however I'm
> trying to figure out why it appears to grab some items but not others.
> I've removed the $20-100 limitation (I didn't need it, I really just
> need to poll one item) but am still missing some of the it
Tom Phoenix wrote:
> On 8/5/06, Peter Daum <[EMAIL PROTECTED]> wrote:
>> $s =~ /^(.*[^\\])(\\)?$/; print "1: '$1', 2: '$2'";
>
> Let's see what that pattern matches by annotating it:
>
> m{
>^ # start of string
>( # memory 1
> .*# any ol' junk, including backslashes
On 8/5/06, Peter Daum <[EMAIL PROTECTED]> wrote:
$s='abc \
';
$s =~ /^(.*[^\\])(\\)?$/; print "1: '$1', 2: '$2'";
Let's see what that pattern matches by annotating it:
m{
^ # start of string
( # memory 1
.*# any ol' junk, including backslashes
[^\\] # any n
Peter Daum am Samstag, 5. August 2006 18:45:
> Hi,
Hallo Peter
> when trying to process continuation lines in a file, I ran
> into a weird phenomenon that I can't make any sense of:
>
> $s contains a line read from a file, that ends with a backslash
> (+ the newline character), so
>
> $s='abc \
>
Hi,
when trying to process continuation lines in a file, I ran
into a weird phenomenon that I can't make any sense of:
$s contains a line read from a file, that ends with a backslash
(+ the newline character), so
$s='abc \
';
$s =~ /^(.*)$/; print $1; # prints "abc \" as expected
If the line
On 08/04/2006 02:25 PM, Wesley Bresson wrote:
Thanks for your example script using HTML::Treebuilder, however I'm
trying to figure out why it appears to grab some items but not others.
[...]
What appears to grab some items but not others? You didn't
show anyone your program, so how can they
On Fri, 04 Aug 2006 10:26:16 +0100, Paul Beckett wrote:
> I'm trying to pattern match the beginning of a SQL string like:
> INSERT INTO `rwikiobject` VALUES
> ('0b5e02f308c5341d0108fca900670107','2006-03-06
> 23:36:41','/site/ec07580d-1c66-469f-80be-c0afd616cedf/alembert, d
> \'','/site/ec07580d-1c
...
Two Web questions in one day! It's hard to know exactly how you're going
to your
code Wesley, but the stuff below should be a good starter. It pulls in the
web
site and parses it using HTML::TreeBuilder. It looks for all table row
elements that contain exactly five table data elements, wh
11 matches
Mail list logo