[15955] in Perl-Users-Digest
Perl-Users Digest, Issue: 3367 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jun 15 06:05:29 2000
Date: Thu, 15 Jun 2000 03:05:16 -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: <961063516-v9-i3367@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Thu, 15 Jun 2000 Volume: 9 Number: 3367
Today's topics:
"chomp"ing the date <toddel_smithers@linuxfreemail.com>
Re: "chomp"ing the date (Villy Kruse)
Re: "chomp"ing the date <jbroz@transarc.com>
Re: "chomp"ing the date (Bart Lateur)
Re: "chomp"ing the date <toddel_smithers@linuxfreemail.com>
Re: [Q] Perl implemented in Java? (jason)
Re: [Q] Perl implemented in Java? (Bart Lateur)
Re: A Computer Programmers Profile <blah@nospam.com>
Re: calculating date differences <sb@muccpu1.muc.sdm.de>
Re: DBM or flat file? juump@my-deja.com
file download over cgi script <ii4533@fh-wedel.de>
ftp-client <f_perNOf_SPAM@hotmail.com.invalid>
ftp-client <f_perNOf_SPAM@hotmail.com.invalid>
Re: ftp-client <ulf_rimkus@dgbank.de>
Re: ftp-client <Peter.Dintelmann@dresdner-bank.com>
RE: Help- Compile Perl 5.6.0 on N-Class (HPUX11.0) (H. Merijn Brand)
Re: How do I... <gellyfish@gellyfish.com>
Infinity ? <gaborit@enstimac.fr>
Re: Infinity ? (Damian Conway)
Re: Infinity ? <julien.quint@xrce.xerox.com>
Re: Is there a NET::Time call to get remote time. Or so <Peter.Dintelmann@dresdner-bank.com>
Re: Larry Rosler interview on perl.com! (Bart Lateur)
need recommended Perl hosting urgently <no_spam_4me_cut_here_retoh@dplanet.ch>
Re: OLE and CGI ?? Not working ! <c4jgurney@my-deja.com>
Re: Pattern matching - case sensitive/insensitive (A.J. Norman)
Protect and HTML page? <vivekvp@spliced.com>
Re: Recruiting for a perl CGI expert (David H. Adler)
Re: Script to calculate a future date? (jason)
Re: Script to calculate a future date? <sb@muccpu1.muc.sdm.de>
Re: Syntax checker <gellyfish@gellyfish.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 15 Jun 2000 02:19:34 -0600
From: "toddel" <toddel_smithers@linuxfreemail.com>
Subject: "chomp"ing the date
Message-Id: <8ia3d4$ce8$1@coward.ks.cc.utah.edu>
hello eveyone, i new to perl and im trying to append the date to a log file.
and i cant seem to remove the '\n' from the date.
im trying:
$date = `date`;
chomp($date);
chomping doesnt remove the newline. when i print $date this way it prints 1
if i dont chomp it works fine.
------------------------------
Date: 15 Jun 2000 08:42:55 GMT
From: vek@pharmnl.ohout.pharmapartners.nl (Villy Kruse)
Subject: Re: "chomp"ing the date
Message-Id: <slrn8kh5of.mc5.vek@pharmnl.ohout.pharmapartners.nl>
On Thu, 15 Jun 2000 02:19:34 -0600,
toddel <toddel_smithers@linuxfreemail.com> wrote:
>hello eveyone, i new to perl and im trying to append the date to a log file.
>and i cant seem to remove the '\n' from the date.
>im trying:
>
>$date = `date`;
>chomp($date);
>
>chomping doesnt remove the newline. when i print $date this way it prints 1
>if i dont chomp it works fine.
>
Ever tried:
print scalar localtime;
or
my $date = localtime;
print $date;
For more information: "perldoc -f localtime"
Villy
------------------------------
Date: Thu, 15 Jun 2000 09:50:21 +0100
From: "Joe_Broz@transarc.com" <jbroz@transarc.com>
Subject: Re: "chomp"ing the date
Message-Id: <394898CD.E07DCDB5@transarc.com>
toddel wrote:
>
> hello eveyone, i new to perl and im trying to append the date to a log file.
> and i cant seem to remove the '\n' from the date.
> im trying:
>
> $date = `date`;
> chomp($date);
>
> chomping doesnt remove the newline. when i print $date this way it prints 1
> if i dont chomp it works fine.
chomp returns the number of characters removed. I don't see a print
statement above.
#!/usr/bin/perl -w
use strict;
my $dt = `date`;
my $ret = chomp $dt;
print "chomp removed $ret char\n" if $ret;
------------------------------
Date: Thu, 15 Jun 2000 09:00:27 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: "chomp"ing the date
Message-Id: <394b9ab9.2775689@news.skynet.be>
toddel wrote:
>hello eveyone, i new to perl and im trying to append the date to a log file.
>and i cant seem to remove the '\n' from the date.
>im trying:
>
>$date = `date`;
>chomp($date);
>
>chomping doesnt remove the newline. when i print $date this way it prints 1
>if i dont chomp it works fine.
Er... you trying
print chomp($date);
aren't you? Don't. chomp() returns the success of it's action. You need
to print the modified $date.
chomp($date);
print $date;
There. Now you've got that working (I hope), try looking at perl's
built-in functionality:
print scalar localtime;
--
Bart.
------------------------------
Date: Thu, 15 Jun 2000 03:19:14 -0600
From: "toddel" <toddel_smithers@linuxfreemail.com>
Subject: Re: "chomp"ing the date
Message-Id: <8ia6t0$cqd$1@coward.ks.cc.utah.edu>
"Bart Lateur" <bart.lateur@skynet.be> wrote in message
news:394b9ab9.2775689@news.skynet.be...
> toddel wrote:
>
> >hello eveyone, i new to perl and im trying to append the date to a log
file.
> >and i cant seem to remove the '\n' from the date.
> >im trying:
> >
> >$date = `date`;
> >chomp($date);
> >
> >chomping doesnt remove the newline. when i print $date this way it prints
1
> >if i dont chomp it works fine.
>
> Er... you trying
>
> print chomp($date);
>
> aren't you? Don't. chomp() returns the success of it's action. You need
> to print the modified $date.
>
> chomp($date);
> print $date;
>
> There. Now you've got that working (I hope), try looking at perl's
> built-in functionality:
>
> print scalar localtime;
>
> --
> Bart.
$date = `date`;
chomp($date);
print LOGFILE "$date Added $entry to $FILE\n";
that was how i did it, and it still printed the return value.
i think i'll use: "print scalar localtime" it is much easier
thanks for the tip!
toddel
------------------------------
Date: Thu, 15 Jun 2000 07:20:36 GMT
From: elephant@squirrelgroup.com (jason)
Subject: Re: [Q] Perl implemented in Java?
Message-Id: <MPG.13b320f1e2bda654989739@news>
Tom Phoenix writes ..
>On Wed, 14 Jun 2000, Andre-John Mas wrote:
>
>> Could anyone tell me whether a version Perl has been implemented
>> in Java.
>
>It would be possible, but very difficult and probably quite slow. For
>example, Perl's regular expressions compile into quite efficient codes -
>but nothing like that would be possible in Java. (But if someone
>disagrees, I'd be glad to be proven wrong. :-)
>
>But I know of no beast such as you describe. Cheers!
I haven't used it - but there is one that runs the regex stuff from Perl
.. and from (a vague) memory some other stuff .. I've got the bookmark
at work - I'll post tomorrow
--
jason - elephant@squirrelgroup.com -
------------------------------
Date: Thu, 15 Jun 2000 08:30:28 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: [Q] Perl implemented in Java?
Message-Id: <394993a9.968217@news.skynet.be>
Andre-John Mas wrote:
> Could anyone tell me whether a version Perl has been implemented
> in Java. The reason being, that I am looking for a scripting
> language that can run on machines using a java only system.
No as is, for the reasons Tom Phoenix has given. But I think Larry Wall
is being paid (by O'Reilly?) to write a Perl-to-Java-bytecode compiler,
so you could RUN your Perl scripts on a Jave only machine.
--
Bart.
------------------------------
Date: Thu, 15 Jun 2000 09:56:46 +0200
From: Marco Natoni <blah@nospam.com>
Subject: Re: A Computer Programmers Profile
Message-Id: <39488C3E.22F34CAC@nospam.com>
Employer,
Employer wrote:
> I am looking to create a "computer programmers profile". I am
> looking to find out:
> Where do computer programmers "hang out" on the Internet?
> What websites do they visit?
> What magazines do they read?
> How old are they generally?
> I am looking for this information in the interest to be able to
> find computer programmers for employment when I need them. They
> have been hard to find (the good ones anyway), and I am trying to
> find them!!
Subtle question: Since in Italy is strictly forbidden to collect
information of this kind for employment purposes (L. 675/96), I can not
imagine if I now help you, I will be considered offender of incitement
to crime. ;)
Best regards,
Marco
------------------------------
Date: 15 Jun 2000 08:51:25 GMT
From: Steffen Beyer <sb@muccpu1.muc.sdm.de>
Subject: Re: calculating date differences
Message-Id: <8ia5ed$mg6$3@solti3.sdm.de>
In article <8i83qj$shc$1@nnrp1.deja.com>, sumera.shaozab@lmco.com wrote:
> I am trying to calculate the current date with the date from last week,
> last month etc...and find the difference in days. I looked into the
> perl manip:date module but learned that it was not efficient since I
> will be calculating thousands of dates. What do you recommend I should
> do?
Use Date::Calc - it's written in C, internally, for maximum speed.
See http://www.perl.com/CPAN/modules/by-module/Date/Date-Calc-4.3.tar.gz
or http://www.engelschall.com/u/sb/download/pkg/Date-Calc-4.3.tar.gz
Good luck!
--
Steffen Beyer <sb@engelschall.com>
http://www.engelschall.com/u/sb/whoami/ (Who am I)
http://www.engelschall.com/u/sb/gallery/ (Fotos Brasil, USA, ...)
http://www.engelschall.com/u/sb/download/ (Free Perl and C Software)
------------------------------
Date: Thu, 15 Jun 2000 07:14:36 GMT
From: juump@my-deja.com
Subject: Re: DBM or flat file?
Message-Id: <8i9vok$9k4$1@nnrp1.deja.com>
In article <393C3083.ED492BA6@vpservices.com>, jeff@vpservices.com
wrote:
> >
> > Compile the regular expression using & and | in that regular expression, then
> > use the (dynamically?) compiled regex in the flat file search. This is the sort
> > of thing that perl really handles well IMO.
>
> If you try all the methods
> (regex,index,module) and benchmark them, please let us know the results.
>
Just for the record, I stuck with the flat file and regex as outlined
above, and it turned out to be plenty fast enough. I ended up not even
bothering with DBM, etc.
Thanks for all the advice.
Steve
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 15 Jun 2000 10:05:39 +0200
From: Nils <ii4533@fh-wedel.de>
Subject: file download over cgi script
Message-Id: <39488E53.70B37BD4@fh-wedel.de>
Hi
Ive wrote an cgi script which sends back a file that was requeseted by a
paramter.
to do that i use something like that:
print "Content-type: $type\n\n":
open (FILE, "<".param('filename'))
while (!eof(FILE)) {
print <FILE>
}
close (FILE)
If i use this script on my local maschine and it runs fine even with
large files.
if i use it an my webserver an try to download a file of about 2MB over
ISDN the script
dies with the message "preamatuer end of script header" after
transfering about 700KB of data
and i dont know why.
anybody an idea?
thanks nils
------------------------------
Date: Thu, 15 Jun 2000 00:22:02 -0700
From: Per <f_perNOf_SPAM@hotmail.com.invalid>
Subject: ftp-client
Message-Id: <0e16b040.f9db8b2c@usw-ex0109-070.remarq.com>
Hi
I would like to write an ftp-client in perl,
however I donÿffffb4t really now how to.
I can make an conection to the server, (open_socket...)
but only a few commands does work, forexample pwd and cwd.
The "list"-command, dosent work, neither do put or get.
The question is; does anybody now how to do this,
or is there any good websites about it?
Any thoughts/links etc appreciated.
Thanks
Per.
* Sent from AltaVista http://www.altavista.com Where you can also find related Web Pages, Images, Audios, Videos, News, and Shopping. Smart is Beautiful
------------------------------
Date: Thu, 15 Jun 2000 00:18:52 -0700
From: Per <f_perNOf_SPAM@hotmail.com.invalid>
Subject: ftp-client
Message-Id: <13b2087d.9c892a20@usw-ex0108-061.remarq.com>
Hi
I would like to write an ftp-client in perl,
however I donÿffffb4t really now how to.
I can make an conection to the server, (open_socket...)
but only a few commands does work, forexample pwd and cwd.
The "list"-command, dosent work, neither do put or get.
The question is; does anybody now how to do this,
or is there any good websites about it?
Any thoughts/links etc appreciated.
Thanks
Per.
* Sent from AltaVista http://www.altavista.com Where you can also find related Web Pages, Images, Audios, Videos, News, and Shopping. Smart is Beautiful
------------------------------
Date: Thu, 15 Jun 2000 02:15:38 -0700
From: Ulf Rimkus <ulf_rimkus@dgbank.de>
Subject: Re: ftp-client
Message-Id: <14bc0a20.0542e4d2@usw-ex0103-086.remarq.com>
Hi!
Why don't you "use Net::FTP"?
Ulf
* Sent from RemarQ http://www.remarq.com The Internet's Discussion Network *
The fastest and easiest way to search and participate in Usenet - Free!
------------------------------
Date: Thu, 15 Jun 2000 11:21:24 +0200
From: "Dr. Peter Dintelmann" <Peter.Dintelmann@dresdner-bank.com>
Subject: Re: ftp-client
Message-Id: <8ia763$3sp6@intranews.dresdnerbank.de>
Hi,
Per schrieb in Nachricht <13b2087d.9c892a20@usw-ex0108-061.remarq.com>...
>I would like to write an ftp-client in perl,
>however I donÿffffb4t really now how to.
there is a module Net::FTP which does
the job for you. Examples are included
in the documentation (have a look for
the libnet bundle on cpan).
Best regards,
Peter Dintelmann
------------------------------
Date: Thu, 15 Jun 00 11:38:08 +0200
From: h.m.brand@hccnet.nl (H. Merijn Brand)
Subject: RE: Help- Compile Perl 5.6.0 on N-Class (HPUX11.0)
Message-Id: <8F547FE06Merijn@192.0.1.90>
jinz@gene.com wrote in <8i8h7t$7sc$1@nnrp1.deja.com>:
> Hi:
>
> I was trying to compile the perl 5.6.0 on HPUX 11.0 running on HP
>N4000 (which has 2 x PA-RISC 8500 CPUs) using standard commands:
>
> 1. rm -f config.sh Policy.sh
> 2. sh Configure -d
> 3. make
>
> But it failed to "make" the "DB_File" and the screen output is like
>below:
>
>.......
>
> Making DB_File (dynamic)
>make[1]: Entering directory `/home/Ctech/jinz/util/perl-
>5.6.0/ext/DB_File'
>Makefile out-of-date with respect to ../../lib/Config.pm ../../config.h
>Cleaning current config before rebuilding Makefile...
>make -f Makefile.old clean > /dev/null 2>&1 || /bin/sh -c true
>../../miniperl "-I../../lib" "-I../../lib"
>Makefile.PL "INSTALLDIRS=perl" "LIBPERL_A=libperl.a"
>Writing Makefile for DB_File
>==> Your Makefile has been rebuilt. <==
>==> Please rerun the make command. <==
>false
>make[1]: *** [Makefile] Error 1
>make[1]: Leaving directory `/home/Ctech/jinz/util/perl-
>5.6.0/ext/DB_File'
>make config failed, continuing anyway...
>make[1]: Entering directory `/home/Ctech/jinz/util/perl-
>5.6.0/ext/DB_File'
>Skip ../../lib/DB_File.pm (unchanged)
>cc -c -D_HPUX_SOURCE -I/usr/local/include -D_LARGEFILE_SOURCE -
>D_FILE_OFFSET_BITS=64 -Ae -O -DVERSION=\"1.72\" -DXS_VERSION=\"1.72
>\" +z -I../.. version.c
>../../miniperl -I../../lib -I../../lib ../../lib/ExtUtils/xsubpp -
>noprototypes -typemap ../../lib/ExtUtils/typemap -typemap typemap
>DB_File.xs > DB_File.xsc && mv DB_File.xsc DB_File.c
>cc -c -D_HPUX_SOURCE -I/usr/local/include -D_LARGEFILE_SOURCE -
>D_FILE_OFFSET_BITS=64 -Ae -O -DVERSION=\"1.72\" -DXS_VERSION=\"1.72
>\" +z -I../.. DB_File.c
>cc: "DB_File.xs", line 817: warning 604: Pointers are not assignment-
>compatible.
>Running Mkbootstrap for DB_File ()
>chmod 644 DB_File.bs
>LD_RUN_PATH="/usr/local/lib" ld -o ../../lib/auto/DB_File/DB_File.sl -
>b +vnocompatwarnings -L/usr/local/lib version.o DB_File.o -
>L/usr/local/lib -ldb
>ld: Invalid loader fixup in text space needed in output file for
>symbol "$000000A3" in input file "/usr/local/lib/libdb.a(db_appinit.o)"
>make[1]: *** [../../lib/auto/DB_File/DB_File.sl] Error 1
>make[1]: Leaving directory `/home/Ctech/jinz/util/perl-
>5.6.0/ext/DB_File'
>make: *** [lib/auto/DB_File/DB_File.sl] Error 2
>
>
> I did some trouble-shootings, but still have not solved the problem.
>Here are what I found:
> 1) "uname -m" gives "9000/800". But "800" entry
>in "/opt/langtools/lib/sched.models" says that it's a PA-RISC 1.1e and
>PA7300. And there is no "N4000"
>entry "in /opt/langtools/lib/sched.models" file. So will this affect
>the way that "Configure" figure out that N4000 has PA-8500 CPU which is
>PA-RISC 2.0 ?
> 2) Later I run "sh Configure" and manually
>add "+DAportable", "+DSPA8500" (+DS32) flags for cc, but the "make"
>gave similar error message. Maybe I didn't use them correctly ?
> 3) According to HP doc, there is a "+compat" flag for "ld" which
>provide 32bit linking and loading behavior. I also add it as a
>addtional flags for "ld", but "make" still gave me the similar error.
>
> Anybody has done any compilation on N class ? Any suggestion ?
>
> Thanks in advance.
>
> Regards
>
> Jinz
>
>
>Sent via Deja.com http://www.deja.com/
>Before you buy.
This is from
http://devresource.hp.com/devresource/Docs/TechTips/cxxTips.html#tip13
What to do about "invalid loader fixup" errors
If you are linking a shared library and get an error like this:
aCC -g0 +z -b -o libsample.sl active.o csock.o tip.o udp.o mom.o
/opt/aCC/lbin/ld: Invalid loader fixup for symbol "$00260018"
you've neglected to compile a file with +z.
There is an enhancement to the linker to print that useful message before
it
prints the "Invalid loader fixup" error. At least on 11.0, the linker
will
print the name of the object file.
To solve the problem, you'll need to go through each of the object files
to
check which has that label. Or you can use the following ld option to
show
which file:
-Wl,-y"$00260018"
The symbol in question $00260018 is probably for some switch case label.
--
H.Merijn Brand
using perl5.005.03 and 5.6.0 on HP-UX 10.20, HP-UX 11.00, AIX 4.2, AIX 4.3,
DEC OSF/1 4.0 and WinNT 4.0 SP-6a, often with Tk800.022 and/or DBD-Unify
ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/
Member of Amsterdam Perl Mongers (http://www.amsterdam.pm.org/)
------------------------------
Date: 14 Jun 2000 22:09:22 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: How do I...
Message-Id: <8i8sa2$4r9$1@orpheus.gellyfish.com>
On Tue, 13 Jun 2000 20:31:08 -0700 Agentkhaki wrote:
> I thought I posted this question already, but apparently
> not...
>
You did yesterday and got three answers.
/J\
--
** This space reserved for venue sponsor for yapc::Europe **
<http://www.yapc.org/Europe/>
------------------------------
Date: 15 Jun 2000 10:17:47 +0200
From: Paul GABORIT <gaborit@enstimac.fr>
Subject: Infinity ?
Message-Id: <r7r99zqrx0.fsf@enstimac.fr>
How assign the Infinity constant to a variable ?
Example :
#!/usr/bin/perl -w
$inf = 2**1024; # 2**1023 is not Infinity...
$b = 1;
while ($b < $inf) {
$b *=2;
print "$b $inf\n";
}
2**1024 is perfect on *my* Ultra1 but it is machine dependent...
So, i try :
#!/usr/bin/perl -w
$inf = Infinity; # or $inf = Inf;
$b = 1;
while ($b < $inf) {
$b *=2;
print "$b $inf\n";
}
But, i got this warning :
Argument "Infinity" isn't numeric in numeric lt (<) at limit.pl line 5.
What is the syntax of the Infinity constant (numric) ?
Thank you.
PS: i can't find the word 'Infinity' in source codes of Perl...:-(
--
Paul Gaborit - <http://www.enstimac.fr/~gaborit/>
Perl en français - <http://www.enstimac.fr/Perl/>
------------------------------
Date: 15 Jun 2000 08:45:29 GMT
From: damian@cs.monash.edu.au (Damian Conway)
Subject: Re: Infinity ?
Message-Id: <8ia539$3gb$1@towncrier.cc.monash.edu.au>
Paul GABORIT <gaborit@enstimac.fr> writes:
> How assign the Infinity constant to a variable ?
> 2**1024 is perfect on *my* Ultra1 but it is machine dependent...
So build your infinity out of machine-dependent components:
$inf = (~0)**(~0);
Damian
------------------------------
Date: 15 Jun 2000 11:50:05 +0200
From: Julien Quint <julien.quint@xrce.xerox.com>
Subject: Re: Infinity ?
Message-Id: <thya472rzm.fsf@mont-chauve.grenoble.xrce.xerox.com>
Paul GABORIT <gaborit@enstimac.fr> writes:
> How assign the Infinity constant to a variable ?
Hi Paul, to follow-up on that I noticed something else:
> perl -e 'printf "%f\n", 2**1024'
Inf
as you see you get "Inf" instead on Infinity.
> PS: i can't find the word 'Infinity' in source codes of Perl...:-(
Maybe just "Inf" then?
--
Julien
------------------------------
Date: Thu, 15 Jun 2000 11:17:01 +0200
From: "Dr. Peter Dintelmann" <Peter.Dintelmann@dresdner-bank.com>
Subject: Re: Is there a NET::Time call to get remote time. Or something like that
Message-Id: <8ia6tu$3sq1@intranews.dresdnerbank.de>
Hi,
Robert Chalmers schrieb in Nachricht ...
>Is there a call to retrieve the time from a system (port 13 I think) -
Maybe
>in NET or something like that. I can't find anyting, but that doesn't mean
>anyting.
Net::Time does exist (at least on my system ;-).
Otherwise, just connect to port 37 read the 4 bytes
and convert them using unpack. The crucial expression
will be
unpack( "N" , $time ) - 2208988800
where $time is what you got from your ntp server.
Best regards,
Peter Dintelmann
------------------------------
Date: Thu, 15 Jun 2000 08:22:06 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Larry Rosler interview on perl.com!
Message-Id: <3948914e.364866@news.skynet.be>
Abigail wrote:
>While Microsoft can be blamed for a lot, they cannot be blamed for the
>"crippling" of the web. Remember that Bill Gates initialized missed the
>Internet bandwagon completely.
Yes, but they caught up by now. IE is the dominant browser now, and I
know of many (low tech) companies, who refuse anything else but a
Microsoft server for their company web site; buggy and non-conformant as
they are.
--
Bart.
------------------------------
Date: Thu, 15 Jun 2000 11:36:13 +0200
From: "Reto H." <no_spam_4me_cut_here_retoh@dplanet.ch>
Subject: need recommended Perl hosting urgently
Message-Id: <8ia7ub$595$1@pacifica.access.ch>
specific must requirements:
- MIME::Lite
- DBI:CSV
- Redirection for ErrorDocument 404
- access to error log
- web statistc
- access to own crontab
- ssh
- very nice to have: MySQL
and now the most imporant and critical:
- Stable environment
- Reliability. Smooth trouble free operation
- Qualified support
ready to pay up to $90 per month for shared hosting
Hope, there's an ISP on this planet ;-)
------------------------------
Date: Thu, 15 Jun 2000 09:04:35 GMT
From: Jeremy Gurney <c4jgurney@my-deja.com>
Subject: Re: OLE and CGI ?? Not working !
Message-Id: <8ia66s$eq9$1@nnrp1.deja.com>
In article <8i8rr5$gjv$1@nnrp1.deja.com>,
rrubin@rotor.net wrote:
> Hello,
>
> I am trying to run a CGi script that performs a certain function
> using OLE. The script runs great from the command line but once I
> embed the CGI calls into the script it doesn't work.
>
> I am currently running this on WIndows NT and
> Personal Web Server.
>
The thing which catches most people out here is when you're running the
web server as a service. If the service is running under the localsystem
account your CGIs can use OLE but can't access NT networks, however if
the service is running under a user account it can access the network
but can't use OLE.
If you're not running PWS as a service then the OLE should work just
fine.
The following should work as a minimal test of OLE if excel is installed
and should print 0 is there are no problems. Just wrap it up in a CGI
and give it a whirl.
use Win32::OLE;
$ex = Win32::OLE->new('Excel.Application', sub {$_[0]->Quit;});
print Win32::OLE->LastError();
undef $ex;
Cheers,
Jeremy Gurney
SAS Systems Analyst | Protherics Molecular Design Ltd.
"When everything is coming your way, you're in the wrong lane."
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 15 Jun 2000 10:37:08 +0100
From: nja@le.ac.uk (A.J. Norman)
Subject: Re: Pattern matching - case sensitive/insensitive
Message-Id: <8ia844$1udd@owl.le.ac.uk>
In article <slrn8kfbfb.76b.garcia_suarez@rafael.kazibao.net>, Rafael
Garcia-Suarez <garcia_suarez@hotmail.com> wrote:
> Note that allowing any pattern from user input can be a major
> security hole. Don't use that in CGI programs.
As a point of interest, I have played around with this on a couple of
servers and looked at a couple of FAQs (Lincoln Stein's and a very
old one by Tom Christiansen) and it appears that provided I have
taint checking turned on (which I do these days as a matter of
course) pattern matching should be safe - and even in the absence of
taint checking it should be safe provided I don't use eval(). Are
there any other potential loopholes in allowing users to specify a
pattern to be matched?
--
Andrew Norman, Leicester, England
nja@le.ac.uk || andrew.norman@le.ac.uk
http://www.le.ac.uk/engineering/nja/
------------------------------
Date: Thu, 15 Jun 2000 09:51:31 GMT
From: vivekvp <vivekvp@spliced.com>
Subject: Protect and HTML page?
Message-Id: <8ia8uu$gou$1@nnrp1.deja.com>
Is there any wayt to protect and HTML page with perl so that only
authorized people can view it.
I was thinking of just rewriting the html out be outputted by perl - and
changed permissions - but this would mean one would have to login into
my site. There is not logging into my site on the web! I only want
to protect 1 page.
Any ideas?
Thanks,
V
--
He who fights and runs away, lives to run another day!
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 15 Jun 2000 07:04:17 GMT
From: dha@panix.com (David H. Adler)
Subject: Re: Recruiting for a perl CGI expert
Message-Id: <slrn8kgvvh.a82.dha@panix2.panix.com>
On Fri, 9 Jun 2000 14:26:10 +1000, Russell Banks
<russellb@decideinteractive.com> wrote:
>If you fit the following job description, please contact us by email
You have posted a job posting or a resume in a technical group.
Longstanding Usenet tradition dictates that such postings go into
groups with names that contain "jobs", like "misc.jobs.offered", not
technical discussion groups like the ones to which you posted.
Had you read and understood the Usenet user manual posted frequently
to "news.announce.newusers", you might have already known this. :)
Please do not explain your posting by saying "but I saw other job
postings here". Just because one person jumps off a bridge, doesn't
mean everyone does. Those postings are also in error, and I've
probably already notified them as well.
If you have questions about this policy, take it up with the news
administrators in the newsgroup news.admin.misc.
There is a Perl Jobs Announce list that may be more helpful to you. See
<http://www.pm.org/mailing_lists.shtml> for details.
Yours for a better usenet,
dha
--
David H. Adler - <dha@panix.com> - http://www.panix.com/~dha/
This is Pop - XTC
------------------------------
Date: Thu, 15 Jun 2000 07:14:05 GMT
From: elephant@squirrelgroup.com (jason)
Subject: Re: Script to calculate a future date?
Message-Id: <MPG.13b31f6faa0fc934989738@news>
[ jeopardy style posting corrected ]
mike solomon writes ..
>René Hertell <news@hertell.remove.t_h_i_s.com> wrote in message
>news:8i81lr$obd$1@tron.sci.fi...
>> Hi!
>> I'm new to perl, and I would need help with calculating a future date.
>> e.g.
>> 14.06.2000 + 14 would return 28.06.2000
>> 28.06.2000 + 4 would return 02.07.2000
>> 28.12.2000 + 4 would return 01.01.2001
>>
>> can someone help me with this, e.g. if you know where I could find a ready
>> script for this purpose
>
>try using module Date:Manip
>
>this allows you to do all sorts of date manipulation
while Date::Manip is an excellent module for dealing with a wide variety
of date parsing and calculation tasks .. it is certainly not the best
choice for such a limited set of functions as specified by the
originator
you'd do yourself a favour mike to have a read of the "SHOULD I USE
DATE::MANIP" section of the Date::Manip docs .. the author's own words
is that 90% of the time there's a better choice than Date::Manip - I
have found this to be fairly accurate in my experience also
--
jason - elephant@squirrelgroup.com -
------------------------------
Date: 15 Jun 2000 08:49:05 GMT
From: Steffen Beyer <sb@muccpu1.muc.sdm.de>
Subject: Re: Script to calculate a future date?
Message-Id: <8ia5a1$mg6$2@solti3.sdm.de>
In article <MPG.13b31f6faa0fc934989738@news>, jason <elephant@squirrelgroup.com> wrote:
>>> I'm new to perl, and I would need help with calculating a future date.
>>> e.g.
>>> 14.06.2000 + 14 would return 28.06.2000
>>> 28.06.2000 + 4 would return 02.07.2000
>>> 28.12.2000 + 4 would return 01.01.2001
>>
>>try using module Date:Manip
> while Date::Manip is an excellent module for dealing with a wide variety
> of date parsing and calculation tasks .. it is certainly not the best
> choice for such a limited set of functions as specified by the
> originator
> you'd do yourself a favour mike to have a read of the "SHOULD I USE
> DATE::MANIP" section of the Date::Manip docs .. the author's own words
> is that 90% of the time there's a better choice than Date::Manip - I
> have found this to be fairly accurate in my experience also
Besides Perl's built-in localtime() function and the Time::Local module, you
might want to have a look a Date::Calc, which is written in C internally
for greater speed. See
http://www.perl.com/CPAN/modules/by-module/Date/Date-Calc-4.3.tar.gz
http://www.engelschall.com/u/sb/download/pkg/Date-Calc-4.3.tar.gz
http://www.engelschall.com/u/sb/download/pkg/Date-Calc-4.4.tar.gz (beta)
Every of the many Date::* and Time::* modules has its own niche where it
outplays the others...
So you have to choose the one that best suits your needs.
Good luck!
--
Steffen Beyer <sb@engelschall.com>
http://www.engelschall.com/u/sb/whoami/ (Who am I)
http://www.engelschall.com/u/sb/gallery/ (Fotos Brasil, USA, ...)
http://www.engelschall.com/u/sb/download/ (Free Perl and C Software)
------------------------------
Date: 15 Jun 2000 08:22:58 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Syntax checker
Message-Id: <8ia08i$id2$1@orpheus.gellyfish.com>
On Tue, 13 Jun 2000 17:52:39 -0500 Barry Grupe wrote:
>
>> Yes.
>>
>> perldoc perlrun
>>
>>
>> It is called "perl" :-)
>>
>> perl -cw my_script
>
> Try that with a 50K program that you left out a '}' in. EOF errors are no
> help. :-)
Thats why people use editors that can show matched brackets.
/J\
--
** This space reserved for venue sponsor for yapc::Europe **
<http://www.yapc.org/Europe/>
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
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: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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 V9 Issue 3367
**************************************
