[18773] in Perl-Users-Digest
Perl-Users Digest, Issue: 941 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat May 19 21:05:39 2001
Date: Sat, 19 May 2001 18:05:09 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <990320708-v10-i941@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Sat, 19 May 2001 Volume: 10 Number: 941
Today's topics:
Re: ActiveState PPM Modules <usenet@engelke.com>
Re: ActiveState PPM Modules <jobbyjunk@yahoo.com>
Re: ActiveState PPM Modules (Jason James)
Re: best way to evaluate $1 so it's not read-only? (Kai Henningsen)
Re: best way to evaluate $1 so it's not read-only? (Abigail)
Re: Can anyone help me please? (Steve)
Re: Can anyone help me please? (Tad McClellan)
Re: Can anyone help me please? <Ask@For-It.Com>
Re: good perl... <bulfig@bargainisp.net>
Re: Help: using constants from inherited parent class (Abigail)
Re: Help: using constants from inherited parent class (Abigail)
Re: HTTP Response suppression <elmer_fudd@yahoo.com>
installing libwww-perl on Win 95 (devs)
Re: LWP - HTTPS <webmaster@domainenterprises.com>
Re: LWP - HTTPS <Petri_member@newsguy.com>
My senior project is "done" (Cato)
Re: oh c'mon please, one of you perl/unix gurus!!! <boqichi0@earthlink.net>
Re: oh c'mon please, one of you perl/unix gurus!!! (Steve)
Re: Perl + SFTP method? <webmaster@domainenterprises.com>
Re: perl 5.6 and apache <webmaster@domainenterprises.com>
Perl and Java Native Interface <kbass1@nc-rr.com>
Re: problem with making dirs! <webmaster@domainenterprises.com>
Re: problem with making dirs! (Tad McClellan)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 19 May 2001 18:12:43 GMT
From: "Charles Engelke" <usenet@engelke.com>
Subject: Re: ActiveState PPM Modules
Message-Id: <vIyN6.48$9D5.11200@newsread2.prod.itd.earthlink.net>
"Jason James" <jason@jamesjl.demon.co.uk> wrote in message
news:3b068b33.848940561@news.demon.co.uk...
> Please can someone tell me where I
> can download the latest modules for
> ActiveState's PERL 5.6.1.626
At the command line, enter the command "ppm". You'll be in ActiveState's
text mode package manager. From there, search for modules with commands
like "search date", and install Date::Calc with the command "install
date-calc". Get help with "help".
Exit the package manager with "quit".
It's really easy, but there are lots of modules on CPAN that aren't
available in it.
Charlie
------------------------------
Date: Sat, 19 May 2001 19:27:38 +0100
From: "Jobbydude" <jobbyjunk@yahoo.com>
Subject: Re: ActiveState PPM Modules
Message-Id: <9e6dte$i9o$1@taliesin.netcom.net.uk>
> Please can someone tell me where I
> can download the latest modules for
> ActiveState's PERL 5.6.1.626. I have
> just downloaded the latest version from
> their www site and I need some additional
> modules. The ones from CPAN seem to
> need a C complier to do anything with.
>
> The module I need at the moment is the
>
> Date::Calc module that can be installed
> onto my copy of PERL running on a
> Window NT 4 server and IIS4.
>
> Some help would sure be useful.
>
> Many thanks,
>
> Jason James
Try 'ppm install Date-Calc' at the command line. You can also go into the
ppm (Perl Package Manager - type ppm) and type help for more info on
download or searching for modules.
Jobby
------------------------------
Date: Sat, 19 May 2001 20:30:36 GMT
From: jason@jamesjl.demon.co.uk (Jason James)
Subject: Re: ActiveState PPM Modules
Message-Id: <3b06d7a2.868507778@news.demon.co.uk>
Thanks to those of you who replied,
You helped me find what I was looking
for and hopefully they will install OK
from here.
Regards,
Jason
On Sat, 19 May 2001 15:05:55 GMT, jason@jamesjl.demon.co.uk (Jason
James) wrote:
>Please can someone tell me where I
>can download the latest modules for
>ActiveState's PERL 5.6.1.626. I have
>just downloaded the latest version from
>their www site and I need some additional
>modules. The ones from CPAN seem to
>need a C complier to do anything with.
>
>The module I need at the moment is the
>
>Date::Calc module that can be installed
>onto my copy of PERL running on a
>Window NT 4 server and IIS4.
>
>Some help would sure be useful.
>
>Many thanks,
>
>Jason James
------------------------------
Date: 19 May 2001 17:10:00 +0200
From: kaih=818CxASHw-B@khms.westfalen.de (Kai Henningsen)
Subject: Re: best way to evaluate $1 so it's not read-only?
Message-Id: <818CxASHw-B@khms.westfalen.de>
bohlman@omsdev.com (Eric Bohlman) wrote on 19.05.01 in <9e6009$g2n$4@bob.news.rcn.net>:
> Kai Henningsen <kaih=81842UO1w-B@khms.westfalen.de> wrote:
> > abigail@foad.org (Abigail) wrote on 19.05.01 in
> > <slrn9gcfpg.sk5.abigail@tsathoggua.rlyeh.net>:
> >> But before you are going to profile any code, you should first analyze
> >> your algorithm, and see whether you are better off using a faster
> >> algorithm.
>
> > Why would you want that, unless the profile tells you there's a problem at
> > that place?
>
> Because changing your algorithm after you've already coded and tested it
> involves a *lot* more work than fine-tuning some code. If you're building
> a building (cue Weinberg's quote about buildings, programmers, and
> woopeckers) you want to make sure the foundation will support the entire
> weight *before* you pour it. The choice of algorithms and data structures
> usually dictates the architecture of your entire code; if they turn out to
> be inadequate, you have to tear the whole thing down and start over.
Actually, I've rarely found that to be true for non-trivial code. Usually,
ripping out and replacing the offending part is easy enough.
Of course, to do that you need to clearly modularize your code, to avoid
having tentacles of the bad stuff reach all over the rest of your project.
Oh, and it also helps a lot to have a basic understanding of how your
algorithm works, and a general feel for the impact this is likely to have.
There is *one* area where I find spending significant optimization effort
upfront usually pays: and that is programmer optimization. Making
something easier to program (and to maintain) is worth spending quite a
lot of work on early.
Kai
--
http://www.westfalen.de/private/khms/
"... by God I *KNOW* what this network is for, and you can't have it."
- Russ Allbery (rra@stanford.edu)
------------------------------
Date: Sat, 19 May 2001 23:15:16 +0000 (UTC)
From: abigail@foad.org (Abigail)
Subject: Re: best way to evaluate $1 so it's not read-only?
Message-Id: <slrn9gdvk4.vtl.abigail@tsathoggua.rlyeh.net>
Kai Henningsen (kaih=81842UO1w-B@khms.westfalen.de) wrote on MMDCCCXVIII
September MCMXCIII in <URL:news:81842UO1w-B@khms.westfalen.de>:
&& abigail@foad.org (Abigail) wrote on 19.05.01 in <slrn9gcfpg.sk5.abigail@tsathoggua.rlyeh.net>:
&&
&& > Benjamin Goldberg (goldbb2@earthlink.net) wrote on MMDCCCXVIII September
&& > MCMXCIII in <URL:news:3B05FCD4.79F0CAC2@earthlink.net>:
&& > ** xris wrote:
&& > ** >
&& > ** > In article <u78iets4b8e0rb90bcesatjoprc71sd8h2@4ax.com>,
&& > ** > Bart Lateur <bart.lateur@skynet.be> wrote:
&& > ** >
&& > ** > > This is called micro-optimization. It'll only save you unmeasurable
&& > ** > > fractions of percents of execution time. I wouldn't even bother.
&& > ** > > It's not worth it.
&& > ** >
&& > ** > maybe. but that's just how I am.
&& > **
&& > ** Whether you do micro-optomization or not is up to you, but what you
&& > ** really should do first, before doing it, is to profile your code, and
&& > ** see where the bottlenecks are, and optomize that, first. *Then* do
&& > ** whatever micro-optomizations you want.
&& >
&& >
&& > But before you are going to profile any code, you should first analyze
&& > your algorithm, and see whether you are better off using a faster
&& > algorithm.
&&
&& Why would you want that, unless the profile tells you there's a problem at
&& that place?
*blink*
You mean you profile to see if you have a problem?
I would think one of two things happens:
1) The performance is good.
2) The performance is not good.
In 1), I would not profile, nor analyse. In 2) I would analyse first, and
only if I cannot find a better algorithm, I'd profile. Of course, the
analysis most likely tells you where your bottleneck is anyway.
&& >One can profile and micro-optimize the hell out of bubblesort,
&& > a non-profiled, not micro-optimized heapsort is going to beat the crap
&& > out of it.
&&
&& Well, assuming data size and constant factor do not mean that you never
&& see the advantage. If your problem is small enough, a bubblesort *might*
&& be better.
If the problem is small enough, optimizing is irrelevant anyway.
Abigail
--
package Just_another_Perl_Hacker; sub print {($_=$_[0])=~ s/_/ /g;
print } sub __PACKAGE__ { &
print ( __PACKAGE__)} &
__PACKAGE__
( )
------------------------------
Date: 19 May 2001 18:20:21 GMT
From: steve@zeropps.uklinux.net (Steve)
Subject: Re: Can anyone help me please?
Message-Id: <slrn9gde8o.qhu.steve@zero-pps.localdomain>
On Fri, 18 May 2001 22:34:59 +0100, Robb Meade wrote:
>Ok - i've posted the problem (several times now :( ) - and here's the
>code...
>#!/usr/bin/perl -w
>use strict;
>use CGI qw(:all);
>use CGI::Carp qw(fatalsToBrowser);
>my $site=param("site");
>my
>$target="http://www.kingswoodweb.net/clientmailingconfirm.asp?site=$site";
>
>sub send_to($)
I didn't attemt to respond to this the previous times that you've posted,
basically because it's very confusing having subs and function calls mixed
up like this.
If you put all the function calls at the top in the correct order followed
by the subs then it makes it much easier to follow. Also big blocks of comment
in a sub (the way you've done it some of the time), just makes me think
"I've missed the ending of that sub".
Hope some of this helps.
--
Cheers
Steve email mailto:steve@zeropps.uklinux.net
%HAV-A-NICEDAY Error not enough coffee 0 pps.
web http://www.zeropps.uklinux.net/
or http://start.at/zero-pps
6:57pm up 106 days, 19:44, 2 users, load average: 1.28, 1.08, 1.02
------------------------------
Date: Sat, 19 May 2001 13:43:20 -0400
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Can anyone help me please?
Message-Id: <slrn9gdc5o.uq9.tadmc@tadmc26.august.net>
Robb Meade <Ask@For-It.Com> wrote:
>I did try to explain the problem to the best of my ability in a number of
>the posts
You did not make any posts previous to this one in this thread.
(if there were other posts in this thread, then the References
header would identify them, but it doesn't.
)
>I wont bother you again.
I know.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Sat, 19 May 2001 21:29:12 +0100
From: "Robb Meade" <Ask@For-It.Com>
Subject: Re: Can anyone help me please?
Message-Id: <9e6kva$fs3$1@news5.svr.pol.co.uk>
Hi Steve...
Thanks for the reply :)
I didnt actually write the original 'email' script, it was done by a friend,
then I posted it here and asked how I could ammend it to make it for
multiple emails...
I have no idea which parts are functions, and which parts are subs :o/
--
Robb Meade
Kingswood Web Services
www.kingswoodweb.net
"Steve" <steve@zeropps.uklinux.net> wrote in message
news:slrn9gde8o.qhu.steve@zero-pps.localdomain...
> On Fri, 18 May 2001 22:34:59 +0100, Robb Meade wrote:
> >Ok - i've posted the problem (several times now :( ) - and here's the
> >code...
>
> >#!/usr/bin/perl -w
> >use strict;
> >use CGI qw(:all);
> >use CGI::Carp qw(fatalsToBrowser);
> >my $site=param("site");
> >my
>
>$target="http://www.kingswoodweb.net/clientmailingconfirm.asp?site=$site";
> >
> >sub send_to($)
>
> I didn't attemt to respond to this the previous times that you've posted,
> basically because it's very confusing having subs and function calls mixed
> up like this.
>
> If you put all the function calls at the top in the correct order followed
> by the subs then it makes it much easier to follow. Also big blocks of
comment
> in a sub (the way you've done it some of the time), just makes me think
> "I've missed the ending of that sub".
>
> Hope some of this helps.
>
> --
> Cheers
> Steve email mailto:steve@zeropps.uklinux.net
>
> %HAV-A-NICEDAY Error not enough coffee 0 pps.
>
> web http://www.zeropps.uklinux.net/
>
> or http://start.at/zero-pps
>
> 6:57pm up 106 days, 19:44, 2 users, load average: 1.28, 1.08, 1.02
------------------------------
Date: Sat, 19 May 2001 14:48:46 -0400
From: "Brent Ulfig" <bulfig@bargainisp.net>
Subject: Re: good perl...
Message-Id: <1dzN6.552$ce.925463@newsrump.sjc.telocity.net>
Thanks for tha tips...
Cheerz-
Brent Ulfig
Senior Network Engineer
Bargain ISP
bulfig@bargainisp.net
"Home of the $10/month unlimited internet access...nationwide."
"Leo" <leapius@hotmail.com> wrote in message
news:9e5h18$dfl$1@uranium.btinternet.com...
> Well the two books which you'll (and I) ever need are "Programming Perl"
> (The camel) and "Perl Cookbook" - both from O'Reilly. These two books will
> cover pretty much every aspect of perl. The former is the so called
"bible"
> for perl and covers every aspect of the language, the latter is a
"cookbook"
> which has a number of worked recipies to a load of typical tasks that you
> will need to perform at some point when programming.
>
> cheers,
> Leo
>
> "Brent Ulfig" <bulfig@bargainisp.net> wrote in message
> news:wqoN6.79$ce.370666@newsrump.sjc.telocity.net...
> > I'm looking for a good book for learning perl. I need to write some
> scripts
> > for a linux server we have here.
> >
> > Thanks,
> >
> > Brent Ulfig
> > Senior Network Engineer
> > Bargain ISP
> > bulfig@bargainisp.net
> >
> > "Home of the $10/month unlimited internet access...nationwide."
> >
> >
>
>
------------------------------
Date: Sat, 19 May 2001 22:50:10 +0000 (UTC)
From: abigail@foad.org (Abigail)
Subject: Re: Help: using constants from inherited parent class
Message-Id: <slrn9gdu52.vtl.abigail@tsathoggua.rlyeh.net>
Anno Siegel (anno4000@lublin.zrz.tu-berlin.de) wrote on MMDCCCXVIII
September MCMXCIII in <URL:news:9e5vhs$7fq$2@mamenchi.zrz.TU-Berlin.DE>:
%% According to Michael Ströck <michael@stroeck.com>:
%% >
%% > "Abigail" <abigail@foad.org> schrieb im Newsbeitrag
%% > news:slrn9gbe3f.anl.abigail@tsathoggua.rlyeh.net...
%% > >
%% > > I've never understood why. I've always learned that use of constants
%% > > was a good thing, and that duplication of data should be avoided.
%% > >
%% > > Doesn't the school of OO agree?
%% > <snip>
%% >
%% > I agree with Abigail. Can someone point out some disadvantages to that ?
%% > And don't say "It's not OOP" ;-)
%%
%% Using a constant and exporting its name into the user's name space
%% are different things. If you're going OO, a constant DIM in class
%% Vector is a class method and can be called as such:
FUD.
Almost anything that exports something either uses Exporter, or offers
its functionality. Exporter doesn't force *anything* in the users name
space. Two additional chars make Exporter not export anything.
Next argument?
Abigail
--
echo "==== ======= ==== ======"|perl -pes/=/J/|perl -pes/==/us/|perl -pes/=/t/\
|perl -pes/=/A/|perl -pes/=/n/|perl -pes/=/o/|perl -pes/==/th/|perl -pes/=/e/\
|perl -pes/=/r/|perl -pes/=/P/|perl -pes/=/e/|perl -pes/==/rl/|perl -pes/=/H/\
|perl -pes/=/a/|perl -pes/=/c/|perl -pes/=/k/|perl -pes/==/er/|perl -pes/=/./;
------------------------------
Date: Sat, 19 May 2001 23:10:00 +0000 (UTC)
From: abigail@foad.org (Abigail)
Subject: Re: Help: using constants from inherited parent class
Message-Id: <slrn9gdva7.vtl.abigail@tsathoggua.rlyeh.net>
Sweth Chandramouli (sweth+perl@gwu.edu) wrote on MMDCCCXVIII September
MCMXCIII in <URL:news:B%uN6.10487$G5.1758409@news1.rdc1.md.home.com>:
%% In article <3b06667c$1@e-post.inode.at>,
%% Michael Ströck <michael@stroeck.com> wrote:
%% >> I've never understood why. I've always learned that use of constants
%% >> was a good thing, and that duplication of data should be avoided.
%% >>
%% >>
%% >> Doesn't the school of OO agree?
%% ><snip>
%% >
%% >I agree with Abigail. Can someone point out some disadvantages to that ?
%% >And don't say "It's not OOP" ;-)
%% Short Answer: It violates encapsulation.
You wouldn't want to encapsulate global constants, now would you?
Otherwise, it wouldn't be global constants.
%% Long Answer: The theory, I think, is that when you are using
%% an OO package, what you are conceptually doing is telling your script to
%% extend its object model according to a certain set of specs; since an
%% object model only defines classes, attributes, and methods, then you
%% can't use it to define "variables".
Indeed. Constants aren't variables. They are *constants*. And perhaps you
may never have encountered them, but many specs define things that are
naturally implemented with constants. Because they are, well, uhm, constant.
%% The trick is that attributes usually
%% _are_ variables of one sort or another; in OO-world, however, you never
%% access them directly, but instead use an accessor method.
We are talking about *CONSTANTS*. Not about object attributes. The colour
of an object is an attribute. The wave length of a certain shade of green
is a constant, and not a property of an object.
%% access them directly, but instead use an accessor method. So rather
%% than using $ParentClass::Variable, you would instead call
%% ParentClass->VariableAccessor, which would return that class attribute
%% (which was, presumably defined in a closure in the ParentClass package
%% so that it would persist between calls). That way, if at some point
%% the underlying implementation of Variable is changed so that it isn't
%% really a regular variable (maybe it becomes a dynamically-generated
%% var where some ugly CORBA gateway is used to pull the value from a
%% legacy system in Kazakhastan or something), the program that uses the
%% object class isn't affected.
Oh, you'd think so? You really think that if something was first defined
as being constant, even if its value need to be accessed through a method
call, programs won't break if it suddenly becomes variable? Someone might
have moved the call outside of a loop, assuming it to be constant.
%% If you were using $ParentClass::Variable
%% directly, you'd have to go through your script and change all of those
%% to calls to the new &ParentClass::CorbaFunkinessSubroutine, and that
%% would make you less-than-happy. And OOP aims to make you happy at all
%% times, whether you want it or not. :)
First of all, "constants" in Perl *ARE* already implemented as methods -
just look inside the constant.pm module.
But still, if you have made $Class:PI, you are exporting that (instead
of exporting sub PI () {3.14}), and you suddenly think your class and
its users benefit from pi being 3, you can always use the tie() mechanism.
I'd hate to write "Fcntl -> O_CREAT" all the time, just because my OS
might decide it's neato to change the value of O_CREAT over time, without
a reboot in between.
Abigail
--
:;$:=~s:
-:;another Perl Hacker
:;chop
$:;$:=~y:;::d;print+Just.$:
------------------------------
Date: Sat, 19 May 2001 15:40:50 -0700
From: "Elmer Fudd" <elmer_fudd@yahoo.com>
Subject: Re: HTTP Response suppression
Message-Id: <tgdtkvlh0uos94@corp.supernews.com>
I am using 2 things, HTML...and Perl. HTML doesn't generate extreneous
headers...so it's a Perl issue *shrug*.
I didn't post the script becuase it could have been a Perl script that
merely printed 'Hello World' and it wouldn't matter. I get this extra header
information everytime I use exec cgi calls. My script is not printing 'any'
headers and therefore I can't 'just remove what I don't want'. The
extraneous header data is getting embedded into my HTML page. My script is
called via SSI exec cgi command.
Here's the script:
$datafile="users.txt"; # data file that contains current users
$counter="count.txt"; # counter data file (may be existing)
$minutes=15; # minutes of inactivity until user is no longer
displayed
$refreshsec=60; # how many seconds between auto-refresh
$writecounter=0; # this should be set to 1 if you want to use the
built-in
# counter, 2 if you want to use your own file,
or 0 if you
# don't want to count
####################################################################
print "Content-type: text/html\n\n";
open(OLDFILE, $datafile);
while (<OLDFILE>) {
chomp;
($user, $thetime) = split(/\,/);
$users{$user} = $thetime;
}
close OLDFILE;
if ($writecounter) {
open(COUNTER, $counter);
$count=<COUNTER>;
close COUNTER;
}
foreach $key (keys %users) {
delete $users{$key} if ((time - $users{$key}) > ($minutes * 60));
}
$key = $ENV{'REMOTE_HOST'};
# $key = $ENV{REMOTE_ADDR} if !($ENV{REMOTE_HOST});
$newcount=0;
$usercount=0;
$newcount = ($count + 1) if !($users{$key});
$users{$key} = time;
open(NEWFILE, ">$datafile");
foreach $key (keys %users) {
print NEWFILE "$key\,$users{$key}\n";
}
close NEWFILE;
if ($newcount && ($writecounter == 1)) {
open(COUNTER, ">$counter");
print COUNTER $newcount;
close COUNTER;
}
$topline = "<OPTION>$count people have visited this
site...</OPTION>\n<OPTION>________________________________________</OPTION>"
if ($writecounter);
foreach $key (sort keys %users) {
$usercount = ($usercount + 1);
}
print "<br>Currently $usercount connections\n";
exit;
================================
Most of it is not even used. I only want a connection count (tracked IP's
younger than 15 minutes)...but I also get the following returned:
HTTP/1.1 200 OK Date: Sat, 19 May 2001 22:25:14 GMT Server:
Microsoft-IIS/5.0 Content-type: text/html
Currently 1 connections
The response of 200 tells me it's a HTTP Reponse *shrug*.
It works without the extra header if I use the cgi as a src to a frame or if
I call the cgi directly from the browser *shrug*.
Any help is appreciated, this could be a server admin setup issue for all I
know.
Brian.
------------------------------
Date: 19 May 2001 16:54:18 -0700
From: devs@usa.net (devs)
Subject: installing libwww-perl on Win 95
Message-Id: <e3663770.0105191554.2ae4cdb1@posting.google.com>
Hi,
I have ActiveState perl 5.6.0 running on Win 95.
I am trying to install libwww-perl module.
So, I downloaded libwww-perl.ppd and libwww-perl.tar.gz files
from activestate site.
I tried to install it using ppm as
ppm install libwww-perl
It fails with the message:
Install package 'libwww-perl?' (y/N): y
Installing package 'libwww-perl'...
Error installing package 'libwww-perl':
Could not locate a PPM binary of 'libwww-perl' for this platform
I don't have a clue.
Could someone kindly help me?
Many thanks,
devs
------------------------------
Date: Sat, 19 May 2001 13:34:21 -0500
From: John Martin Ping <webmaster@domainenterprises.com>
Subject: Re: LWP - HTTPS
Message-Id: <3B06BCAC.971FD0F3@domainenterprises.com>
Currently there is no support in LWP-WWW module for https but it is being
worked on.
TheMaster
Enrico Ng wrote:
> I want to use LWP to get a https page.
> when I use get, I get nothing, I am assuming this is because of https
> does anyone know what option I need to use to get it to work?
>
> --
> Enrico Ng <ng@fnmail.com>
------------------------------
Date: 19 May 2001 15:09:01 -0700
From: Petri Oksanen <Petri_member@newsguy.com>
Subject: Re: LWP - HTTPS
Message-Id: <9e6qtt01kvq@edrn.newsguy.com>
In article <3B06BCAC.971FD0F3@domainenterprises.com>, John says...
>> I want to use LWP to get a https page.
>> when I use get, I get nothing, I am assuming this is because
>> of https does anyone know what option I need to use to get it
>> to work?
> Currently there is no support in LWP-WWW module for https but
> it is being worked on.
There is a simple enough solution; Install Crypt::SSLeay.
After that it works, but perhaps you also need a fairly recent set of LWP
modules to make use of it, I don't know about that.
Anyway, it works on ActivePerl 5xx and 6xx when the module mentioned above is
installed.
Petri Oksanen
------------------------------
Date: 19 May 2001 16:58:05 -0700
From: not_a_pack_animal@yahoo.com (Cato)
Subject: My senior project is "done"
Message-Id: <8e5b6c2b.0105191558.23a9eb74@posting.google.com>
My senior project (comprised of a perl script and java applets) can be
found here:
http://www.geocities.com/uhdseniorproject
I got an A! And a BS in Computer Science cum laude with a 3.8+ major
GPA ...and...and...and...I am available for employment!
Quell your enthusiasm....
------------------------------
Date: Sat, 19 May 2001 18:07:24 GMT
From: Franco Luissi <boqichi0@earthlink.net>
Subject: Re: oh c'mon please, one of you perl/unix gurus!!!
Message-Id: <3B06E231.222BBBF6@earthlink.net>
> Then type this:
>
> HEAD / HTML/1.1
>
> Then press enter one more time and you'll see this:
>
> Host: 10.201.11.0
>
> HTTP/1.1 200 OK
> Date: Tue, 16 May 2000 15:37:53 GMT
> Server: Apache/1.3.6 (Unix) (Red Hat/Linux)
> Last-Modified: Fri, 12 May 2000 17:55:01 GMT
> ETag: "7203e-799-391c4575"
> Accept-Ranges: bytes
> Content-Length: 1945
> Connection: close
> Content-Type: text/html
>
actually in this weird case, i get this:
bash$ HEAD / HTML/1.1
200 OK
Content-Base: file:/
Content-Length: 912
Content-Type: text/html
Last-Modified: Tue, 04 Jan 2000 01:39:08 GMT
Client-Date: Sat, 19 May 2001 17:59:01 GMT
Title: Directory /
404 Not Found
Client-Date: Sat, 19 May 2001 17:59:01 GMT
bash$
:-( ... there must be another way to find out....
> Hope some of that helps, but really you need to get the admins to
> rebuild or reconfigure the server.
>
really, a restart wont do it? That sucks...what do you mean reconfigure it?
Thanks for your help.
------------------------------
Date: 20 May 2001 00:19:53 GMT
From: steve@zeropps.uklinux.net (Steve)
Subject: Re: oh c'mon please, one of you perl/unix gurus!!!
Message-Id: <slrn9ge3cl.ro7.steve@zero-pps.localdomain>
On Sat, 19 May 2001 18:07:24 GMT, Franco Luissi wrote:
>actually in this weird case, i get this:
>
>bash$ HEAD / HTML/1.1
That shouldn't be a shell prompt.
It looks like this on my machine:
[sjlen:sjlen]$ telnet 127.0.0.1 80 ## I type this and press enter.
Trying 127.0.0.1...
Connected to 127.0.0.1.
Escape character is '^]'.
HEAD / HTML/1.1 ## I type this and press enter.
## Then I press enter again.
HTTP/1.1 200 OK
Date: Sat, 19 May 2001 20:10:06 GMT
Server: Apache/1.3.12 (Unix) (Red Hat/Linux)
Last-Modified: Sat, 12 May 2001 20:22:20 GMT
ETag: "720a4-19a9-3afd9b7c"
Accept-Ranges: bytes
Content-Length: 6569
Connection: close
Content-Type: text/html
Connection closed by foreign host.
[sjlen:sjlen]$
>really, a restart wont do it? That sucks...what do you mean reconfigure it?
I didn't say restart. Like I said you need the server admin to do that for
you.
--
Cheers
Steve email mailto:steve@zeropps.uklinux.net
%HAV-A-NICEDAY Error not enough coffee 0 pps.
web http://www.zeropps.uklinux.net/
or http://start.at/zero-pps
1:15am up 107 days, 2:02, 2 users, load average: 1.07, 1.48, 1.45
------------------------------
Date: Sat, 19 May 2001 13:10:49 -0500
From: John Martin Ping <webmaster@domainenterprises.com>
Subject: Re: Perl + SFTP method?
Message-Id: <3B06B729.82AE6D54@domainenterprises.com>
On a regular perl ftp script one would use the Net::FTP module, and the login
process would go like this,
login($username, $password);
Get a copy of the Perl Cook Book, it should help you with some transfer agents.
smilepak wrote:
> I have a question, anyone know how to create a pl script that does sftp pull
> from a remote site.
>
> For Example:
>
> username: user
> password: pass
> sftp address: sftp.mydomain.com
> directory: /pub/mydir/
> file: filename$date.txt
>
> How am I suppose to do an FTP connection via script and provide the
> username/password with it prompt
> for it?
>
> Haven't done this before so not sure on how to do it. Oh the basic perl
> scripting, I already know how.
> Just unsure how to structure the FTP command to provide the
> username/password and path and get when
> it ask for it.
>
> Thanx
> KN
------------------------------
Date: Sat, 19 May 2001 13:14:18 -0500
From: John Martin Ping <webmaster@domainenterprises.com>
Subject: Re: perl 5.6 and apache
Message-Id: <3B06B7FA.CAFEF6DF@domainenterprises.com>
You will most likely either need to reinstall Apache, or edit your
configuration files, such as the srm.conf and httpd.conf and access.conf
files, with the newer Apache versions, usually on httpd.conf needs to be
reconfigured and can be done in any text editor.
TheMaster
AvA wrote:
> i recently installed perl 5.6.0 and now my apache wont work properly
> anymore.
>
> its still looking for Cwd.pm in the old @INC from version 5.005 (which i
> deleted)
>
> has anyone encountered that aswell and how do i solve this.
>
> thanks.
------------------------------
Date: Sat, 19 May 2001 22:17:42 GMT
From: "Kevin B" <kbass1@nc-rr.com>
Subject: Perl and Java Native Interface
Message-Id: <aiCN6.31604$i56.8927429@typhoon.southeast.rr.com>
Does anyone have some sample code showing Perl and Java Native Interface
(JNI) interacting with each other?
Kevin
------------------------------
Date: Sat, 19 May 2001 13:21:29 -0500
From: John Martin Ping <webmaster@domainenterprises.com>
Subject: Re: problem with making dirs!
Message-Id: <3B06B9A9.A06BCBB@domainenterprises.com>
Try this,
mkdir $anydir;
chmod(0777, "path/to/$anydir");
this should do the trick, and if not try taking thr 0 out of 777, one systems
the 0 is needed, on some it is not.
Bert wrote:
> hi there!
>
> Since i've been running my perl-scripts on a windows 2000 server I've got a
> problem:
> I can't make dirs!
>
> mkdir $anydir,0777;
> (nor without 0777)
>
> does not work... can anyone please tell me what to do?
> I've been searching all around the world wide web in order to solve this
> problem but I cannot find anything usefull.
>
> Thanx in ahead, Bert
------------------------------
Date: Sat, 19 May 2001 13:50:53 -0400
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: problem with making dirs!
Message-Id: <slrn9gdcjt.uq9.tadmc@tadmc26.august.net>
John Martin Ping <webmaster@domainenterprises.com> wrote:
>Try this,
>
>mkdir $anydir;
>chmod(0777, "path/to/$anydir");
>
>this should do the trick, and if not try taking thr 0 out of 777, one systems
>the 0 is needed, on some it is not.
^^^^^^^^^ ^^^^^^
That is absolutely untrue.
We're not talking about any "system" stuff, we're talking about Perl.
Leading zero in Perl source is _always_ octal, regardless of platform.
>Bert wrote:
>
>> I can't make dirs!
>>
>> mkdir $anydir,0777;
>> does not work... can anyone please tell me what to do?
Ask perl to tell you why it is failing:
mkdir $anydir, 0777 or die "could not make '$anydir' $!";
^^
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
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.
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 941
**************************************
