[10928] in Perl-Users-Digest
Perl-Users Digest, Issue: 4529 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Jan 1 19:07:35 1999
Date: Fri, 1 Jan 99 16:00:18 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Fri, 1 Jan 1999 Volume: 8 Number: 4529
Today's topics:
Re: Absolute Yuck <ajonsson@csi.com>
Re: Apache/mod_perl request handlers and cookies <root@thanatar.demon.co.uk>
Re: Crypt() ("Kaj J. Niemi")
Executing telnet and getting data? <hana@email.uc.edu>
Re: Executing telnet and getting data? (K. Krueger)
FAULTY INSTALL? <infotech@discovernet.net>
Re: Filelisting of Dir & Subdir (Sean McAfee)
FLY <debot@xs4all.nl>
Re: How to call a c++ method from PERL ? <nospam_gwynne@utkux.utk.edu>
Re: How to Run Perl on DOS (tony summerfelt)
installing activeperl on windows 98 using personal web <jennifer.whiteside@reedtech.com>
Re: Learning Perl '95 <ajonsson@csi.com>
Re: Need Help: Beginners to Perl <ajonsson@csi.com>
Re: New posters to comp.lang.perl.misc ruben@wynn.com
Re: New posters to comp.lang.perl.misc (Matthew Bafford)
Re: New to perl <palincss@tidalwave.net>
Perl and Socks <swito@fsph2.htu.tuwien.ac.at>
Re: Perl Install on NT <ajonsson@csi.com>
Re: Perl upgrade on sunos 4.1.3C (M.J.T. Guy)
problem to get perlscript with activeperl running <hunkelr@ursmac.escape.de>
Question Concerning Arrays <gsx97@usa.net>
simple regular expression. <rahulk@iname.com>
Re: simple regular expression. ()
Re: simple regular expression. (K. Krueger)
Re: simple regular expression. (Simon Whitaker)
Re: win32 install woes. ( win98 ) <jennifer.whiteside@reedtech.com>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 1 Jan 1999 15:55:58 -0600
From: "AJ" <ajonsson@csi.com>
Subject: Re: Absolute Yuck
Message-Id: <euLt5FdN#GA.328@nih2naab.prod2.compuserve.com>
Perl probably doesn't like $1. Use something that doesn't start with a
number, $one, for example. Also, when you assign an array to a scalar
variable, like $one = @inputData the value of $one will be the number of
elements of @inputData, say if you have 5 lines that created five elements
of @inputData, then $one will = 5.
Hope this helps,
AJ
JTJ wrote in message <368AE152.5F89@erase.callisto.si.usherb.ca>...
>This is silly ... I can do this, can't I?
>
>--------------------------------------------------------------------
>&ReadParse;
> open(HTMLFILE,"<$datafile");
> @inputData=<HTMLFILE>;
> close(HTMLFILE);
>$1 = @inputData;
>$1 =~ s/[TypeOfCard]/$in{'TypeOfCard'}/go;
>--------------------------------------------------------------------
>
>I get this error message:
>Modification of a read-only value attempted at postcard.pl line 23.
>
>23: $1 = @inputData;
>
>I want to substitute the text "[TypeOfCard]" for what I input from html
>
>Thanks in advance ... it's screen stare and lack of a manual ... :-)
>
>JT-J
------------------------------
Date: Fri, 01 Jan 1999 22:38:19 +0000
From: root <root@thanatar.demon.co.uk>
Subject: Re: Apache/mod_perl request handlers and cookies
Message-Id: <368D4E5B.71B613EF@thanatar.demon.co.uk>
Mads Toftum wrote:
>
> >How do you set cookies from a mod_perl request handler, e.g.
>
> Take a look at:
> http://www.modperl.com/chapters/ch6.html#Cookie_Based_Access_Control
Cheers, this is perfect! :)
Jamie
------------------------------
Date: Fri, 1 Jan 1999 19:50:39 +0200
From: <kajtzu@kajtzu.private-parts.fi> ("Kaj J. Niemi")
Subject: Re: Crypt()
Message-Id: <ft1j67.o81.ln@kajtzu.pp.fi>
Webmaster <webmaster@somewhere.com> wrote:
: I think I have a grasp on crypt as a simple password method to scramble
: passwords... But what is the de-crypt method?
Actually, you don't decrypt it. Instead, you compare the crypted version
of the password given with the one stored in your password database. If
they're equal, well, it's the correct password (or one of them ;)).
// kaj
--
Kaj J. Niemi <kajtzu@kajtzu.pp.fi> - 040-570 76 14 - Why doesn't the net work?
Small animals conducted a heroic kamikaze attack on power supplies ..or..
Not invented here(tm) ..or.. The network drain was clogged ..and.. a plumber
was needed ..but.. plumber mistook routing panel for decorative wall fixture!
------------------------------
Date: Fri, 01 Jan 1999 16:06:19 -0500
From: Arum Han <hana@email.uc.edu>
Subject: Executing telnet and getting data?
Message-Id: <368D38CB.329A5F85@email.uc.edu>
Hello
I need to telnet to a search engine and I'm wondering if I can send data
and
get result using perl. The site works as following.
telnet searchsite(ip address)
AT prompt, I have to type 'whois'.
Then, I have to type in the string which I want to search and the search
engine
gives the result by text.
Can I do the above function by just passing the string which I want to
search
to the perl program?
Please let me know.
Thanks
--
--------------------------------------------------
Arum Han
Graduate Research Assistant
System Administrator for CMSM
Center for Microelectronic Sensors and MEMS(CMSM)
University of Cincinnati
E-mail : hana@email.uc.edu
------------------------------ ------------------
------------------------------
Date: 1 Jan 1999 13:52:35 -0800
From: kirbyk@best.com (K. Krueger)
Subject: Re: Executing telnet and getting data?
Message-Id: <76jg33$pvg$1@shell2.ba.best.com>
In article <368D38CB.329A5F85@email.uc.edu>,
Arum Han <hana@email.uc.edu> wrote:
>Hello
>
>I need to telnet to a search engine and I'm wondering if I can send data
>and
>get result using perl. The site works as following.
>telnet searchsite(ip address)
>AT prompt, I have to type 'whois'.
>Then, I have to type in the string which I want to search and the search
>engine
>gives the result by text.
>Can I do the above function by just passing the string which I want to
>search
>to the perl program?
Sure! Most of the hard work has been done for you. Look up the
documentation on the Net::Telnet module (available at www.cpan.org
if you don't have it already.) It's very well documented and
fairly easy to use, particularly for fairly standard things like
you're doing. Good luck!
--
Kirby Krueger O- kirbyk@best.com
<*> "Most .sigs this small can't open their own jump gate."
------------------------------
Date: 1 Jan 1999 21:22:23 GMT
From: "Rick Spangenberg" <infotech@discovernet.net>
Subject: FAULTY INSTALL?
Message-Id: <76jeaf$5ud$0@206.165.146.15>
I recently installed the latest perl at my web site on a Dec Alpha and
received the following error messages.
If anyone has any suggestions I'd appreciate it. I am stumped.
local> ./perl harness
<Ok's snipped>:
base/rs.............ok, 4/14 subtests skipped
comp/cpp............skipping test on this platform
op/magic............ok, 4/35 subtests skipped
op/sysio............FAILED tests 29, 31-33
Failed 4/39 tests, 89.74% okay
op/taint............No errno ENOENT at ../lib/Errno.pm line 36
Errno::FETCH('Errno=ARRAY(0x1400dc548)', 'ENOENT') called at
op/taint.t
line 369
dubious
Test returned status 255 (wstat 65280, 0xff00)
DIED. FAILED tests 73-149
Failed 77/149 tests, 48.32% okay (-4 skipped tests: 68 okay, 45.64%)
lib/db-btree........skipping test on this platform
lib/db-hash.........skipping test on this platform
lib/db-recno........skipping test on this platform
lib/errno...........Died at lib/errno.t line 16.
dubious
Test returned status 255 (wstat 65280, 0xff00)
DIED. FAILED tests 1-5
Failed 5/5 tests, 0.00% okay
lib/thread..........skipping test on this platform
Failed Test Status Wstat Total Fail Failed List of failed
----------------------------------------------------------------------------
---
lib/errno.t 255 65280 5 5 100.00% 1-5
op/sysio.t 39 4 10.26% 29, 31-33
op/taint.t 255 65280 149 77 51.68% 73-149
5 tests skipped, plus 12 subtests skipped.
Failed 3/191 test scripts, 98.43% okay. 86/6794 subtests failed, 98.73%
okay.
Also, I got this error message and a lot of Warnings: Trailing comma found
messages.
Where is your C library? [/usr/shlib/libc.so]
Extracting names from the following files for later perusal:
/usr/ccs/lib/libdbm.a
/usr/local/lib/libgdbm.a
/usr/shlib/libc.so
/usr/shlib/libdb.so
/usr/shlib/libm.so
This may take a while...........done
<dld.h> NOT found.
------------------------------
Date: Fri, 01 Jan 1999 22:33:08 GMT
From: mcafee@waits.facilities.med.umich.edu (Sean McAfee)
Subject: Re: Filelisting of Dir & Subdir
Message-Id: <E2cj2.289$Ge3.1665902@news.itd.umich.edu>
In article <76j2ie$ojq$1@bw107zhb.bluewin.ch>,
Philip Class <philip.class@popcorn-studio.ch> wrote:
>Could someone please show me an example of how to have listed all files of a
>directory & its subdirectories (to push them lateron into an array) ?
>I've tried the find::file , file::Listing and have read the perldoc -f
>opendir & readdir .... but I simply don't manage to succeed.
>The only input needed is a physical root-directory like 'c:\data\' .
Reread the documentation for File::Find; it's exactly what you need, so
much so that the solution to your problem can be expressed in one line:
find sub { push @files, $File::Find::name if -f }, 'c:/data';
--
Sean McAfee | GS d->-- s+++: a26 C++ US+++$ P+++ L++ E- W+ N++ |
| K w--- O? M V-- PS+ PE Y+ PGP?>++ t+() 5++ X+ R+ | mcafee@
| tv+ b++ DI++ D+ G e++>++++ h- r y+>++** | umich.edu
------------------------------
Date: Sat, 02 Jan 1999 00:44:14 +0100
From: Frank de Bot <debot@xs4all.nl>
Subject: FLY
Message-Id: <368D5DCE.BEA17D24@xs4all.nl>
Can anyone tell me how I can detect where the FLY on my machine is?
(With a cgi-script or whatever)
------------------------------
Date: Fri, 1 Jan 1999 16:51:59 -0500
From: "Robert Gwynne" <nospam_gwynne@utkux.utk.edu>
Subject: Re: How to call a c++ method from PERL ?
Message-Id: <76jg3s$14$1@gaia.ns.utk.edu>
Kevin:
See Perlfaq3: If you want to call C from Perl, start with the perlxstut
manpage, moving on to the perlxs manpage, the xsubpp manpage, and the
perlguts manpage.
Bob Gwynne
Black K <blackk@dial.oleane.com> wrote in message
news:76jb26$2o4$1@minus.oleane.net...
>Hye.
>
>I am a newbie in PERL.
>
>The issue:
>I have a .a and a .h file in c++. I would like to call from PERL a c++
>method with input parameters and result parameters.
>
>
>Could anyone tell me how to perform this without too much work around ?
>
>I have heard about PERLXS. Is this enough and reliable in any case ?
>
>Thanks for your help.
>
>Best regards,
>
>Kevin Black
>
>
------------------------------
Date: 1 Jan 1999 16:18:44 -0500
From: tonys@myspleen.kos.net (tony summerfelt)
Subject: Re: How to Run Perl on DOS
Message-Id: <368d3bb4.0@news.kosone.com>
On 30 Dec 1998 22:17:58 -0000, Jonathan Stowe wrote:
> >> How do you run a program on DOS?
> > In first line of a script file put
> > #!c:\perl\perl.exe ( or other directory where perl.exe is)
> > and name a script
> > file.pl
> alternative to command.com that supports that kind of thing but I dont think
if he uses the alternative command processor 4dos (also 4os2, 4nt) he can:
set .pl=c:\perl\perl.exe
and then just run file (without the .pl extension) at the command line.
that's what i do for my dos setup. it's easier that doing the batch file
thing with that pl2bat.pl program...
--
.t
*-------------------------------------------------------------------------
| origin: ...the vented spleen kingston on (613-544-9332) 1:249/139
|
| `you want a toe? i can get you a toe'
|
| take myspleen out to reply via email
*-------------------------------------
------------------------------
Date: Fri, 1 Jan 1999 16:42:50 -0500
From: "Jennifer Whiteside" <jennifer.whiteside@reedtech.com>
Subject: installing activeperl on windows 98 using personal web server
Message-Id: <368d415a.0@bluesky.reedtech.com>
i keep getting an error when it tries to setup the IIS metabase.
has anyone tried and successfully installed this?
any ideas what might be wrong?
thanks Jenn
------------------------------
Date: Fri, 1 Jan 1999 15:43:17 -0600
From: "AJ" <ajonsson@csi.com>
Subject: Re: Learning Perl '95
Message-Id: <#Xov1#cN#GA.260@nih2naab.prod2.compuserve.com>
The Gecko book is just like the Llama, except it has Win32 specfic stuff. I
highly recommend it. (I work on both platfoms, so I have both).
AJ
augie@nic.com wrote in message <76fvku$n07$1@nnrp1.dejanews.com>...
>Hi all,
>
>I'm taking a refresher course in Perl since I haven't used it in a while,
and
>I'm trying to figure out the best way to go. I'm reading through Learning
>Perl right now. But the odds are pretty good I'll end up using a lot of
Perl
>on my Win 95 system. (Or at least until I get Linux completely set up and
>feel comfortable with it.)
>
>Should I drop Learning Perl and go straight to the Win32 version (gecko) of
>the book, instead? Or should I read the Unix version first and then read
the
>gecko book? Does the gecko book cover Win 95 as well as Win NT?
>
>Thanks for your help,
>-Augie
>
>-----------== Posted via Deja News, The Discussion Network ==----------
>http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Fri, 1 Jan 1999 15:44:51 -0600
From: "AJ" <ajonsson@csi.com>
Subject: Re: Need Help: Beginners to Perl
Message-Id: <#KLFr$cN#GA.230@nih2naab.prod2.compuserve.com>
Perl comes with most current Linux such as Slackware, Caldera or
RedHat 5.0. Works great.
AJ
Iskandar D wrote in message <368b6d90.9322759@news.singnet.com.sg>...
>hi there,
> i'm keen to lean PERL. the thing is that where do i
>start and how? i'm planning to install Linux on my system. can it
>run in Linux OS ? thanks in advance.
>
>
>cheers,
> iskandar d
> thekrow@iname.com
------------------------------
Date: Fri, 01 Jan 1999 21:04:44 GMT
From: ruben@wynn.com
Subject: Re: New posters to comp.lang.perl.misc
Message-Id: <76jd9c$aa4$1@nnrp1.dejanews.com>
What is OCR and why am I being picked on here?
Ruben
In article <767ug5$9ck$1@info.uah.edu>,
Greg Bacon <gbacon@cs.uah.edu> wrote:
> Following is a summary of articles from new posters spanning a 7 day
> period, beginning at 21 Dec 1998 12:43:32 GMT and ending at
> 28 Dec 1998 06:28:14 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) 1998 Greg Bacon. All Rights Reserved.
> Verbatim copying and redistribution is permitted without royalty;
> alteration is not permitted. Redistribution and/or use for any
> commercial purpose is prohibited.
>
> Totals
> ======
>
> Posters: 89 (29.4% of all posters)
> Articles: 121 (16.4% of all articles)
> Volume generated: 167.5 kb (13.4% of total volume)
> - headers: 83.7 kb (1,768 lines)
> - bodies: 82.2 kb (2,645 lines)
> - original: 62.4 kb (2,060 lines)
> - signatures: 1.4 kb (31 lines)
>
> Original Content Rating: 0.759
>
> Averages
> ========
>
> Posts per poster: 1.4
> median: 1 post
> mode: 1 post - 65 posters
> s: 1.1 posts
> Message size: 1417.4 bytes
> - header: 708.6 bytes (14.6 lines)
> - body: 695.6 bytes (21.9 lines)
> - original: 528.2 bytes (17.0 lines)
> - signature: 12.2 bytes (0.3 lines)
>
> Top 10 Posters by Number of Posts
> =================================
>
> (kb) (kb) (kb) (kb)
> Posts Volume ( hdr/ body/ orig) Address
> ----- -------------------------- -------
>
> 5 4.8 ( 3.3/ 1.5/ 1.4) stevenba@ccpl.carr.org (Steven Barbash)
> 4 3.7 ( 3.0/ 0.7/ 0.7) Ruben I Safir
<ruben@llinderman.dental.nyu.edu>
> 3 3.6 ( 2.5/ 1.1/ 0.5) John@melon17.freeserve.co.uk
> 3 4.3 ( 2.3/ 1.9/ 1.5) jlcrosby@fwi.com
> 3 5.5 ( 2.2/ 3.3/ 2.0) tenthousand@geocities.com
> 2 4.9 ( 1.4/ 3.5/ 3.5) unxgroup@nyct.net
> 2 3.4 ( 1.6/ 1.7/ 1.4) Scott Allen Zsori <zsoris@post.uwstout.edu>
> 2 3.3 ( 1.5/ 1.8/ 1.4) bostic@bostic.com
> 2 2.2 ( 1.4/ 0.9/ 0.9) Swervin33@hotmail.com (Cave Dweller)
> 2 2.3 ( 1.6/ 0.7/ 0.5) Raphael Conrad <raphael@iscusa.com>
>
> These posters accounted for 3.8% of all articles.
>
> Top 10 Posters by Volume
> ========================
>
> (kb) (kb) (kb) (kb)
> Volume ( hdr/ body/ orig) Posts Address
> -------------------------- ----- -------
>
> 5.5 ( 2.2/ 3.3/ 2.0) 3 tenthousand@geocities.com
> 4.9 ( 1.4/ 3.5/ 3.5) 2 unxgroup@nyct.net
> 4.8 ( 3.3/ 1.5/ 1.4) 5 stevenba@ccpl.carr.org (Steven Barbash)
> 4.3 ( 1.4/ 2.9/ 1.5) 2 "Applak!" <XamoXrphous@tecXhnolXogist.com>
> 4.3 ( 2.3/ 1.9/ 1.5) 3 jlcrosby@fwi.com
> 4.2 ( 1.3/ 2.9/ 1.3) 2 cade@acm.org
> 4.2 ( 1.4/ 2.8/ 1.5) 2 medi@cybershell.com
> 3.7 ( 3.0/ 0.7/ 0.7) 4 Ruben I Safir
<ruben@llinderman.dental.nyu.edu>
> 3.7 ( 1.7/ 1.5/ 1.0) 2 jcostom@madcow.jasons.org (Jason
Costomiris)
> 3.6 ( 2.5/ 1.1/ 0.5) 3 John@melon17.freeserve.co.uk
>
> These posters accounted for 3.5% of the total volume.
>
> Top 10 Posters by OCR (minimum of three posts)
> ==============================================
>
> (kb) (kb)
> OCR orig / body Posts Address
> ----- -------------- ----- -------
>
> 1.000 ( 0.7 / 0.7) 4 Ruben I Safir <ruben@llinderman.dental.nyu.edu>
> 0.913 ( 1.4 / 1.5) 5 stevenba@ccpl.carr.org (Steven Barbash)
> 0.758 ( 1.5 / 1.9) 3 jlcrosby@fwi.com
> 0.608 ( 2.0 / 3.3) 3 tenthousand@geocities.com
> 0.406 ( 0.5 / 1.1) 3 John@melon17.freeserve.co.uk
>
> Bottom 10 Posters by OCR (minimum of three posts)
> =================================================
>
> (kb) (kb)
> OCR orig / body Posts Address
> ----- -------------- ----- -------
>
> 1.000 ( 0.7 / 0.7) 4 Ruben I Safir <ruben@llinderman.dental.nyu.edu>
> 0.913 ( 1.4 / 1.5) 5 stevenba@ccpl.carr.org (Steven Barbash)
> 0.758 ( 1.5 / 1.9) 3 jlcrosby@fwi.com
> 0.608 ( 2.0 / 3.3) 3 tenthousand@geocities.com
> 0.406 ( 0.5 / 1.1) 3 John@melon17.freeserve.co.uk
>
> 5 posters (5%) had at least three posts.
>
> Top 10 Crossposters
> ===================
>
> Articles Address
> -------- -------
>
> 3 Ilya <ilya@napavlly.rose.hp.com>
> 3 fs60@rumms.uni-mannheim.de
> 2 Jeremy Bowen <JeremyB@clear.net.nz>
> 2 nemanij@hotmail.com
> 2 Stefan Waldherr <stefan@waldherr.org>
> 1 "Steve Swett" <steve@grantps.net>
> 1 survey@cryogen.com
> 1 Ellen Maremont Silver <silver@oreilly.com>
> 1 Mark Clark <markc@evsx.com>
> 1 Raphael Conrad <raphael@iscusa.com>
>
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Fri, 1 Jan 1999 16:27:03 -0500
From: dragons@scescape.net (Matthew Bafford)
Subject: Re: New posters to comp.lang.perl.misc
Message-Id: <MPG.10f707b114007037989772@news.scescape.net>
[This followup was posted to comp.lang.perl.misc and a copy was sent to
the cited author.]
In article <76jd9c$aa4$1@nnrp1.dejanews.com>, ruben@wynn.com says...
=> What is OCR and why am I being picked on here?
You aren't being picked on. You see, this posting is sent out
automatically -- no person involved. :)
And rating high in the top 10 by OCR is good! Only feel bad if you are
in the bottom 10... Oh you are. :) Not enough new posters for anyone
other than the top 10 to be in the bottom 10... Oh well.
[snip]
=> > - Original Content Rating (OCR) is the ratio of the original content
=> > volume to the total body volume.
[snip]
=> Ruben
BTW, doing what you just did (quoting the entire article) is a very good
way to get a low OCR rating...
HTH!
--Matthew
------------------------------
Date: Fri, 01 Jan 1999 17:16:52 -0500
From: Steve Palincsar <palincss@tidalwave.net>
Subject: Re: New to perl
Message-Id: <368D4954.E17CB4FE@tidalwave.net>
You've also forgotten hashes. Hashes are almost as powerful
as regexps. Well, if regexps are Queens, hashes are Rooks.
Uri Guttman wrote:
>
> >>>>> "DG" == Daniel Grisinger <dgris@moiraine.dimensional.com> writes:
>
> DG> dbeallie@cyberus.ca writes:
> >> What are the top 10 (or more) features of perl?
>
> DG> Regular expressions
> DG> Portability
> DG> Regular expressions
> DG> Rapid development
> DG> Regular expressions
> DG> CPAN
> DG> Regular expressions
> DG> Excellent documentation
> DG> Regular expressions
> DG> Open source
> DG> Regular expressions
> DG> TMTOWTDI
> DG> Regular expressions
>
> DG> dgris
> DG> - did i mention regular expressions? :-)
>
> you forgot regular expressions.
>
> and this friendly and loving newsgroup.
>
> it's free (covered by open source).
>
> and you forgot the best regular expressions in the business.
>
> and it's fun.
>
> uri
>
> --
> Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
> Perl Hacker for Hire ---------------------- Perl, Internet, UNIX Consulting
> uri@sysarch.com ------------------------------------ http://www.sysarch.com
> The Best Search Engine on the Net ------------- http://www.northernlight.com
------------------------------
Date: Sat, 02 Jan 1999 00:57:06 +0100
From: Stephan Witoszynskyj <swito@fsph2.htu.tuwien.ac.at>
Subject: Perl and Socks
Message-Id: <368D60D2.BE09C336@fsph2.htu.tuwien.ac.at>
I have to use a Socks proxy to do internet connections. I'm using
scripts which among others use perl's ftp and http abilities, therefore
I'd like to know, if there are socksified versions of these modules and
if not how to socksify them.
Please send me replies also privately.
Thanks,
Stephan
--
Stephan Witoszynskyj <swito@fsph2.htu.tuwien.ac.at>
# public pgp key available from:
gescheit # http://fsmat.tuwien.ac.at/~swito/
gescheiter # or by mail to
gescheitert # swito@fsph2.htu.tuwien.ac.at with
# PGP-Key Request as subject
------------------------------
Date: Fri, 1 Jan 1999 15:47:24 -0600
From: "AJ" <ajonsson@csi.com>
Subject: Re: Perl Install on NT
Message-Id: <#dtLGBdN#GA.293@nih2naab.prod2.compuserve.com>
The easiest way to to get a binary distribution of Perl for Win32
from www.perl.com and just execute it with winzip, it will unzip and
install. Took me 2 minutes the other day.
AJ
Al and Linda Adams wrote in message <76esni$7ki$1@eve.enteract.com>...
>Has anyone ever installed Perl from Windowsa NT Resource kit for
>workstations? What is needed as far as any compilers, and so on. I would
>appreciate help.
>
>Thanks,
>
>Al Adams
>
>
------------------------------
Date: 1 Jan 1999 21:26:23 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: Perl upgrade on sunos 4.1.3C
Message-Id: <76jehv$96$1@pegasus.csx.cam.ac.uk>
Christopher Adams <cadams@teleport.com> wrote:
>I had some problems upgrading Perl 5.000 to the latest version. I was
>told that the operating system (SunOS 4.1.3C) should be upgraded if I
>expect to be able to get a good Perl upgrade. During the upgrade, I get
>to the "make install" and it has a problem with toke.c. I also
>experienced problems with upgrading a new gcc compiler.
>
>Has anyone experienced this with older versions of SunOS and is that the
>likely problem.
I've built every recent (and not so recent) version of Perl on SunOS 4.1.3
and never had problems (with public releases - development versions are
another story ... ). No operating system upgrade is needed.
There is one restriction - version 5.005 and later of Perl require
an ANSI C compiler, which the Sun supplied cc is not. So you should
either stick with Perl version 5.004_04 or you'll need to install gcc.
If you have problems installing gcc, you'll need to take that up in an
appropriate newsgroup.
Mike Guy
------------------------------
Date: Fri, 1 Jan 1999 22:45:37 +0100
From: "Urs Hunkler" <hunkelr@ursmac.escape.de>
Subject: problem to get perlscript with activeperl running
Message-Id: <76jfm7$3j4$1@oker.escape.de>
hello,
i wish everybody a happy and sucsessfull new year.
i installed the activeperl 508 distibution with perlscript on a win95
maschine with ie 4.01 sp1 and active desctop and get with the html-examples
and with wsh similar errormessages:
for example in the perlscript "test.pls" there is the row:
$WScript->Echo('test');
starting it from explorer i get the error message:
$WScript->Echo('test');
Can't call method "Echo" on an undefined value.
in the activestate-archiv and at deja-news i only found simiral descriptions
of the problem bu never a solution. can anybody help me?
hopefull greatings
urs
--
Urs Hunkler hunkler@ursmac.escape.de
------------------------------
Date: Fri, 01 Jan 1999 18:10:25 -0500
From: GSX <gsx97@usa.net>
Subject: Question Concerning Arrays
Message-Id: <368D55E1.BB41CECD@yooo-esssss-aaaa.net>
Greetings!
I have read the contents of a pipe delimited file into an array. We'll
call it @array. Then, after I edit the lines needed using a
foreach $line (@array) {
do this stuff...
}
I print the revised array back to the file. Here is my problem:
After I print the data back, the first line gets placed fine, but every
line after that ends up being indented. For instance:
line one|data
line two|data
line three|data
The first field in each line is a username, so being indented is causing
the username to not match the form input. Of course, I have tried to use
a regex to replace every space on every line with nothing, but it will
not remove those beginning spaces.
Does anybody know why this happens, and what the characters actually are
if they aren't spaces?
I really appreciate any help.
------------------------------
Date: Fri, 01 Jan 1999 15:43:32 -0600
From: Rahul K <rahulk@iname.com>
Subject: simple regular expression.
Message-Id: <368D4184.85A81FD@iname.com>
Hi,
I am a newbie.
I have a string stored in $in{"fField".
I need to convert the string (please notice the dot at the end)
<http://www.foo.com/abc.html>.
into
<a href="http://www.foo.com/abc.html">http://www.foo.com/abc.html</a>.
and
<http://www.foo.com/abc.html>
into
<a href="http://www.foo.com/abc.html">http://www.foo.com/abc.html</a>
here is my script:
$in{"fField"} =~ s/(http:\/\/\S+)(.*)/ <a href=$1
target=\"_blank\">$1<\/a> $2/g;
the problem with this is that after I run the script, I get the
following (notice that the dot is *inside*)
<a href="http://www.foo.com/abc.html.">http://www.foo.com/abc.html.</a>
this causes the browser to give a 404 error.
please help.
thanks,
-rahul
------------------------------
Date: 1 Jan 1999 22:22:12 GMT
From: gp@gerhard.atnet.at ()
Subject: Re: simple regular expression.
Message-Id: <915229334.26803@news.vbs.at>
Hi,
: $in{"fField"} =~ s/(http:\/\/\S+)(.*)/ <a href=$1
: target=\"_blank\">$1<\/a> $2/g;
: the problem with this is that after I run the script, I get the
: following (notice that the dot is *inside*)
: <a href="http://www.foo.com/abc.html.">http://www.foo.com/abc.html.</a>
I think the most simple way to fix this is to modify the (.*) ...
$in{"fField"} =~ s/(http:\/\/\S+)(.*)\./ <a href=$1
target=\"_blank\">$1<\/a> $2/g;
haven't tried that... But I think something like that should work for
you...
cu
gerhard
------------------------------
Date: 1 Jan 1999 14:30:39 -0800
From: kirbyk@best.com (K. Krueger)
Subject: Re: simple regular expression.
Message-Id: <76jiaf$jq$1@shell2.ba.best.com>
In article <368D4184.85A81FD@iname.com>, Rahul K <rahulk@iname.com> wrote:
>
>Hi,
>I am a newbie.
>I have a string stored in $in{"fField".
>I need to convert the string (please notice the dot at the end)
>
>
>here is my script:
>
>$in{"fField"} =~ s/(http:\/\/\S+)(.*)/ <a href=$1
>target=\"_blank\">$1<\/a> $2/g;
>
Your problem is that . is a special character in a regular expression.
It matches any character. To match a literal . character, you need
to make it \., just like you've done for the slashes.
Alternatively, you could just find the URL like this, and do something
like:
chop $url if substr($url, -1) eq ".";
Which would remove a trailing period if it existed.
(Not that this is a better way, mind you, than what you've done. It
isn't.)
--
Kirby Krueger O- kirbyk@best.com
<*> "Most .sigs this small can't open their own jump gate."
------------------------------
Date: Fri, 01 Jan 1999 22:39:53 GMT
From: spam@netcetera.org (Simon Whitaker)
Subject: Re: simple regular expression.
Message-Id: <368e4e45.21688107@news.u-net.com>
On Fri, 01 Jan 1999 15:43:32 -0600, Rahul K wrote:
> $in{"fField"} =~ s/(http:\/\/\S+)(.*)/ <a href=$1
> target=\"_blank\">$1<\/a> $2/g;
>
> the problem with this is that after I run the script, I get the
> following (notice that the dot is *inside*)
>
> <a href="http://www.foo.com/abc.html.">http://www.foo.com/abc.html.</a>
I'm no expert, but I know that . in a regexp matches any character, so you
need to precede it with a backslash if you want it to actually represent a
full stop / period / whatever. How about amending your s/// to:
s#<(.*?)>#<a href=\"$1\" target=\"_blank\">$1</a>#g;
I've just tried this and it seems to work OK. Forget about the $2 bit of
your regexp - it's redundant.
All the best,
Simon
--
Simon Whitaker, Perl novice (so be gentle with me), my first
language since ZX Spectrum BASIC. Damn I miss that K prompt.
s/spam/simon/ if replying by mail # http://www.netcetera.org
------------------------------
Date: Fri, 1 Jan 1999 16:44:21 -0500
From: "Jennifer Whiteside" <jennifer.whiteside@reedtech.com>
Subject: Re: win32 install woes. ( win98 )
Message-Id: <368d41d1.0@bluesky.reedtech.com>
i am having the same exact problem. have you heard anything yet?
c.s. wrote in message <76c8uc$390$1@remarQ.com>...
>hello,
>
>I am haveing trouble getting Perl to work on my machine. I can run scipts
>from the command line just fine, but i can't invoke them via a web server.
>
>I have checked the FAQs, but I am somewhat new to this, so I may have
missed
>something.
>
>My system:
>
>Win98
>Microsoft PWS.
>
>
>The problem:
>
>While installing perl (build 507 and 508), the installer complains several
>times
>that it "Cannot Access The IIS MetaBase.... continue installation ? y/n ".
>I clicked "yes" to continue all of the times. (It also suggested that I
>restart
>the machine and try again, but this did not help.)
>
>Perl was installed to c:\perl\bin. I am able to run scripts from
>command line just fine, however the webserver did not seem to configured to
>recognize perl yet.
>
>At this point, I added the .pl(x) => "c:\perl\bin\perl.exe(perlIS.dll) %s
>%s" keys to: HKLM\System\CurrentControlSet\Services\W3SVC\Parameters\Script
>Map
>
>Now, the server seems to call Perl, but one of two things will happen when
I
>try to request a script via the web server.
>
>When requesting a ".pl" file:
>The server seems to stall, returning no information to the browser. Hitting
>"Ctrl-Alt-Delete" reveals that there is a process by the name of "Perl"
>running at the moment. Eventually, forcing this process to quit will cause
>the server to send a generic CGI error to the browser.
>
>When requesting a ".plx" file": (perlIS.dll)
>The server will return a page that says "One of the library files needed to
>run this application cannot be found. "
>
>
>
>Thank you for your time,
>cs2400@hotmail.com
>
>
>
>
>
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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.misc (and this Digest), send your
article to perl-users@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.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
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 V8 Issue 4529
**************************************
