[9705] in Perl-Users-Digest
Perl-Users Digest, Issue: 3308 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Aug 1 19:04:49 1998
Date: Sat, 1 Aug 98 16:00:22 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sat, 1 Aug 1998 Volume: 8 Number: 3308
Today's topics:
Re: # in a print statement (Abigail)
Re: Another Win32 install prob (5.005_01) -- probably S <chrishowe@earthling.net>
Cab file format <jbnivoit@ix.netcom.com>
Dayton, OH Perl Users Group (dayton.pm) smithbtb@my-dejanews.com
Help install Perl! <e_emcee3@email.msn.com>
HELP perl/cgi using html SELECT nestoralberto2@my-dejanews.com
Help with Perl... <thomasbd!@erols.com>
Re: hiding user input (Kurtis D. Rader)
Re: hiding user input (Scott Stark)
Re: hiding user input (Gary L. Burnore)
Re: hiding user input (Greg Bacon)
Re: hiding user input (Greg Bacon)
Re: hiding user input (Greg Bacon)
Re: How to change one field in a flat database? (Bjorn Malmberg)
How to match several octals in a row? (Michael Shavel)
Re: Im Willing to pay or give a free DOMAIN for a custo (nobody)
Re: installing perl in a different directory, @INC (Tye McQueen)
Re: Interesting Question needs Quick Answer (Greg Bacon)
Re: Newbie Perl Problem (Kelly Hirano)
Re: number (6 -> 06) conversion question (Adam Donahue)
Perl for Win32 <hendridm@hcil.net>
Please Help - Perl on the Web <aacwn100@york.ac.uk>
Re: Possible to parse textfile on another server? (Martien Verbruggen)
Re: printed & bound perl 5.005 manuals? <merlyn@stonehenge.com>
Re: References as strings (Tye McQueen)
Re: Schemelike qqq function? reinterpolation without ev (Sean McAfee)
Re: search and replace - help (Ronald J Kimball)
Re: Self-referential regexps in Perl/ Representation of (Damian Conway)
Re: Sending e-mail using cgi <a.g.macinnes@nospam.rl.ac.uk>
Re: Try perl on Ms Dos <cjdpcssd@ims-1.com>
What's the difference? <sysop97@nospam.callisto.si.usherb.ca>
Re: What's the difference? (Ronald J Kimball)
Re: zip files with Perl <jbnivoit@ix.netcom.com>
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 30 Jul 1998 21:01:46 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: # in a print statement
Message-Id: <6pqmvq$5h$1@client3.news.psi.net>
John Call (johnc@interactive.ibm.com) wrote on MDCCXCIV September
MCMXCIII in <URL: news:35C0854B.C9F7E3DF@interactive.ibm.com>:
++ Abigail wrote:
++
++ > Being new is not an excuse for not reading the manuals. It's in perlop.
++
++ I thought once the "Perl Studs" got their .moderated group
Not, not all of us got that.
++ gave here would be a little less venomous. I guess not. You got the new group
++ be rude in there. If you give advice here then take the Tom P.'s approach ple
I'll be as I please. If you don't want to read my postings, RTFM of your
newsreader.
Abigail
--
perl -we '$_ = q ?4a75737420616e6f74686572205065726c204861636b65720as?;??;
for (??;(??)x??;??)
{??;s;(..)s?;qq ?print chr 0x$1 and \161 ss?;excess;??}'
------------------------------
Date: Sat, 01 Aug 1998 16:55:46 -0500
From: Chris Howe <chrishowe@earthling.net>
Subject: Re: Another Win32 install prob (5.005_01) -- probably STILL another idiot
Message-Id: <35C38EE2.9883E9FA@earthling.net>
Curtis Jewell / Dennis Whalen wrote:
>
> Well, I'm trying to install Perl 5.005_01 on my Windows 95 system.
>
> I downloaded 4dos, dmake and mingw32-ecgs, like README.win32 suggests I
> should.
>
<lots of stuff deleted - problems with running dmake.>
>
> Maybe someone can explain these last few, I'm no mind-reader.
>
> --Curtis
I too have been trying to install Perl 5.005 on my 95 box, and I have
had similar troubles, however I did eventually get something to work, so
I will share what I have learned. I have been using the 5.005_50 distri-
bution found in the ports section of CPAN.
I too tried to follow the README.win32. I already had a copy of 4DOS, I
found a copy of dmake, and I had MSVC++ on my machine. I had tried to
use the provided nmake file to build, and it just didnt seem to work. I
tried the dmake version, changing the appropriate configuration
information to reflect the fact that I was using MSVC, and it didnt
work. I suspected that maybe it was the compiler, so I went and got
mingw32 and again the build failed in mysterious ways. I looked into it
a little more and realized that I had an old version of 4DOS, and dmake
looked pretty out of date too. So I got myself a copy of 4DOS NT and
an up to date dmake. When I installed 4DOS NT it griped at me, saying
that it was designed for NT, not 95 and I should get the 95 version. I
stalwartly ingnored the message. This time I went back to the makefile
and set it up for MSVC++ again, and IT WORKED! Well, it worked with
a couple of minor modifications to the ext directory:
o I had to change the name of the file
ext/B/B/dissasembler.pm to dissasem.pm
o I had to copy errno.h from my include/system directory
into ext/errno, and I changed all references to <errno.h>
to \"errno.h\" in ext/errno/errno_pm.pl
I have not yet begun to use the resulting 5.005 executable for anything
except trying to play with some of the new features, and when I run the
tests many of them fail. I too would appreciate an easier way to get
a reliably working version of 5.005 on my '95 box.
-Chris
------------------------------
Date: Mon, 27 Jul 1998 06:58:23 -0400
From: "Jean-Baptiste Nivoit" <jbnivoit@ix.netcom.com>
Subject: Cab file format
Message-Id: <6pqqmh$d5t@dfw-ixnews10.ix.netcom.com>
Hi,
it seems like i cant find the file format spec for Microsoft's .CAB files.
I someone would know where to find that kind of info, i'd give a shot at
writing
a Perl module to access/manipulate those files.
jb
------------------------------
Date: Thu, 30 Jul 1998 20:11:20 GMT
From: smithbtb@my-dejanews.com
Subject: Dayton, OH Perl Users Group (dayton.pm)
Message-Id: <6pqk17$qop$1@nnrp1.dejanews.com>
Dayton Perl Mongers (aka "Dayton.pm") is the new Dayton Perl Users Group. We
are looking for any and all Perl people in the Dayton area.
- This group is for anyone in the Dayton, OH and surrounding area (Miami
Valley) that is interested in Perl. - Dayton.pm is open to Perl programmers
of all levels and sorts. - The group is intended to help area Perl
programmers get to know each other. - We'll have some fun and expand our our
knowledge of Perl through sharing with others. - We'll host visits from
special guest Perl Gurus (maybe Randal will come & give his JACPH ("Just
Another Convicted Perl Hacker") talk :-). - Dayton.pm is grateful for Perl
Mongers <http://www.pm.org>.
We'll have our first get-together sometime in August (before the Perl
Conference). We'll post a date after getting some feedback from interested
folks.
We are a group in the making, so if you have any ideas, contact Eric Smith
<mailto:eric.smith@b2.wpafb.af.mil>.
- Eric D. Smith - Webmaster
B-2 Program Office - (937) 656-5256
mailto:eric.smith@b2.wpafb.af.mil
mailto:btb@dnaco.net
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Sat, 1 Aug 1998 18:38:46 -0400
From: "Chedy Hampson" <e_emcee3@email.msn.com>
Subject: Help install Perl!
Message-Id: <eUJuV1Zv9GA.221@upnetnews03>
I have a windows95 system w/ an old version of C++. How do I download and
install perl so that i can use it?
Thanx,
Chedy
------------------------------
Date: Sat, 01 Aug 1998 22:44:02 GMT
From: nestoralberto2@my-dejanews.com
Subject: HELP perl/cgi using html SELECT
Message-Id: <6q05ni$9rc$1@nnrp1.dejanews.com>
I have a perl/cgi program that creates a html page for user to enter data
and a file gets written when the submit button is clicked. In a SELECT
stament any time I use the MULTIPLE argument the file does not get written
completely, but when I remove the MULTIPLE argument the entire file gets
written. Whenever the submit button is clicked then a javascript is set to
gather all selected choices from the SELECT statment.
This works fine for a SINGLE SELECT statement, but not for a MULTIPLE SELECT.
When using the MULTIPLE statment, the file gets written but it stops writing
when it tries to write the field for the select statement after the first
selection.
Anyone know of better way of listing a directory ina MULTIPLE SELECT and
grabing all the files chosen? or Can anyone help me on my code?
Thanks in advance,
Nestor Alberto Florez
-------
JAVASCRIPT code:
function gettechfiles()
{
var files="";
for (var i=0; i < document.f.tech_file.options.length ; i++)
{
if(document.f.tech_file.options[i].selected)
{
files = files + document.f.tech_file.options[i].value + " ";
}
}
document.f.tech_file.value = files;
}
------------------ PERL code: sub TechBrowser { {$ESH_tech_dir =
"/net/hostname/usr5/techfiles"; if( opendir TECH_DIR,"$ESH_tech_dir") {
print"<PRE>\n"; print "<B> Select Technology File</B> <SELECT
NAME=\"tech_file\" SIZE= 3 MULTIPLE >\n"; @allfiles = sort
grep(!/^\.\.?$/,readdir(TECH_DIR));
if($#allfiles > 0)
{
$ESH_tech_file = "";
print "<OPTION SELECTED>$ESH_tech_file\n";
foreach $file (@allfiles)
{
print "<OPTION> $file \n";
}
}
else
{
$ESH_tech_file = "Empty Directory";
print "<OPTION SELECTED>$ESH_tech_file\n";
}
print "</SELECT>\n";
closedir(TECH_DIR);
}
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Thu, 30 Jul 1998 17:57:53 -0700
From: "Diesel" <thomasbd!@erols.com>
Subject: Help with Perl...
Message-Id: <6pqqgn$2f$1@winter.news.erols.com>
I have been studying perl for a short while and I can't seem to find out how
to perform this action.
Ok. I have a web site and I update news on the web site every half hour or
so. I do it through html (notepad). I would like to do it through cgi so I
don't have to download the index.htm, edit it, and upload it. I have each
section marked with a header like "NEWS STARTS HERE" and the line below it
is where the actual html is.
What I want to know is how I can get a perl script to search for this line
in the index.htm and add stuff (in html format) below it.
Thanks.
--
Thomas
thomasbd at erols dot com
or remove the ! to reply
------------------------------
Date: 1 Aug 1998 21:43:04 GMT
From: krader@sequent.com (Kurtis D. Rader)
Subject: Re: hiding user input
Message-Id: <6q0258$cp8@scel.sequent.com>
In article <35c96426.144523576@nntpd.databasix.com>,
Gary L. Burnore <gburnore@databasix.com> wrote:
>
>It's very clear that you're not sure. I'll say it again but you'll surely not
>get it then. Your posting of private email to USENet without the permission
>of the author is unethical behavior. Moreso than her abuse of the person
>asking a question. Your claim that I asked you to post it is an outright lie
>and is therefore also unethical. Get it? Bet not.
Gary, would you be so kind as to drop this matter? I too sent you a polite
message via email which
1) agreed with you that Abigail is wrong to demean people who are
seeking assistance, and
2) pointed out that her behavior does not justify your abusiveness.
You replied with a threat.
We all know how you feel about Abigail and many of the other denizens of
this newsgroup. Many of us feel such criticism should be handled privately.
You do not and that is okay. But posting your feelings once is sufficient.
I wonder what a laywer would say about your continued abuse?
Would you mind telling the world who your boss is so we can forward your
posts to him?
You might consider seeking the help of a mental health professional.
--
Kurtis D. Rader, Staff Engineer email: krader@sequent.com
Sequent Computer Systems voice: +1 503/578-3714
15450 SW Koll Pkwy, MS RHE2-501 http://www.sequent.com
Beaverton, OR 97006-6063
------------------------------
Date: 30 Jul 1998 22:51:22 GMT
From: sstark@informix.com (Scott Stark)
Subject: Re: hiding user input
Message-Id: <6pqtda$aql1@webint.na.informix.com>
In article <6pq897$p1l$4@client3.news.psi.net>, abigail@fnx.com says...
>
>Scott Stark (sstark@informix.com) wrote on MDCCXCIII September MCMXCIII
>in <URL: news:6pnm5m$3gh1@webint.na.informix.com>:
>++ Is there any way to make user input in a perl script invisible, or showing
a
>++ series of **** characters instead of what's typed? My script prompts the
user
>++ for a password and currently anyone watching can see the input.
>
>
>Is there something wrong with your eyes that you didn't read the FAQ?
As a matter of fact I did check the faq and didn't find any such animal, except
"Is there a way to hide perl's command line from programs such as "ps"?". That
one didn't make sense to me. So either there's something wrong with my eyes or
I'm too stupid to figure out the FAQ.
ss
------------------------------
Date: Sat, 01 Aug 1998 22:08:18 GMT
From: gburnore@databasix.com (Gary L. Burnore)
Subject: Re: hiding user input
Message-Id: <35c990a8.155918562@nntpd.databasix.com>
On 1 Aug 1998 21:43:04 GMT, in article <6q0258$cp8@scel.sequent.com>,
krader@sequent.com (Kurtis D. Rader) wrote:
>In article <35c96426.144523576@nntpd.databasix.com>,
>Gary L. Burnore <gburnore@databasix.com> wrote:
>>
>>It's very clear that you're not sure. I'll say it again but you'll surely not
>>get it then. Your posting of private email to USENet without the permission
>>of the author is unethical behavior. Moreso than her abuse of the person
>>asking a question. Your claim that I asked you to post it is an outright lie
>>and is therefore also unethical. Get it? Bet not.
>
>Gary, would you be so kind as to drop this matter? I too sent you a polite
>message via email which
>
>1) agreed with you that Abigail is wrong to demean people who are
> seeking assistance, and
>2) pointed out that her behavior does not justify your abusiveness.
>
>You replied with a threat.
No threat. Just a message that further emails from you would be considered
harassment and would be reported to your provider as such. That is NOT a
threat.
>
>We all know how you feel about Abigail and many of the other denizens of
>this newsgroup. Many of us feel such criticism should be handled privately.
But you don't think her abuse of someone asking a question should either be
handled privately or not happen at all, right?
>You do not and that is okay. But posting your feelings once is sufficient.
>I wonder what a laywer would say about your continued abuse?
Find one and ask him/her.
>
>Would you mind telling the world who your boss is so we can forward your
>posts to him?
Certainly. My wife. And she is a her. If you want to complain about my posts,
try plcymgmt@databasix.com or abuse@databasix.com. I should warn you though
that it probably won't get you very far as I _OWN_ the domain. Perhaps the
folks at sequent would like to see YOUR posts?
>
>You might consider seeking the help of a mental health professional.
You might consider pulling your head out of your ass.
--
for i in databasix primenet ; do ; gburnore@$i ; done
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DOH! | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
spamgard(tm): zamboni | Official Proof of Purchase
===========================================================================
------------------------------
Date: 1 Aug 1998 22:39:04 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: hiding user input
Message-Id: <6q05e8$gf9$9@info.uah.edu>
In article <lt1zr14kcp.fsf@asfast.com>,
Lloyd Zusman <ljz@asfast.com> writes:
: But how do most "newbies" know that so many people have invested so
: much time? Being "newbies" means that they are unfamiliar with the
: fact that this has occurred until *after* someone points it out
: to them. Should this pointing out be done rudely or politely?
You're sadly misinformed. The advice for new users in (surprise!)
news.announce.newusers (have you read it?) suggests that new users
lurk for a while before posting. If new users would wait at most a
week before posting, they'd see gnat's and TomP's posts about FAQs.
The whole reason people compose FAQ lists is because they're tired of
seeing the same questions over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over and
over and over and over and over and over and over and over and over.
When people are this frustrated, one takes one's chances by pushing them
further. This wouldn't happen if they'd wait a while before posting
immediately.
Greg
------------------------------
Date: 1 Aug 1998 22:33:42 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: hiding user input
Message-Id: <6q0546$gf9$8@info.uah.edu>
In article <35c6f0e6.49468449@nntpd.databasix.com>,
gburnore@databasix.com (Gary L. Burnore) writes:
: On 31 Jul 1998 15:24:50 GMT, in article <6psnk2$18n$5@info.uah.edu>,
: gbacon@cs.uah.edu (Greg Bacon) wrote:
: >Worry about the log in your eye before you try to pick the splinter out
: >of Abigail's. Lines over eighty columns are pretty rude.
:
: Only if you have a shitty newsreader that doesn't wrap lines.
Says who? Is it the fault of my newsreader that your signature looks
like garbled line noise too? Sorry, I won't bow down to PoBism.
: Besides, it's
: less rude than her comments to a new poster.
Says who?
: Greg, you were one of those
: promoiting the moderated group. Why not take abiGALE and go there?
clpmod was not intended to and does not replace clpmisc.
: >Did it occur to you that asking a FAQ after so many people have invested
: >so much time in creating a list of answers to FAQs so people would stop
: >asking FAQs is in itself incredibly rude? I guess not. :-(
:
: I think chasing anyone away who's just learning PERL or any other langu
: rude.
Hmm.. ad hominem. Let me try that..
What is your major malfunction, numbnuts? Every person who isn't a
complete twit devoid of anything resembling a clue knows how to
capitalize Perl. You must be one of those crackbabies and your mother
a crackwhore.
: Asking questions that have been asked before may be annoying to you and
: if so, you should just not follow up to them. Let someone else do it o
: THE FUCK UP.
Have you ever considered that the overabundance of FAQs runs people off?
Why do you think Larry doesn't read and post here any more?
: >If you want someone to hold your hand and read the FAQ to you, then
: >consider paying someone. This is not anyone's free helpdesk.
:
: Yes, jerkoff, it is.
You present a fascinating argument, but I'm still not convinced. Could
you elaborate? If you'd like to create a free helpdesk, feel free to
write an RFD for comp.lang.perl.helpdesk.
Can you provide a reference to some study that shows that people who
masturbate necessarily don't know what they're talking about too?
: >This group will be in a world of shit if you run all the experts off.
: >Be careful what you wish for.
:
: Please, if all PERL EXPERTS are this rude, then I'm taking perl out of my
: resume. I wouldn't want a future employer to say, "Oh, perl. Jerk."
Somehow I don't think anyone would need to see your resume to make that
determination. :-)
: YES it's time for the fucking jerkoff rude bastards who _CALL_ themselv
: experts to get the fuck out of this group and run on over to your brand
: spanking new moderated group. You rude jerkoff asshole "EXPERTS" can j
: talk amongst yourself and let the experts who AREN'T rude assholes stay
I reiterate: careful what you wish for.
: As I remember, you're one of the moderators who's best response to peop
: news.groups was "Have you stopped beating your wife yet" (YES, DIRECT Q
The wife beating question is an old saw used to counter an ad hominem
argument. However, seeing how you regard ad hominem as a valid argument
technique, I wouldn't expect you to know that.
my $clue = new Clue;
$gary->stumble_over($clue);
$gary->say('What the fuck is this jerkoff thing?');
$gary->disregard($clue);
Greg
------------------------------
Date: 1 Aug 1998 22:43:03 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: hiding user input
Message-Id: <6q05ln$gf9$10@info.uah.edu>
In article <35c91a66.60094455@nntpd.databasix.com>,
gburnore@databasix.com (Gary L. Burnore) writes:
: Using truth and logic is so unfair scratchie. Why do you use such a tactic
: with Bacon?
Since when is ad hominem valid logic?
Please tell us that you've stopped beating your poor wife.
Greg
------------------------------
Date: Sat, 01 Aug 1998 22:12:25 GMT
From: news@NOSPAM.gb-design.com (Bjorn Malmberg)
Subject: Re: How to change one field in a flat database?
Message-Id: <35c39279.4755068@news.algonet.se>
Thanks everyone for your very kind help!! You all had right, and it
works very good now!!
I opened the database, looked for what to change, changed it and wrote
it to a new tmp file, then renamed it to the original name.. Thanks
again all!!
Bj0rN
------------------------------
Date: Thu, 30 Jul 1998 17:46:07 -0400
From: mshavel@erols.com (Michael Shavel)
Subject: How to match several octals in a row?
Message-Id: <mshavel-3007981746070001@130.9.16.207>
Hi
I am trying to create a regular expression that will match the following
character string. I have tried using ?: but to no avail. I need to strip
these characters only if they occur consecutively in this order.
$_=~s/(?:\015\040\040\040\040\031)//g;
As always.. any help is very much appreciated.
Thanks
Mike Shavel
mshavel@erols.com
------------------------------
Date: 30 Jul 1998 22:58:04 GMT
From: ac1@fspc.netsys.itg.telecom.com.au (nobody)
Subject: Re: Im Willing to pay or give a free DOMAIN for a custom cgi!
Message-Id: <6pqtps$per@newsserver.trl.OZ.AU>
I think you might find that this is fraudlent behaviour.
method98 (method98@iname.com) wrote:
: Can Anyone Make a Hidden Cgi that clicks on sponser
: undectably to the user viewing the web page and the sponsers
: itself... I am willing to pay Webmasters or Hosters $400 USD with my
: credit card, or buy a DOMAIN to anyone how can make this cgi-script
: and the DOMAIN is for 1 year.
: IT MUST BE 110% UNDECTABLE TO THE SPONSERS AND THE USERS!!!
: if you can make this, email a.s.a.p
: method98@iname.com
: Regards
------------------------------
Date: 24 Jul 1998 23:48:03 -0500
From: tye@fumnix.metronet.com (Tye McQueen)
Subject: Re: installing perl in a different directory, @INC
Message-Id: <6pbo23$bs4@fumnix.metronet.com>
) > Danny van der Rijn wrote:
) > >
) > > i want to be able to compile perl (5.00404) and then have people install
) > > it whereever they want to.
) Eric Zylberstejn wrote:
) > Set PERL5LIB, do a 'man perlrun'.
) >
) > Remember to put your platform specific librairies path in PERL5LIB.
Danny van der Rijn <dannyv@tibco.com> writes:
)
) did i forget to mention that i don't want the user to have to do
) anything like changing his environment? (web servers, etc.)
With Perl for Win32 moving towards figuring out how to set up @INC
based on where the perl executable is found, there is a chance
that we'll get an option to not have @INC hard-coded into perl
[which I've secretly wanted for some time]. Finally, a benefit
from the Win32 port. ;>
For now, you can work around it by installing perl into
a particularly long path (like in
/tmp/replace/me/with/the/path/of/where/you/install/perl).
Then you can replace this with the path where you install
it with the proper number of trailing '\0's (so that no
other parts get moved). Perl is a good tool for doing this in
binary files like the perl executable and the perl library.
Then you also need to update all of the path information in
Config.pm so people will be able to install modules after
they install perl. Another task that perl is well suited to.
--
Tye McQueen Nothing is obvious unless you are overlooking something
http://www.metronet.com/~tye/ (scripts, links, nothing fancy)
------------------------------
Date: 1 Aug 1998 22:07:30 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: Interesting Question needs Quick Answer
Message-Id: <6q03j2$gf9$7@info.uah.edu>
In article <Ewuutr.Ip3@csc.liv.ac.uk>,
sm8plh@csc.liv.ac.uk (P.L. Hegarty) writes:
: I want to write a perl script which produces as its output an exact copy of
: itself.
I guess no one's run Russ's .signature:
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
Greg
------------------------------
Date: 30 Jul 1998 17:07:17 -0700
From: hirano@Xenon.Stanford.EDU (Kelly Hirano)
Subject: Re: Newbie Perl Problem
Message-Id: <6pr1rl$qdr@Xenon.Stanford.EDU>
i would recommend picking up a basic unix book and/or a book about running a
web server if you have questions about which suffixes your server will accept
and deal with properly.
these questions are also not perl questions, they're unix and web server
questions. to find the perl interpreter, just type
which perl
at the prompt.
In article <01bdbbeb$dad5df40$0e01a8c0@op.net>,
Marjorie MacDonald <mmacdonald@del.net> wrote:
>OK, guys, help us newbies out! I have THREE PERL books, and while they
>mention setting permissions in the script (and so have others here) NOWHERE
>does it tell me exactly HOW I'm supposed to do this!
>
>One book mentions a umask() command, and gives codes but no example of
>proper syntax or where to put the @#$$#%#$% command.
>
>I, too, keep getting this.. I have move stuff, renamed things, etc. All I
>want to do is run a little database script I found. I'm not a total
>programming dummy, but I haven't worked with this before and I don't run
>the server... and the guys who do are absolutely no help at all.
>
>At least I got them to tell me where the PERL interpreter is located... but
>they're telling my that all my files have to end in cgi, and I see many
>files referenced in my books that would have pl extensions. Do these go in
>the cgi directory or someplace else?
>
>Help!
>Marjorie MacDonald
>
>William L. Loucks <loucksw@bright.net> wrote in article
><6pq8fc$s64$1@cletus.bright.net>...
>> Even as 'root' on Linux Slackware 3.5, when
>> I try to run a Perl script, I get "Permission denied".
>> Any clues??? Thanks
>>
>> W.Loucks <loucksw@bright.net>
>>
>>
>>
--
Kelly William Hirano Stanford Athletics:
hirano@cs.stanford.edu http://www.gostanford.com/
hirano@alumni.stanford.org (WE) BEAT CAL (AGAIN)! 100th BIG GAME: 21-20
------------------------------
Date: 30 Jul 1998 23:47:20 GMT
From: amd0978@acf2.nyu.edu (Adam Donahue)
Subject: Re: number (6 -> 06) conversion question
Message-Id: <6pr0m8$7dj$1@news.nyu.edu>
Lack Mr G M (gml4410@ggr.co.uk) wrote:
: Use printf and a format of %2zd for the number.
Actually, adding 1 to "02" results in "03".
I used sprintf("%02d", $val);
Adam
------------------------------
Date: Sat, 25 Jul 1998 22:42:51 -0500
From: Javaman13 <hendridm@hcil.net>
Subject: Perl for Win32
Message-Id: <35BAA5BA.C7B4193@hcil.net>
I recently downloaded Perl for Win32. I am a beginner with Perl and no
little about the language. I have tried to use some of the tools but I
get error messages pertaining to a file set called "@INC." I need to
know what the file tree should look like and what the reistry should
look like. Also, how do you implement all of the tools that come with
the archive?
Javaman13
------------------------------
Date: Thu, 30 Jul 1998 16:41:56 +0100
From: Andy Ng <aacwn100@york.ac.uk>
Subject: Please Help - Perl on the Web
Message-Id: <35C09444.B0FF996E@york.ac.uk>
Can anyone help?
I want to use perl to execute a program, which is normally run from a
unix prompt in the form of a command line. What goes into the command
line will be collected via a 'form' and just stured in variables, but
how do I execute a program (with a file that the user has already
uploaded!) and then get the output of that program (which will be
another file) back to the user.
(the program is a sound processing one. I'm trying to make it possible
to use it on the Web!)
Please HELP!!
aacwn100@york.ac.uk
------------------------------
Date: 30 Jul 1998 23:23:48 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Possible to parse textfile on another server?
Message-Id: <6pqva4$5gu$3@nswpull.telstra.net>
In article <6pl742$gkq$1@nnrp1.dejanews.com>,
freejak@my-dejanews.com writes:
> Hi. Got a quick question for everyone. I want to generate a page with some
> data from a text file that resides on another server which is updated every 5
> minutes. The external file is on a web server so it is readily available and
> public.
> My question is, is this possible to import this file with perl or would I have
> to run a cron job to ftp the file every 5 minutes or so to my server and parse
> it from there?
There are many ways to do it.
using crontab is probably preferrable above having a script do its own
time scheduling maintenance.
No need to ftp the file, unless you like to. You can use Net::FTP for
that.
Since it is on a web server, you might as well use LWP for that. If
you don't have that installed yet, check CPAN:
http:/www.perl.com/CPAN/.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | "In a world without fences,
Commercial Dynamics Pty. Ltd. | who needs Gates?"
NSW, Australia |
------------------------------
Date: Sat, 01 Aug 1998 21:50:45 GMT
From: Randal Schwartz <merlyn@stonehenge.com>
Subject: Re: printed & bound perl 5.005 manuals?
Message-Id: <8czpdonzh0.fsf@gadget.cscaper.com>
>>>>> "karl" == karl <karl@gnu.org> writes:
karl> Is there anywhere to buy a nice bound and printed copy of the Perl 5.005
karl> documentation? Failing that, has anyone produced a nice single dvi or
karl> PostScript file from it?
I'm in the process of transforming the 5.005_01 docs into both PS and
PDF files for inclusion in the CPAN. We've got the basic process to
work, but I'm shaking out bugs in "pod2ps" right now, and still trying
to figure out how to get some of the READMEs included (which aren't in
POD format).
Stay tuned.
print "Just another Perl [book] hacker,"
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------------------------------
Date: 24 Jul 1998 23:56:40 -0500
From: tye@fumnix.metronet.com (Tye McQueen)
Subject: Re: References as strings
Message-Id: <6pboi8$fav@fumnix.metronet.com>
) > I am trying to store references as strings, and then later
) > dereference them.
You might want to check out Tie::RefHash that is included with the
standard Perl distribution. I'm not sure it will work for your
purposes, but it does do what you describe in one way.
--
Tye McQueen Nothing is obvious unless you are overlooking something
http://www.metronet.com/~tye/ (scripts, links, nothing fancy)
------------------------------
Date: Thu, 30 Jul 1998 21:49:31 GMT
From: mcafee@galaxian.rs.itd.umich.edu (Sean McAfee)
Subject: Re: Schemelike qqq function? reinterpolation without eval; weak eval?
Message-Id: <LT5w1.5932$24.34434340@news.itd.umich.edu>
In article <35C0E2EB.3AD05999@kasey.umkc.edu>,
David Nicol <david@kasey.umkc.edu> wrote:
>I'm sending some form-letter e-mail based on templates read in
>from a database.
>So I've got this template, $Template and a pile of local variables
>that fit into it, and I'm interpolating the local variables into the
>template like so
>send_email_function(eval "qq/$Template/")
>I am worried about my templates getting tainted.
>Is there a Scheme triple quote kind of operator that can explicitly
>interpolate a scalar, following the double-quote rules?
Is something like this what you had in mind?
$a = q/Bite $b, it's $c!/;
$b = "me";
$c = "fun";
$a =~ s/\$[A-Za-z_]\w*/$&/gee;
$a is now "Bite me, it's fun!".
--
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, 1 Aug 1998 18:05:23 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: search and replace - help
Message-Id: <1dd3gmf.qsynsk37bsbwN@bay1-295.quincy.ziplink.net>
Joshua Udall <jaudall@students.wisc.edu> wrote:
Your initial question has already been answered, so...
> if ($line =~ /<IMG SRC=/)
> {
> $line = join 'BLOCK=0 ', split /<IMG /, $line;
> #within the line, split it at <IMG then join inserting 'BLOCK=0'
Unfortunately, with this code the resulting $line will be missing the
'<IMG ' text. I think you may need to review the documentation for
split.
Anyway, a simpler method would be the following:
$line =~ s/<IMG SRC=/<IMG BLOCK=0 SRC=/g;
--
_ / ' _ / - aka - rjk@coos.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: 1 Aug 1998 21:00:46 GMT
From: damian@cs.monash.edu.au (Damian Conway)
Subject: Re: Self-referential regexps in Perl/ Representation of C++ templates as a regexp
Message-Id: <6pvvlu$lme$1@towncrier.cc.monash.edu.au>
"Vernon Mendanha" <vernon@pobox.com> writes:
>I was wondering if it is possible to represent self-referential
>regexps in Perl.
>In particular, I'd like to be able to match a C++ template.
>The template could look like T1 < T2 < T3 < int > > >
>Is this possible in Perl or is there any other way this can be achieved
>using a single regexp?
The Text::Balanced module provides various facilities for matching
balanced-bracket delimited strings (but *not* full regexes). To
extract your T1... template you could write:
$text = "T1 < T2 < T3 < int > > > varname; "
use Text::Balanced qw{ extract_bracketed };
my ($bracket,$remainder,$firsttype) =
extract_bracketed($text, "<>", q{[a-z_]\w*\s*});
if ($bracket)
{
print "Matched:\n";
print " Leading identifier: $firsttype\n";
print " Bracked type info: $bracket\n";
print " Remaining text: $remainder\n";
}
else
{
print "Didn't match\n";
}
extract_bracketed also allows you to easily extract the contents of
the angle-brackets, for possible recursive reprocessing. See the
accompanying POD.
Damian
------------------------------
Date: Thu, 30 Jul 1998 13:56:08 +0100
From: Andrew MacInnes <a.g.macinnes@nospam.rl.ac.uk>
Subject: Re: Sending e-mail using cgi
Message-Id: <35C06D67.BF4B4360@rl.ac.uk>
jthimont@my-dejanews.com wrote:
> I have a standard dial-up account which allow me to execute cgi scripts. I
> wondered if there is a technique to send e-mail using cgi: From (my site) to
> an address acquired from an HTML form. I understand that there are security
> risks using addresses entered in forms. James
>
> -----== Posted via Deja News, The Leader in Internet Discussion ==-----
> http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
This isn't really a perl question. But....
The script formmail.pl can do this for you. You'll just need to tweak it a wee
bit.
Any other cgi questions not directly related to perl should be posted to a cgi
newsgroup.
Hope this helps
Andrew MacInnes
----------------------------------------------------------
- RAL E-mail:A.G.MacInnes@rl.ac.uk -
- DCI Telephone (direct): (01235)446104 -
- Atlas Building -
- R27 - F31 Disclaimer: -
- Chilton, Didcot These opinions are my own and most -
- Oxon, OX11 0QX probably not that of my employers. -
----------------------------------------------------------
------------------------------
Date: Sat, 1 Aug 1998 16:07:46 -0500
From: "Curtis Jewell / Dennis Whalen" <cjdpcssd@ims-1.com>
Subject: Re: Try perl on Ms Dos
Message-Id: <6q004b$o47@enews2.newsguy.com>
Alan Silver wrote in message ...
>In article <35BCB24D.78E8@emirates.net.ae>, Suruchi
><sursood@mail.emirates.net.ae> writes
>>Hi Everyone
>>i would like to try executing some perl scripts on my stand alone pc. I
>>know that perl compiel is available for Ms Dos. i've downloaded it but i
>>can't save my file with the extention .pl . can some one help me.
>>i'm using notepad to make the program.
>
>Notepad saves all files with a .txt extension by default. you can either
>enclose the whole filename in quotes to force it not to add this (so
>save it as "ferret.pl" rather than ferret.pl) or you can select Save As
>*.* from the drop-down and this will not add the .txt extension.
>
>If you are going to do anything on a Windoze machine, please do yourself
>a favour and don't use notepad. It's rubbish. There are loads of
>excellent (free) text editors, many with special modes for Perl. Using
>one of these will help you enormously. If you need more details, reply
>here and I'll dig out some URLs for you.
Like Notepad+ at http://www.xs4all.nl/~theroge/?
------------------------------
Date: Sat, 01 Aug 1998 21:24:23 GMT
From: Jay Taylor <sysop97@nospam.callisto.si.usherb.ca>
Subject: What's the difference?
Message-Id: <35C38671.1597@nospam.callisto.si.usherb.ca>
Thanks for the post.
One question?
What the difference between yours:
if ($inputData[$i] =~ s#$in{'word'}#<b>$in{'word'}</b>#oi)
and this:
if ($inputData[$i] =~ s/$in{'word'}/<b>$in{'word'}</b>/oi)
I thought the pound key simply called a comment.
------------------------------
Date: Sat, 1 Aug 1998 18:05:21 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: What's the difference?
Message-Id: <1dd3g96.7jw5021e3jou8N@bay1-295.quincy.ziplink.net>
Jay Taylor <sysop97@nospam.callisto.si.usherb.ca> wrote:
> One question?
> What the difference between yours:
>
> if ($inputData[$i] =~ s#$in{'word'}#<b>$in{'word'}</b>#oi)
>
> and this:
>
> if ($inputData[$i] =~ s/$in{'word'}/<b>$in{'word'}</b>/oi)
^^^
If you use '/' as the quoting character for the s/// operator, you must
backslash any '/'s which appear in the regex or replacement string. As
written, the above line will result in a compilation error.
Instead of backslashing all the '/'s, however, a nicer-looking solution
is to use a different character with the s/// operator. '#', for
example.
> I thought the pound key simply called a comment.
Usually, but you can use any non-whitespace, non-word[1] character with
any of the quoting operators:
q!!
qq,,
m||
s###
Balanced characters too:
qw()
s{}{}
And so on. Refer to perlop, 'Quote and Quote-like Operators', for more
details.
[1] There is even a way to use word characters, but we won't worry about
that right now. :-)
--
_ / ' _ / - aka - rjk@coos.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Mon, 27 Jul 1998 06:56:53 -0400
From: "Jean-Baptiste Nivoit" <jbnivoit@ix.netcom.com>
Subject: Re: zip files with Perl
Message-Id: <6pqqjo$d47@dfw-ixnews10.ix.netcom.com>
Chabert Sebastien wrote in message <35C0DD13.11AEFD36@cur-archamps.fr>...
>I want to zip some data and send them to a java applet.
>Do i have to create a temporary file with this data and to call
>something like :
>
>system( gzip <my_file> )
>
>or can I do st else ?
>Is there a way, for example to direcly apply gzip (or a Perl sub) on a
>@array in order to compress it ?
I think you might want to take a look at the Zlib module available on CPAN.
HTH,
jb
------------------------------
Date: 12 Jul 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 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
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 3308
**************************************
