[13571] in Perl-Users-Digest
Perl-Users Digest, Issue: 981 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Oct 4 11:07:14 1999
Date: Mon, 4 Oct 1999 08:05:10 -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: <939049509-v9-i981@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 4 Oct 1999 Volume: 9 Number: 981
Today's topics:
Email Attachments <ian@a38.com>
Re: Email Attachments (Bill Moseley)
Re: Email Attachments <BurtHwangSPAMSUCKS@SPAMSUCKS.ufsltd.com>
Re: Email Attachments (I.J. Garlick)
Embedding perl with Dynaloader <bob_copeland@muntz.intercept.com>
Help: Permission Denied when trying to create a file f <nobody@newsfeeds.com>
Re: Help: Permission Denied when trying to create a fil (Bill Moseley)
Re: Help: Permission Denied when trying to create a fil <nobody@newsfeeds.com>
Re: how to invoke DUN from perl? tony_barratt@my-deja.com
Re: Input/output from programs <jeffp@crusoe.net>
Loading code at run-time <tekwiz@home.com>
Re: Loading code at run-time <gellyfish@gellyfish.com>
New posters to comp.lang.perl.misc <gbacon@cs.uah.edu>
Re: Newbie question: Installing XEmacs packages under w <h.l.miller@fz-juelich.de>
NewsClipper Script skorpion84@my-deja.com
Re: Perl - SQL examples <mpeppler@peppler.org>
perl -v gives warning message staffan.gustavsson@xray.gu.se
Re: perl -v gives warning message <rhomberg@ife.ee.ethz.ch>
Re: Perl IDE for X <a007@most.ru>
Re: Perl5.0/Perl4.0 (Randal L. Schwartz)
Re: Perl5.0/Perl4.0 <halfdan@no-junkmail-please.pison.com>
reading multiple line's ??? <sorry@geen.nl>
Re: Regexp question (Eric Bohlman)
Re: return ? byoodeja@my-deja.com
Re: Schnelle Bearbeitung von HTML-Seiten (Abigail)
Re: Schnelle Bearbeitung von HTML-Seiten (Larry Rosler)
Seem to be getting substring instead of array element <jb4mt@verbatims.com>
Re: Seem to be getting substring instead of array eleme <halfdan@no-junkmail-please.pison.com>
Re: Sending to a port <crt@kiski.net>
Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
Re: Testing a String <jeffp@crusoe.net>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 4 Oct 1999 13:13:37 +0100
From: "Ian Bertie" <ian@a38.com>
Subject: Email Attachments
Message-Id: <7ta5pd$ma9$1@lure.pipex.net>
I am trying to attach a file to a html form, but when I submit the form all
that gets sent is the path to the file, and not the file itself. I cannot
seem to get my email perl program to attach the file. Can anyone help.
Thanks Ian.
------------------------------
Date: Mon, 4 Oct 1999 06:39:41 -0700
From: moseley@best.com (Bill Moseley)
Subject: Re: Email Attachments
Message-Id: <MPG.12624dfb9b66c9689897c9@206.184.139.132>
Ian Bertie (ian@a38.com) seems to say...
>
> I am trying to attach a file to a html form, but when I submit the form all
> that gets sent is the path to the file, and not the file itself. I cannot
> seem to get my email perl program to attach the file. Can anyone help.
Ian,
Here's what you need:
sub attache_file_to_html {
my $form = read_html();
$form .= attach_file();
# No do the work
mail_form( $form ) if submit();
}
How do you think anyone can help with the amount of info you provided?
--
Bill Moseley mailto:moseley@best.com
pls note the one line sig, not counting this one.
------------------------------
Date: Mon, 4 Oct 1999 10:31:57 -0400
From: "Burt Hwang" <BurtHwangSPAMSUCKS@SPAMSUCKS.ufsltd.com>
Subject: Re: Email Attachments
Message-Id: <cT2K3.607$GH4.1594@client>
Ian Bertie wrote in message <7ta5pd$ma9$1@lure.pipex.net>...
>
>I am trying to attach a file to a html form, but when I submit the form all
>that gets sent is the path to the file, and not the file itself. I cannot
>seem to get my email perl program to attach the file. Can anyone help.
>
>Thanks Ian.
>
>
Ian,
I actually had the same problem recently. Instead of making everyone repeat
themselves, you should try to do a search on deja.com first. I tried
searching first but it didn't answer my question so I asked the experts at
CLPM.
But now you have the luxury of doing a search on deja and will actually find
something useful. Look for subject "File Upload". "CGI sending email with
attachment" may help too.
BTW, thanks everyone who helped me.
-Burt
------------------------------
Date: Mon, 4 Oct 1999 14:27:05 GMT
From: ijg@connect.org.uk (I.J. Garlick)
Subject: Re: Email Attachments
Message-Id: <FJ31H5.8Fs@csc.liv.ac.uk>
In article <7ta5pd$ma9$1@lure.pipex.net>,
"Ian Bertie" <ian@a38.com> writes:
>
> I am trying to attach a file to a html form, but when I submit the form all
> that gets sent is the path to the file, and not the file itself. I cannot
> seem to get my email perl program to attach the file. Can anyone help.
Err.. you are using CGI.pm for this?
If so what you get back is the full path name of the file AND a filehandle
or at least a way of getting at the full file in memory. (I did this a
while ago), it depends on the context you use it in as to what your
actually accessing at any given time.
You need to read and inwardly digest the relevant part of CGI.pm docs
(perldoc CGI followed by '/upload' should work) then try a couple of test
scripts to make sure your getting what you expect and you have understood
things.
You are using multipart forms aren't you? And your not trying this with
ie3? various versions (unpatched) are known to be broken.
--
Ian J. Garlick
ijg@csc.liv.ac.uk
You probably wouldn't worry about what people think of you if you could
know how seldom they do.
-- Olin Miller.
------------------------------
Date: Mon, 04 Oct 1999 14:01:20 GMT
From: Bob Copeland <bob_copeland@muntz.intercept.com>
Subject: Embedding perl with Dynaloader
Message-Id: <Qq2K3.418$GH4.1345@client>
Hi all,
I've read the perlembed and perlfaq pages and can't find this
discussed, so I'm wondering if anyone else has run into this.
I'm embedding Perl on Solaris in my application. Perl works.
Modules, however, don't. We are linking with a command line
like this:
gcc -o executable f1.a f2.a f3.a f4.a -Lpath_to_perl -lperl
/path_to_perl/lib/auto/DynaLoader/DynaLoader.a
Where f1..f4 includes all of our code. Main is defined in one of
these and it all makes a working executable. When I try to execute
this script:
---- test.pl
#! /usr/bin/perl
use IO;
print "hello from perl!\n";
----
I get the following error:
Can't load '/usr/local/lib/perl5/5.00503/sun4-solaris/auto/IO/IO.so' for module IO: ld.so.1: ./pantheon.perl_sl: fatal: relocation error: file /usr/local/lib/perl5/5.00503/sun4-solaris/auto/IO/IO.so: symbol main: referenced symbol not found at /usr/local/lib/perl5/5.00503/sun4-solaris/DynaLoader.pm line 169.
at /usr/local/lib/perl5/5.00503/sun4-solaris/IO/Handle.pm line 248
BEGIN failed--compilation aborted at /usr/local/lib/perl5/5.00503/sun4-solaris/IO.pm line 29.
BEGIN failed--compilation aborted at /kramer2/run.pl line 8.
However, if instead I have gcc use the Solaris linker instead of GNU ld, it
works:
gcc -B/usr/ccs/bin/ -o executable f1.a f2.a f3.a f4.a -Lpath_to_perl -lperl
/path_to_perl/lib/auto/DynaLoader/DynaLoader.a
Output:
hello from perl!
On HP-UX, I get a different error, using the vendor linker:
Can't find 'boot_IO' symbol in /opt/perl5/lib/5.00503/PA-RISC1.1/auto/IO/IO.sl
at /opt/perl5/lib/5.00503/PA-RISC1.1/IO/Handle.pm line 248
BEGIN failed--compilation aborted at /opt/perl5/lib/5.00503/PA-RISC1.1/IO.pm line 29.
BEGIN failed--compilation aborted at /net/kramer/kramer2/run.pl line 8.
We've had the same code produce a working binary before, but are rewriting
our build system. Yes, there is an xs_init() glue routine:
static void xs_init()
{
char *file = __FILE__ ;
dXSUB_SYS;
newXS("DynaLoader::boot_DynaLoader",boot_DynaLoader,file);
}
I find linkers pretty mysterious beasts, but I can't fathom how the
different linkers would affect the Dynaloader at all.
Any help would be appreciated!!
--
Bob Copeland %% bob_copeland@intercept.com
Software Engineer %% http://www.intercept.com
Intercept Technology Inc. %% 404-352-0111 fax: 404-352-3744
------------------------------
Date: Mon, 4 Oct 1999 14:18:49 +0100
From: Anonymous <nobody@newsfeeds.com>
Subject: Help: Permission Denied when trying to create a file for output
Message-Id: <37f8ab16.0@tahiti.alcom.co.uk>
Could someone tell me how to write data to a text file that is not in my
cgi-bin directory?
I have a cgi-script which, when run, creates a file in a different directory
using a unique name.
Whenever I try and open this new filename for output I get the Permission
Denied error.
My cgi script is stored in:
variousserverdirectories/cgi-bin
and the file it is attempting to write is in:
variousserverdirectories/htdocs/settings
What would the path be to access the file?
I am using /variousserverdirectories/htdocs/settings/filename
The "settings" dir has the permissions set to 766. What else do I need to
do?
Is there some other setting that the sys admin needs to set on the Apache
web server?
Note: this Perl script is running on the web. Is it something to do with
the nobody permissions?
PS: This is my first script and I'm reasonable new to Linux as well. :-)
--------== Posted Anonymously via Newsfeeds.Com ==-------
Featuring the worlds only Anonymous Usenet Server
-----------== http://www.newsfeeds.com ==----------
------------------------------
Date: Mon, 4 Oct 1999 06:34:30 -0700
From: moseley@best.com (Bill Moseley)
Subject: Re: Help: Permission Denied when trying to create a file for output
Message-Id: <MPG.12624cc0242e63e59897c8@206.184.139.132>
Anonymous (nobody@newsfeeds.com) seems to say...
> Could someone tell me how to write data to a text file that is not in my
> cgi-bin directory?
Sure. I sent the answer to you by email. Hope it helps.
> --------== Posted Anonymously via Newsfeeds.Com ==-------
--
Bill Moseley mailto:moseley@best.com
pls note the one line sig, not counting this one.
------------------------------
Date: Mon, 4 Oct 1999 15:30:24 +0100
From: Anonymous <nobody@newsfeeds.com>
Subject: Re: Help: Permission Denied when trying to create a file for output
Message-Id: <37f8bbdc.0@tahiti.alcom.co.uk>
Haven't received it as yet. Must be floating around the ether. :-)
Bill Moseley <moseley@best.com> wrote in message
news:MPG.12624cc0242e63e59897c8@206.184.139.132...
> Anonymous (nobody@newsfeeds.com) seems to say...
> > Could someone tell me how to write data to a text file that is not in my
> > cgi-bin directory?
>
> Sure. I sent the answer to you by email. Hope it helps.
>
>
> > --------== Posted Anonymously via Newsfeeds.Com ==-------
>
> --
> Bill Moseley mailto:moseley@best.com
> pls note the one line sig, not counting this one.
--------== Posted Anonymously via Newsfeeds.Com ==-------
Featuring the worlds only Anonymous Usenet Server
-----------== http://www.newsfeeds.com ==----------
------------------------------
Date: Mon, 04 Oct 1999 12:13:37 GMT
From: tony_barratt@my-deja.com
Subject: Re: how to invoke DUN from perl?
Message-Id: <7ta5la$s5b$1@nnrp1.deja.com>
In article <Q7=zNxH5l+AvylnXwPPryns2eaDQ@4ax.com>,
jdrumm@blazenetme.net wrote:
> [posted to comp.lang.perl.misc and mailed]
>
> On Wed, 29 Sep 1999 13:09:47 GMT, tony_barratt@my-deja.com wrote:
>
> >Hi list,
>
> Hello, scalar.
very amusing, I had to laff.
>
> >I'm running active state perl 519 on W98, and NT. What I want to do
is
> >to invoke a pre-defined connection defined in DUN so as to cause a
dial-
> >out to a RAS access number (so I can do a Net::Ping to various
hosts).
> >I thought that might be easy, and perhaps it is, just that I don't
know
> >how to do it...
> >I suppose if it was possible to invoke a connection with a Start.Run,
> >then I could use a system("mi_coomand"). But maybe the answer llies
in
> >the Win32 api?
> >If i get stuck I guess I could install RAS on NT, and not use the
W98,
> >and cause a dial-out with a ping to a remote IP address (associated
> >with a phone num in RAS) but that's not really what i want to do.
>
> Pretty much the same way you would from just about any other scripting
> language, which means this really isn't a Perl question. But I'm
feeling
Well it was intended to be a perl question, I fondly imagined that
there might be a module with all the bits and pieces such as numeric
err codes mapped to humanreadable strings, maybe a few time outs and
retries, plus maybe an alternative to just a system call.
> charitable today, so I'll give you a place to start:
>
> http://support.microsoft.com/support/kb/articles/Q145/7/40.asp
>
> It took me less than a minute to locate this on Microsoft's support
site.
I'd already found, and read, that, ta (doesn't offer too much insight
into how to do it under NT, does it? - yeah ok try rasdial /? on the
commandline).
I sortof thought too that BG and motley crew might be more interested
in a VB6 approach).
>
> What's your excuse?
Too much tea in aluminium teapots.
>
> (guess I wasn't really feeling that charitable after all)
Well never mind, but if you are:
1. feeling charitable
2. able to comment from a perl perspective
don't be shy, feel free to contribute..
>
> --
> - Jeff Drumm
> "So what are YOU doing on 00/01/100?"
>
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 4 Oct 1999 07:25:08 -0400
From: Jeff Pinyan <jeffp@crusoe.net>
Subject: Re: Input/output from programs
Message-Id: <Pine.GSO.4.10.9910040721590.14462-100000@crusoe.crusoe.net>
[posted & mailed]
On Oct 4, Paul Walker blah blah blah:
> I'd like to be able to spawn/system/whatever a program from a perl
> script, then both get input from it and write data to it (to control
> what it's doing).
use IPC::Open2;
open2(\*READ, \*WRITE, "program", "arg1", "arg2") or
die "can't run program: $!";
print WRITE "...\n";
chomp($ans = <READ>);
close READ;
close WRITE;
If you don't have IPC::Open2, get thee to CPAN (URL below, just strip off
everything after "CPAN/").
--
jeff pinyan japhy@pobox.com
perl stuff japhy+perl@pobox.com
CPAN ID: PINYAN http://www.perl.com/CPAN/authors/id/P/PI/PINYAN
------------------------------
Date: Mon, 04 Oct 1999 13:13:22 GMT
From: "Robert Young" <tekwiz@home.com>
Subject: Loading code at run-time
Message-Id: <SJ1K3.6916$Vg4.275523@news1.rdc2.on.home.com>
I am interested in knowing the technique for loading new code at runtime.
Specifically, the port to SCO UNIX that I have does not have many of the
very nice modules that are included in the resource kit (not in the source
code either), such as the DateCalc and the DateManip modules.
I have inferred from reading, that it should be possible from compiling and
linking the source provided with the resource kit, to use these moduleks at
runtime but haven't been able to figure it out yet. Could someone please
give me a hand with this?
------------------------------
Date: 4 Oct 1999 15:38:39 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Loading code at run-time
Message-Id: <37f8bbef_2@newsread3.dircon.co.uk>
Robert Young <tekwiz@home.com> wrote:
> I am interested in knowing the technique for loading new code at runtime.
> Specifically, the port to SCO UNIX that I have does not have many of the
> very nice modules that are included in the resource kit (not in the source
> code either), such as the DateCalc and the DateManip modules.
>
> I have inferred from reading, that it should be possible from compiling and
> linking the source provided with the resource kit, to use these moduleks at
> runtime but haven't been able to figure it out yet. Could someone please
> give me a hand with this?
>
Sorry I'm not quite sure what you mean - I use SCO at work and have built
perl and installed several modules - what specific problems are you having ?
/J\
--
"Killing myself is the last thing I'd ever do" - Homer Simpson
------------------------------
Date: 4 Oct 1999 14:55:55 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: New posters to comp.lang.perl.misc
Message-Id: <7taf5r$7dn$2@info2.uah.edu>
Following is a summary of articles from new posters spanning a 7 day
period, beginning at 27 Sep 1999 15:38:11 GMT and ending at
04 Oct 1999 07:59:19 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^\s{0,3}(?:>|:|\S+>|\+\+)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" email address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Find the News-Scan distribution on the CPAN!
<URL:http://www.perl.com/CPAN/modules/by-module/News/>
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
- Copyright (c) 1999 Greg Bacon.
Verbatim copying and redistribution is permitted without royalty;
alteration is not permitted. Redistribution and/or use for any
commercial purpose is prohibited.
Totals
======
Posters: 233 (46.3% of all posters)
Articles: 361 (22.9% of all articles)
Volume generated: 579.6 kb (19.8% of total volume)
- headers: 264.8 kb (5,447 lines)
- bodies: 306.2 kb (10,198 lines)
- original: 211.2 kb (7,636 lines)
- signatures: 8.3 kb (179 lines)
Original Content Rating: 0.690
Averages
========
Posts per poster: 1.5
median: 1 post
mode: 1 post - 176 posters
s: 1.8 posts
Message size: 1644.2 bytes
- header: 751.1 bytes (15.1 lines)
- body: 868.5 bytes (28.2 lines)
- original: 599.2 bytes (21.2 lines)
- signature: 23.6 bytes (0.5 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
19 26.7 ( 12.2/ 14.4/ 7.5) mah@everybody.org (Mark A. Hershberger)
12 20.7 ( 7.7/ 9.8/ 7.2) hennessy@cloud9.net (Mathew A. Hennessy)
7 13.4 ( 5.6/ 7.9/ 4.5) "Paul J. Lucas" <pjl@NOSPAM.com>
6 8.7 ( 4.9/ 3.8/ 3.3) sam@samredman.com
6 26.8 ( 5.1/ 21.7/ 9.3) "Eric Seiler" <Webmaster@copscorp.com>
6 9.7 ( 4.7/ 5.0/ 2.6) sushant@eplastic.com
5 7.5 ( 3.3/ 4.2/ 2.1) David Wozmak <dwozmak@rational.com>
4 4.7 ( 3.0/ 1.7/ 0.9) tiiger@my-deja.com
4 4.4 ( 2.0/ 2.3/ 2.1) jmn.ac.delete@abanet.it
4 5.3 ( 2.9/ 2.4/ 1.5) "Campos" <nospam@thankyou.com>
These posters accounted for 4.6% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
26.8 ( 5.1/ 21.7/ 9.3) 6 "Eric Seiler" <Webmaster@copscorp.com>
26.7 ( 12.2/ 14.4/ 7.5) 19 mah@everybody.org (Mark A. Hershberger)
20.7 ( 7.7/ 9.8/ 7.2) 12 hennessy@cloud9.net (Mathew A. Hennessy)
13.4 ( 5.6/ 7.9/ 4.5) 7 "Paul J. Lucas" <pjl@NOSPAM.com>
9.7 ( 4.7/ 5.0/ 2.6) 6 sushant@eplastic.com
9.5 ( 3.8/ 5.7/ 2.1) 4 "Fred Reimer" <fwr@ga.prestige.net>
9.1 ( 3.2/ 5.8/ 4.1) 4 Jason Romo <jason@romos.net>
8.8 ( 3.0/ 5.8/ 2.1) 4 "Lin Parkh" <lparkh1@ix.netcom.com>
8.7 ( 4.9/ 3.8/ 3.3) 6 sam@samredman.com
7.5 ( 3.3/ 4.2/ 2.1) 5 David Wozmak <dwozmak@rational.com>
These posters accounted for 4.8% of the total volume.
Top 10 Posters by OCR (minimum of three posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.949 ( 3.8 / 4.0) 3 Vincent Murphy <vincent.murphy@cybertrust.gte.com>
0.897 ( 2.1 / 2.3) 4 jmn.ac.delete@abanet.it
0.874 ( 3.3 / 3.8) 6 sam@samredman.com
0.734 ( 7.2 / 9.8) 12 hennessy@cloud9.net (Mathew A. Hennessy)
0.698 ( 4.1 / 5.8) 4 Jason Romo <jason@romos.net>
0.649 ( 1.4 / 2.2) 3 alex_rayan@my-deja.com
0.611 ( 1.5 / 2.4) 4 "Campos" <nospam@thankyou.com>
0.575 ( 4.5 / 7.9) 7 "Paul J. Lucas" <pjl@NOSPAM.com>
0.551 ( 2.3 / 4.2) 4 John P Walsh <walsh@averstar.com>
0.548 ( 1.7 / 3.1) 4 necr0mancer@myremarq.com (Necromancer)
Bottom 10 Posters by OCR (minimum of three posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.518 ( 7.5 / 14.4) 19 mah@everybody.org (Mark A. Hershberger)
0.510 ( 2.1 / 4.2) 5 David Wozmak <dwozmak@rational.com>
0.493 ( 1.2 / 2.5) 3 Martin Fitzpatrick <poohsticks@bonbon.net>
0.475 ( 1.5 / 3.1) 3 jand@activestate.com (Jan Dubois)
0.427 ( 9.3 / 21.7) 6 "Eric Seiler" <Webmaster@copscorp.com>
0.371 ( 2.1 / 5.8) 4 "Lin Parkh" <lparkh1@ix.netcom.com>
0.371 ( 2.1 / 5.7) 4 "Fred Reimer" <fwr@ga.prestige.net>
0.342 ( 1.1 / 3.3) 4 Chicheng Zhang <Chicheng_Zhang-P29601@email.mot.com>
0.297 ( 1.0 / 3.4) 3 jim.usenet@bokler.com
0.225 ( 0.4 / 1.9) 3 mistral@stevenson.zetnet.co.uk
22 posters (9%) had at least three posts.
Top 10 Crossposters
===================
Articles Address
-------- -------
6 tiiger@my-deja.com
4 "Jeremy Bradshaw" <xbradsjer@dtgnet.com>
3 mah@everybody.org (Mark A. Hershberger)
2 "Eric Seiler" <Webmaster@copscorp.com>
2 "Marco Cerqui" <marco.cerqui@alcatel.ch>
2 jeff@riverstyx.net (Jeff Magnusson)
2 PEZ <pez68@my-deja.com>
1 knok@daionet.gr.jp (NOKUBI Takatsugu)
1 Robert Rothenburg <wlkngowl@unix.asb.com>
1 "Steven Hildreth" <sphildreth@hotmail.com>
------------------------------
Date: Mon, 04 Oct 1999 12:59:17 +0200
From: "Henry LeRoy Miller, Jr." <h.l.miller@fz-juelich.de>
Subject: Re: Newbie question: Installing XEmacs packages under windows NT
Message-Id: <37F88870.8DD48E38@fz-juelich.de>
> Then I wanted to use XEmacs to edit my perl scripts, and
> then I found out that perl support is not available, so I
> figured out that I need to download the perl support
> package. At first, I tried to use the "package update" from
> XEmacs itself, only to be faced with all the problems with
> FTP/WindowsNT/Cygwin/XEmacs. So I thought I revert to the
> other manual method and get the archives myself. Once again,
> I had hard times trying to locate the proper perl package.
>
> If anyone knows what is the proper module, where to get it
> and where to unzip ti, then I will be very grateful.
In the unix world, uzip it in /usr/local/lib/xemacs (for default
installations). This then creates a directory ./xemacs-packages, which
contains the lisp, man, etc, pkginfo directories, with appropriate
entries. It also automatically updated my xemacs load path and info dir file.
I don't know about your platform, but perhaps this will help you find
the correct place in your file structure.
Henry Miller
h.l.miller@fz-juelich.de
------------------------------
Date: Mon, 04 Oct 1999 11:03:30 GMT
From: skorpion84@my-deja.com
Subject: NewsClipper Script
Message-Id: <7ta1hv$pfp$1@nnrp1.deja.com>
Has anyone here ever used the NewsClipper Script?
I am trying to install it on my webhost providers machine and I only
have access to my directory. The machine is a BSDI BSD/OS 4.0 and has
perl5. I would like to know how to install single-user access only.
What permissions do I have to set on the files for the script to get it
to work. You can email me at revned@gis.net
Thanks,
Revned
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 04 Oct 1999 07:47:01 -0700
From: Michael Peppler <mpeppler@peppler.org>
Subject: Re: Perl - SQL examples
Message-Id: <37F8BDE5.7F868314@peppler.org>
Abigail wrote:
>
> Michael Peppler (mpeppler@peppler.org) wrote on MMCCXXI September
> MCMXCIII in <URL:news:37F36F62.BE033730@peppler.org>:
> ||
> || Correct. DBI/DBD is definitely the way to go if you need portability to
> || other database engines.
> ||
> || If not - well I just wanted to correct any misconception that sybperl was
> || old/antique code.
>
> I've always used sybperl to great satisfaction myself. When I started
> using it, sybperl was mature, and DBI::Sybase either very young, or
> non-existing yet.
>
> sybperl works very well, and because it's just glue to the Sybase libraries,
> you can use the Sybase documentation. ;-)
That was at least a good part of the reason why I didn't want to create a whole
new API. Using the Sybase API meant I didn't have to write so much documentation...
Of course I originally figured that most perl programmers would know C, and would
be familiar with Sybase's DBlibrary or Client Library APIs from coding C, but that
has turned out to be wishfull thinking :-)
But the Sybase docs are still *very* good in explaining how the sybperl API
works, and are available on line at http://sybooks.sybase.com (look in the "middleware"
section.)
Michael
--
Michael Peppler -||- Data Migrations Inc.
mpeppler@peppler.org -||- http://www.mbay.net/~mpeppler
Int. Sybase User Group -||- http://www.isug.com
Sybase on Linux mailing list: ase-linux-list@isug.com
------------------------------
Date: Mon, 04 Oct 1999 10:15:58 GMT
From: staffan.gustavsson@xray.gu.se
Subject: perl -v gives warning message
Message-Id: <7t9uoq$nrh$1@nnrp1.deja.com>
Hi !
I just got Linux (Mandrake6.0/KDE) running on my home-PC.
Purpose = to do some simple Perl/PHP scripting and test before
shipping it to our Intranetserver at my work (which is run by
professional Solaris gurus....:-).
Problem 1:
Perl should be installed and seems to be (?) but the
perl -v command returns:
perl: warning: Setting locale failed.
perl: warning: Please check that your locale settings:
LANGUAGE = (unset),
LC_ALL = "se_SE",
LANG = "se"
are supported and installed on your system.
perl: warning: Falling back to the standard locale ("C").
Tis is perl, version 5.005_03 built for i386-linux....
.......
and it continues with the greeting text (6-7 lines)I read in my
Linux/Perl books for beginners.
Now ....what is the "locale" problem and what do I do?
Problem 2:
I then looked for the most simple test and ran perl in the consol with
this line (that I got from a tutorial in my book- no inventions by
me ..yet..):
perl -e "print Perl installed OK!;"
...and this returned:
bash: !: event not found
Whats wrong?
Do I have to return to mr Gates product line...?
TIA
Staffan
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 04 Oct 1999 14:37:18 +0200
From: Alex Rhomberg <rhomberg@ife.ee.ethz.ch>
To: staffan.gustavsson@xray.gu.se
Subject: Re: perl -v gives warning message
Message-Id: <37F89F7E.4EEF8852@ife.ee.ethz.ch>
[posted and courtesy cc mailed]
staffan.gustavsson@xray.gu.se wrote:
Neither of your problems are related to perl. The first is a linux
problem, take it to Linux people. The second is a syntak error.
> Problem 1:
> Perl should be installed and seems to be (?) but the
> perl -v command returns:
>
> perl: warning: Setting locale failed.
> Now ....what is the "locale" problem and what do I do?
You correct your locale installation. Until you do, use perl and live
with the warning. Linux problem
> perl -e "print Perl installed OK!;"
>
> ...and this returned:
>
> bash: !: event not found
bash tries to replace exclamation marks with past events, see 'man bash'
use single quotes or escape the perl code. Still, the perl code is
incorrect, the text is not quoted.
use different quotes or escape them:
perl -le 'print "Perl installed OK!"' #different quotes
perl -leprint\"Perl\ installed\ OK\!\" #escape stuff
perl -leprint\ q\<Perl\ installed\ OK\!\> #quotes are for wimps
perl -le 'print q{Perl installed OK!}' more different quotes
echo "hallo"|perl -peuc #less special chars
- Alex
------------------------------
Date: Mon, 04 Oct 1999 16:22:56 +0400
From: root <a007@most.ru>
Subject: Re: Perl IDE for X
Message-Id: <37F89C20.13A50B4F@most.ru>
Look at this:
http://www.freshmeat.net/news/1999/10/01/938766715.html
------------------------------
Date: 04 Oct 1999 03:58:38 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: Perl5.0/Perl4.0
Message-Id: <m1r9jbqtnl.fsf@halfdome.holdit.com>
>>>>> "Francois" == Francois Dupradeau <fyd@u-picardie.fr> writes:
Francois> Dear All,
Francois> I am a new perl user.
Francois> I did a perl script with perl5 under linux (redhat 5.2)
Francois> I would like to use it in same time with perl 4 under Irix 6.3 (SGI).
No you wouldn't. :)
Perl4 is long dead. It's nice that it had existed in the past, but
Perl5 turns *five years old* in a few weeks. Perl4.036 was released
nearly *seven years ago*. Don't you think it's time to retire *seven
year old* software in favor of software that's less than *five years
old*?
It's a bit like you're asking "how do I get this CD-ROM into my
floppy drive?". Get with the late 90's, before they're gone! :)
print "Just another Perl hacker,"
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Mon, 04 Oct 1999 15:15:01 +0100
From: Halfdan Ingvarsson <halfdan@no-junkmail-please.pison.com>
Subject: Re: Perl5.0/Perl4.0
Message-Id: <37F8B665.CDD5571D@no-junkmail-please.pison.com>
Francois Dupradeau wrote:
> I would like to use it in same time with perl 4 under Irix 6.3 (SGI).
Go to: http://freeware.sgi.com and get pre-packaged perl5 for SGI. First
uninstall the one that came with the SGI, though.
Ciao,
H.
-==["The only decent thing to do behind a persons back is to pat it"]==-
PisonLtd:IngestreCourt:IngestrePlace:Londres:W1R:3LR:01713436500
Socialism is when man exploits man. Capitalism is the reverse.
------------------------------
Date: Fri, 1 Oct 1999 15:15:24 +0200
From: "MeTAlMollY" <sorry@geen.nl>
Subject: reading multiple line's ???
Message-Id: <7t2foe$b55$1@tasmania.dev.ict.nl>
I'm having a problem, the following is the problem:
I want to read a textfile having different 'keys' and 'values' like (where
'keys' = label and 'values = data) something like this:
label1: data\n
more data\n
even more data\n
label2: data\n
label1: data\n
more data\n
even more data\n
label2: data\n
more data\n
Now i wrote the following perl code piece:
#!perl -w
$/ = "";
open hPRODUCT, "<product.out";
while ($product_file = <hPRODUCT>){
if ($product_file =~ /label1:(.*?)label2:/is){
print "Found: $1\n";
}
}
close hPRODUCT;
This one does a perfect job. But I don't get the idea behind the code, it
sound stupid, but I don't understand how it actually works.
Why must I use $/ =""; for reading in paragraph mode.
I got this piece of code when reading the FAQ from perl.
a push()will do the rest. Is there an other way to do the same?
Greets Mark
------------------------------
Date: 4 Oct 1999 13:59:44 GMT
From: ebohlman@netcom.com (Eric Bohlman)
Subject: Re: Regexp question
Message-Id: <7tabsg$43v@dfw-ixnews5.ix.netcom.com>
Baris Sumengen (sumengen@hotelspectra.com) wrote:
: > Here's one way:
: >
: > s/(")(.*)\1/$2/s;
:
: I am just curious:
: would
: s/(")(.*)$1/$2/s;
: will work the same way?
Nope. Whatever is already in $1 will get interpolated into the regex
*before* trying to match it.
------------------------------
Date: Mon, 04 Oct 1999 12:15:18 GMT
From: byoodeja@my-deja.com
Subject: Re: return ?
Message-Id: <7ta5oe$s70$1@nnrp1.deja.com>
In article <37f4ab96_2@newsread3.dircon.co.uk>,
Jonathan Stowe <gellyfish@gellyfish.com> wrote:
> byoodeja@my-deja.com wrote:
> > In article <pd3dvw1m5z.fsf@baynetworks.com>,
> > Joe Marzot <gmarzot@baynetworks.com> wrote:
> >> byoodeja@my-deja.com writes:
> >>
> >> > Perl gurus out there,
> >> >
> >> >
> >> > What does this return ?
> >> >
> >> > $year = ($birthdate =~ /^(dddd)-(dd)s*$/);
> >
> > $birthdate has form of "YYYY-MM"...1999-03
> > I'm using "param("birthdate") to get the string using CGI.
> > I know that after "param("birthdate"), $birthdate has a string
> > "YYYY-MM".
> >
> > And by reading "perlop", "=~" should return the indication of
operation.
> >
> >
>
> But you didnt read perlre did you ?
>
> ($year,$month) = ($birthdate =~ /^(\d{4})-(\d\d)\s*$/);
>
> OK ?
>
> /J\
> --
> "While we've been on the air we've had reports that Prince Charles has
> eaten beef on the bone" - Justin Webb, BBC One O'Clock News
>
OK..OK..
I'm learning...!
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 4 Oct 1999 06:44:18 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Schnelle Bearbeitung von HTML-Seiten
Message-Id: <slrn7vh58d.chn.abigail@alexandra.delanet.com>
Alex Rhomberg (rhomberg@ife.ee.ethz.ch) wrote on MMCCXXV September
MCMXCIII in <URL:news:37F871B2.8F89F5C7@ife.ee.ethz.ch>:
""
"" I suggest posting english on an english newsgroup next time
"" there exists also de.comp.lang.perl.misc
The english perl newsgroup is "en.comp.lang.perl.misc". This group
is *international*. It just happens to have a majority of posts in
English, to accommedate those with limited language skills.
And while English might give you more responses, that doesn't help
much if you cannot formulate questions properly in English.
Have you also considered the fact that "de.*" isn't part of the
big-8, and hence might have poor propagation?
Abigail
--
perl5.004 -wMMath::BigInt -e'$^V=Math::BigInt->new(qq]$^F$^W783$[$%9889$^F47]
.qq]$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W]
.qq]98$^F76777$=56]);$^U=substr($]=>$|=>5)*(q.25..($^W=@^V))=>do{print+chr$^V
%$^U;$^V/=$^U}while$^V!=$^W'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Mon, 4 Oct 1999 07:51:20 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Schnelle Bearbeitung von HTML-Seiten
Message-Id: <MPG.12625ec26478b42e98a02f@nntp.hpl.hp.com>
In article <37F7ACDF.5F82539F@firemail.de> on Sun, 03 Oct 1999 21:22:07
+0200, Christian Weerts <chw@firemail.de> says...
> ich suche nach einer möglichkeit, in mehreren html-seiten
> gleichzeitig eine(n) bestimmte
>
> Änderung / Link einzufügen. Gibt es da unter perl eine möglichkeit?
perl -w -pi.bak -e 's%(</body>)%<bestimmte Link>$1%i' file1 file2 ...
Lesen Sie bitte `perldoc perlrun`.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Mon, 04 Oct 1999 14:04:40 GMT
From: "George Jempty" <jb4mt@verbatims.com>
Subject: Seem to be getting substring instead of array element
Message-Id: <Yt2K3.568$ry3.6921@news.rdc1.ne.home.com>
Apologies in advance if this is too "newbie", but I'm just getting back into
Perl after a few months off, and only had a few weeks experience anyway. In
any event, the file I'm opening contains the following:
politics|Are you a: Democrat|Republican
religion|Are you a: Catholic|Protestant
but when I execute the following:
open(CHOICES,"textfile");
while (<CHOICES>) {
@quesvals = split(/:/,$_);
@name_lab = split(/|/,$quesvals[0]);
print "$name_lab[0]\n";
}
I get
p
r
Instead of
politics
religion
the latter being what I want. Any pointers as to what I'm doing wrong will
be greatly appreciated; thanks
in advance
George Jempty
------------------------------
Date: Mon, 04 Oct 1999 15:22:01 +0100
From: Halfdan Ingvarsson <halfdan@no-junkmail-please.pison.com>
Subject: Re: Seem to be getting substring instead of array element
Message-Id: <37F8B809.A3024CC9@no-junkmail-please.pison.com>
George Jempty wrote:
> @name_lab = split(/|/,$quesvals[0]);
I think that should be:
@name_lab = split(/\|/,$quesvals[0]);
You need to escape the '|' sign because it's meta for an alternation in
regexp.
Ciao,
H.
-==["The only decent thing to do behind a persons back is to pat it"]==-
PisonLtd:IngestreCourt:IngestrePlace:Londres:W1R:3LR:01713436500
Socialism is when man exploits man. Capitalism is the reverse.
------------------------------
Date: Mon, 4 Oct 1999 05:17:51 -0400
From: "Casey R. Tweten" <crt@kiski.net>
Subject: Re: Sending to a port
Message-Id: <Pine.OSF.4.10.9910040515400.5334-100000@home.kiski.net>
On Mon, 4 Oct 1999 bolleh@my-deja.com wrote:
:Is it possible to make a perl-program that
:1) sends 1-100 parameters to a port
:2) listens for replies and then stores them in a file ?
Yes, you can do this with Perl.
IO::Select should do just fine.
--
Casey R. Tweten Y2K solution
Web Developer (free)
HighVision Associates s/y/k/i;
crt@highvision.com }:o)~
------------------------------
Date: 4 Oct 1999 14:55:54 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <7taf5q$7dn$1@info2.uah.edu>
Following is a summary of articles spanning a 7 day period,
beginning at 27 Sep 1999 15:38:11 GMT and ending at
04 Oct 1999 07:59:19 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^\s{0,3}(?:>|:|\S+>|\+\+)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" email address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Find the News-Scan distribution on the CPAN!
<URL:http://www.perl.com/CPAN/modules/by-module/News/>
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
- Copyright (c) 1999 Greg Bacon.
Verbatim copying and redistribution is permitted without royalty;
alteration is not permitted. Redistribution and/or use for any
commercial purpose is prohibited.
Excluded Posters
================
perlfaq-suggestions\@(?:.*\.)?perl\.com
Totals
======
Posters: 503
Articles: 1579 (716 with cutlined signatures)
Threads: 406
Volume generated: 2931.9 kb
- headers: 1252.4 kb (24,758 lines)
- bodies: 1354.8 kb (42,956 lines)
- original: 889.8 kb (30,746 lines)
- signatures: 323.2 kb (5,348 lines)
Original Content Rating: 0.657
Averages
========
Posts per poster: 3.1
median: 1 post
mode: 1 post - 317 posters
s: 8.7 posts
Posts per thread: 3.9
median: 3.0 posts
mode: 2 posts - 102 threads
s: 5.0 posts
Message size: 1901.4 bytes
- header: 812.2 bytes (15.7 lines)
- body: 878.6 bytes (27.2 lines)
- original: 577.1 bytes (19.5 lines)
- signature: 209.6 bytes (3.4 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
103 167.9 ( 81.2/ 74.1/ 29.8) Jonathan Stowe <gellyfish@gellyfish.com>
103 245.1 (118.2/ 81.6/ 77.6) abigail@delanet.com
68 113.0 ( 55.5/ 49.6/ 29.6) David Cassell <cassell@mail.cor.epa.gov>
61 111.8 ( 38.9/ 65.9/ 40.3) lr@hpl.hp.com (Larry Rosler)
51 87.0 ( 49.3/ 31.6/ 20.8) Tom Phoenix <rootbeer@redcat.com>
31 79.3 ( 29.2/ 40.6/ 21.3) Uri Guttman <uri@sysarch.com>
27 36.8 ( 16.5/ 17.5/ 11.6) moseley@best.com (Bill Moseley)
24 44.7 ( 17.7/ 22.1/ 12.5) kragen@dnaco.net (Kragen Sitaker)
19 26.7 ( 12.2/ 14.4/ 7.5) mah@everybody.org (Mark A. Hershberger)
19 29.1 ( 15.9/ 13.3/ 6.2) Alex Rhomberg <rhomberg@ife.ee.ethz.ch>
These posters accounted for 32.0% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
245.1 (118.2/ 81.6/ 77.6) 103 abigail@delanet.com
220.4 ( 14.2/ 17.9/ 9.7) 16 "Scott Beck" <admin@gatewaysolutions.net>
167.9 ( 81.2/ 74.1/ 29.8) 103 Jonathan Stowe <gellyfish@gellyfish.com>
113.0 ( 55.5/ 49.6/ 29.6) 68 David Cassell <cassell@mail.cor.epa.gov>
111.8 ( 38.9/ 65.9/ 40.3) 61 lr@hpl.hp.com (Larry Rosler)
87.0 ( 49.3/ 31.6/ 20.8) 51 Tom Phoenix <rootbeer@redcat.com>
79.3 ( 29.2/ 40.6/ 21.3) 31 Uri Guttman <uri@sysarch.com>
44.7 ( 17.7/ 22.1/ 12.5) 24 kragen@dnaco.net (Kragen Sitaker)
36.8 ( 19.9/ 16.9/ 13.9) 19 "Alan J. Flavell" <flavell@mail.cern.ch>
36.8 ( 16.5/ 17.5/ 11.6) 27 moseley@best.com (Bill Moseley)
These posters accounted for 39.0% of the total volume.
Top 10 Posters by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.982 ( 1.3 / 1.3) 5 pudge@pobox.com (Chris Nandor)
0.951 ( 77.6 / 81.6) 103 abigail@delanet.com
0.894 ( 11.0 / 12.3) 5 John Callender <jbc@shell2.la.best.com>
0.885 ( 3.2 / 3.6) 9 Michael de Beer <madebeer@igc.apc.org>
0.874 ( 3.3 / 3.8) 6 sam@samredman.com
0.864 ( 9.0 / 10.4) 9 David Amann <dove@synopsys.com>
0.822 ( 13.9 / 16.9) 19 "Alan J. Flavell" <flavell@mail.cern.ch>
0.787 ( 1.5 / 1.9) 7 "Peter Icaza" <picaza@chsi.com>
0.776 ( 0.9 / 1.2) 5 puma@mailandnews.com (Marc)
0.770 ( 7.7 / 10.0) 13 scott@aravis.softbase.com (Scott McMahan)
Bottom 10 Posters by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.485 ( 4.6 / 9.5) 14 mjtg@cus.cam.ac.uk (M.J.T. Guy)
0.470 ( 6.2 / 13.3) 19 Alex Rhomberg <rhomberg@ife.ee.ethz.ch>
0.470 ( 5.1 / 11.0) 8 Greg Bacon <gbacon@cs.uah.edu>
0.455 ( 2.5 / 5.4) 7 Dan Sugalski <dan@tuatha.sidhe.org>
0.439 ( 6.6 / 15.1) 13 anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
0.434 ( 2.9 / 6.7) 16 Tom Briles <sariq@texas.net>
0.429 ( 2.5 / 5.8) 6 ced@bcstec.ca.boeing.com (Charles DeRykus)
0.428 ( 0.8 / 1.8) 5 tech@tburg.net
0.427 ( 9.3 / 21.7) 6 "Eric Seiler" <Webmaster@copscorp.com>
0.402 ( 29.8 / 74.1) 103 Jonathan Stowe <gellyfish@gellyfish.com>
56 posters (11%) had at least five posts.
Top 10 Threads by Number of Posts
=================================
Posts Subject
----- -------
44 Bye Tom? (WAS: Re: injecting "my" varibales into callers scope)
34 Sorting weird numeric data
26 RegEx for html->plain text
19 Please compare and contrast C and Perl.
19 using tr?
17 kill extra white space in a variable
16 Slice in scalar context
15 remove the html tag in the file
15 numeric sort on field 2 in @array...
14 Install CPAN module in ActiveState Windows version of Perl?
These threads accounted for 13.9% of all articles.
Top 10 Threads by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Subject
-------------------------- ----- -------
198.9 ( 5.4/ 5.9/ 2.0) 7 CGI.pm
89.1 ( 42.1/ 43.3/ 23.0) 44 Bye Tom? (WAS: Re: injecting "my" varibales into callers scope)
82.5 ( 32.7/ 42.6/ 27.7) 34 Sorting weird numeric data
43.6 ( 24.0/ 15.6/ 10.4) 26 RegEx for html->plain text
37.0 ( 12.4/ 21.9/ 10.5) 16 Slice in scalar context
30.0 ( 15.5/ 12.7/ 8.8) 15 remove the html tag in the file
29.4 ( 15.0/ 11.9/ 6.9) 19 Please compare and contrast C and Perl.
29.1 ( 16.4/ 9.2/ 5.5) 19 using tr?
28.2 ( 11.7/ 15.8/ 6.7) 14 Install CPAN module in ActiveState Windows version of Perl?
27.7 ( 10.9/ 15.3/ 11.9) 12 a question of buttons
These threads accounted for 20.3% of the total volume.
Top 10 Threads by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.981 ( 15.7/ 16.0) 5 Quoting Strategies and the Jeopardy Game
0.911 ( 4.1/ 4.5) 5 pattern matching problem
0.910 ( 9.3/ 10.2) 6 Validating email addresses.
0.845 ( 4.3/ 5.1) 6 question: cgi-script on server a database on server b
0.820 ( 1.4/ 1.7) 5 looking for robust fast,scalable database engine for e-mail application
0.792 ( 6.3/ 7.9) 11 CGI call CGI?
0.785 ( 0.9/ 1.2) 5 Split() on vertical bar |
0.774 ( 11.9/ 15.3) 12 a question of buttons
0.764 ( 4.3/ 5.6) 8 Proble with chopped filenames from script
0.753 ( 6.5/ 8.7) 10 ActivePerl
Bottom 10 Threads by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.474 ( 3.6 / 7.5) 7 Trouble w/ Regex in ActivePerl for Win32
0.471 ( 2.6 / 5.6) 7 You should be admired, or What does this have to do with Perl?
0.465 ( 4.7 / 10.0) 13 Q: Syntax to open a file in PERL on an NT server
0.437 ( 4.4 / 10.1) 9 Help! How do I set a date field to empty via ODBC?
0.433 ( 8.8 / 20.3) 6 You assume much when you know so little.
0.423 ( 6.7 / 15.8) 14 Install CPAN module in ActiveState Windows version of Perl?
0.361 ( 1.5 / 4.1) 6 Good Perl book
0.353 ( 2.0 / 5.8) 9 File Upload
0.344 ( 2.0 / 5.9) 7 CGI.pm
0.276 ( 2.5 / 9.0) 7 DB_File
101 threads (24%) had at least five posts.
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
25 comp.lang.perl.modules
11 comp.lang.perl.tk
10 comp.lang.perl
10 comp.lang.awk
10 alt.perl
8 alt.html
6 comp.lang.perl.moderated
6 alt.folklore.computers
5 comp.databases.ms-access
4 microsoft.public.outlook.program_forms
Top 10 Crossposters
===================
Articles Address
-------- -------
9 David Cassell <cassell@mail.cor.epa.gov>
6 Jonathan Stowe <gellyfish@gellyfish.com>
6 "Alan J. Flavell" <flavell@mail.cern.ch>
6 tiiger@my-deja.com
4 "Jeremy Bradshaw" <xbradsjer@dtgnet.com>
4 kragen@dnaco.net (Kragen Sitaker)
4 gazelle@interaccess.com
4 ebohlman@netcom.com (Eric Bohlman)
3 "Harlan Carvey, CISSP" <carvdawg@patriot.net>
3 Tom Phoenix <rootbeer&pfaq*finding*@redcat.com>
------------------------------
Date: Mon, 4 Oct 1999 07:21:52 -0400
From: Jeff Pinyan <jeffp@crusoe.net>
Subject: Re: Testing a String
Message-Id: <Pine.GSO.4.10.9910040720260.14462-100000@crusoe.crusoe.net>
[posted & mailed]
On Oct 4, Marco Cerqui blah blah blah:
> Everybody knows the rules for the passwords -> Minumum 6 Characters, minumum
> 2 digits and and and....
You can "hack" (poor choice of word) together your own test, with
conditional statements such as these:
if (length($passwd) >= 6 and $passwd =~ tr/0-9// >= 2 and ...){
print "your password is valid.\n";
}
--
jeff pinyan japhy@pobox.com
perl stuff japhy+perl@pobox.com
CPAN ID: PINYAN http://www.perl.com/CPAN/authors/id/P/PI/PINYAN
------------------------------
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 981
*************************************
