[23796] in Perl-Users-Digest
Perl-Users Digest, Issue: 5999 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jan 29 18:38:01 2004
Date: Thu, 29 Jan 2004 15:37:26 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 29 Jan 2004 Volume: 10 Number: 5999
Today's topics:
Beginning Perl - Simon Cozens code download nospam@nospam.net
Re: Beginning Perl - Simon Cozens code download <uri@stemsystems.com>
Re: Beginning Perl - Simon Cozens code download nospam@nospam.net
Re: Beginning Perl - Simon Cozens code download <bart.lateur@pandora.be>
Re: Beginning Perl - Simon Cozens code download <dwall@fastmail.fm>
Re: Beginning Perl - Simon Cozens code download <segraves_f13@mindspring.com>
bouncing a request back to java from perl..... (Paul Tomsic)
Re: bouncing a request back to java from perl..... <gnari@simnet.is>
Re: bouncing a request back to java from perl..... (Paul Tomsic)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 29 Jan 2004 19:07:52 +0000
From: nospam@nospam.net
Subject: Beginning Perl - Simon Cozens code download
Message-Id: <bami10tg42153cnag5k6g3krkopkbtmm5r@4ax.com>
Hi,
does anyone know where i can download the code for this tutorial? The
links to wrox.com are all out, I cannot find the code for the book
anywhere.
grateful if someone can point me to it.
thanks
Martin
------------------------------
Date: Thu, 29 Jan 2004 19:11:15 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Beginning Perl - Simon Cozens code download
Message-Id: <x7r7xiwox9.fsf@mail.sysarch.com>
>>>>> "n" == nospam <nospam@nospam.net> writes:
n> does anyone know where i can download the code for this tutorial? The
n> links to wrox.com are all out, I cannot find the code for the book
n> anywhere.
http://learn.perl.org/library/beginning_perl/
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Thu, 29 Jan 2004 19:15:20 +0000
From: nospam@nospam.net
Subject: Re: Beginning Perl - Simon Cozens code download
Message-Id: <9smi10dkjflk0nftruc9kej9dk28glqiiv@4ax.com>
sorry < I am not being clear. I have that, its a pdf, but access is
denied to screen grabbers and I am sick of typing in all the code,
does anyone know where I can download it?
sorry for the confusion
On Thu, 29 Jan 2004 19:11:15 GMT, Uri Guttman <uri@stemsystems.com>
wrote:
>>>>>> "n" == nospam <nospam@nospam.net> writes:
>
> n> does anyone know where i can download the code for this tutorial? The
> n> links to wrox.com are all out, I cannot find the code for the book
> n> anywhere.
>
> http://learn.perl.org/library/beginning_perl/
------------------------------
Date: Thu, 29 Jan 2004 19:30:52 GMT
From: Bart Lateur <bart.lateur@pandora.be>
Subject: Re: Beginning Perl - Simon Cozens code download
Message-Id: <nlni105f55j3arv7lmgk07d5u996q0o57i@4ax.com>
nospam@nospam.net wrote:
>sorry < I am not being clear. I have that, its a pdf, but access is
>denied to screen grabbers and I am sick of typing in all the code,
>does anyone know where I can download it?
This page is devoted to this book:
<http://cybrid.net/books/beginning_perl.html>
The fourth link under "resources" is pointing to a "Download Code" page,
at
<http://www.wrox.com/ACON12.asp?BookID=403>
Unfortunately, at the moment, this just gives me an error. Let's hope
this will pass. However, as it's a 404 error (resource not found), I
fear the worst.
Silly that the book is available for download but the sample code isn't.
--
Bart.
------------------------------
Date: Thu, 29 Jan 2004 19:46:31 -0000
From: "David K. Wall" <dwall@fastmail.fm>
Subject: Re: Beginning Perl - Simon Cozens code download
Message-Id: <Xns947F964DBACACdkwwashere@216.168.3.30>
<nospam@nospam.net> wrote:
> does anyone know where i can download the code for this tutorial? The
> links to wrox.com are all out, I cannot find the code for the book
> anywhere.
http://learn.perl.org/library/beginning_perl/
I probably should have just said STFW, because that's what I did. I found
Simon's home page and that led me directly to the book.
------------------------------
Date: Thu, 29 Jan 2004 23:04:44 GMT
From: "Bill Segraves" <segraves_f13@mindspring.com>
Subject: Re: Beginning Perl - Simon Cozens code download
Message-Id: <gkgSb.1693$jH6.909@newsread1.news.atl.earthlink.net>
<nospam@nospam.net> wrote in message
news:9smi10dkjflk0nftruc9kej9dk28glqiiv@4ax.com...
> sorry < I am not being clear. I have that, its a pdf, but access is
> denied to screen grabbers and I am sick of typing in all the code,
> does anyone know where I can download it?
http://support.apress.com
Cheers.
--
Bill Segraves
------------------------------
Date: 24 Jan 2004 11:08:01 -0800
From: ptomsic@yahoo.com (Paul Tomsic)
Subject: bouncing a request back to java from perl.....
Message-Id: <4750cf7e.0401241108.40c27348@posting.google.com>
Is it possible to take a request object (from a posted html form) and
bounce it to something else?
For instance, we've got a form that submits to a perl script (running
under mod_perl)
We do something w/ the form data that's posted, but we then need
access to that posted form content elsewhere (within a java servlet).
Can we collect that original form post within the perl script and
redirect it back to a java servlet as, essentially, a new request to
the servlet?
I've tried the following, but I seem to lose the contents of the
request:
package MyTest;
use Apache::Constants qw(M_GET OK SERVER_ERROR);
use HTTP::Request::Common qw(POST);
use LWP::UserAgent;
use strict;
sub handler {
my $r = shift;
my $content = $r->content;
$r->method("GET");
$r->method_number(M_GET);
$r->headers_in->unset("Content-length");
$r->args($content);
$r->internal_redirect_handler("/servlet/tester");
}
1;
it'll redirect back to the servlet named tester okay, but I don't have
anything in the request once it gets back to my servlet.
Thoughts or help greatly appreciated.
thx
------------------------------
Date: Sat, 24 Jan 2004 22:21:15 -0000
From: "gnari" <gnari@simnet.is>
Subject: Re: bouncing a request back to java from perl.....
Message-Id: <buurad$p8l$1@news.simnet.is>
"Paul Tomsic" <ptomsic@yahoo.com> wrote in message
news:4750cf7e.0401241108.40c27348@posting.google.com...
> $r->method("GET");
> $r->method_number(M_GET);
> $r->headers_in->unset("Content-length");
> $r->args($content);
> $r->internal_redirect_handler("/servlet/tester");
> it'll redirect back to the servlet named tester okay, but I don't have
> anything in the request once it gets back to my servlet.
>
maybe because you used GET ?
gnari
------------------------------
Date: 25 Jan 2004 14:02:53 -0800
From: ptomsic@yahoo.com (Paul Tomsic)
Subject: Re: bouncing a request back to java from perl.....
Message-Id: <4750cf7e.0401251402.6577b869@posting.google.com>
tried it w/ a post as well.
no luck.
thoughts?
"gnari" <gnari@simnet.is> wrote in message news:<buurad$p8l$1@news.simnet.is>...
> "Paul Tomsic" <ptomsic@yahoo.com> wrote in message
> news:4750cf7e.0401241108.40c27348@posting.google.com...
> > $r->method("GET");
> > $r->method_number(M_GET);
> > $r->headers_in->unset("Content-length");
> > $r->args($content);
> > $r->internal_redirect_handler("/servlet/tester");
>
> > it'll redirect back to the servlet named tester okay, but I don't have
> > anything in the request once it gets back to my servlet.
> >
> maybe because you used GET ?
>
> gnari
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc. For subscription or unsubscription requests, send
#the single line:
#
# subscribe perl-users
#or:
# unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 5999
***************************************
