[16000] in Perl-Users-Digest
Perl-Users Digest, Issue: 3412 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Jun 18 11:05:24 2000
Date: Sun, 18 Jun 2000 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: <961340710-v9-i3412@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Sun, 18 Jun 2000 Volume: 9 Number: 3412
Today's topics:
[Fwd: Read password from $REMOTE_USER and remove it out <derijk@linuxfan.com>
Re: [Fwd: Read password from $REMOTE_USER and remove it <flavell@mail.cern.ch>
Re: Crazy enough that it might just work... (John Stanley)
Re: Crazy enough that it might just work... <henry@penninkilampi.net>
Dir Listing <psychoNOpsSPAM@pcpatches.com.invalid>
Dir Listsing <psychoNOpsSPAM@pcpatches.com.invalid>
Re: Dir Listsing <hedim@hta-bi.bfh.xxx>
Re: filesystem-like data structure <iltzu@sci.invalid>
Re: good books for beginning Perl? <john@silsden.ezesurf.co.uk>
How to find a module for my project? <kingwang98@yahoo.com>
Re: How to find a module for my project? <dave@dave.org.uk>
Re: I need help to get headlines on my site <phuket@phuket-guide.com>
Re: I need help to get headlines on my site <dave@dave.org.uk>
IRC and HTTPd <d.weiss@bytesatwork.de>
Re: module fields <yishay@cortext.co.il>
Re: Newlines again, was Re: Ugh <flavell@mail.cern.ch>
Re: Newlines again, was Re: Ugh (jason)
Re: Newlines again, was Re: Ugh <flavell@mail.cern.ch>
Re: Perl code for unzip <Hans.de.Bruin@Chello.nl>
Re: Perl code for unzip <you.will.always.find.him.in.the.kitchen@parties>
Perl without a server ? <john@silsden.ezesurf.co.uk>
Re: Perl without a server ? <jvm@ysabel.net>
Re: Perl without a server ? <flavell@mail.cern.ch>
Re: read single chars <flavell@mail.cern.ch>
redirection with cgi metza@my-deja.com
Re: subdomain name forwarding scripts ?? <omygod@my-deja.com>
Re: Ugh <iltzu@sci.invalid>
win2K and perl include problem! <copy@eunet.yu>
XS Makefile.PL using .cpp files <amir@cti2.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sun, 18 Jun 2000 12:00:33 +0200
From: Pieter de Rijk <derijk@linuxfan.com>
Subject: [Fwd: Read password from $REMOTE_USER and remove it out of the browser]
Message-Id: <394C9DC1.A876BA8F@linuxfan.com>
Hello,
Is there a possibilitie to read the password of $REMOTE_USER?
And can I remove the password and $REMOTE_USER settings out of
the browser with perl???
I know that's possible with php3, but php3 use other
environmental variables :( !!!
I use:
Apache 1.3.6
SuSE Linux 6.4 (kernel 2.2.14)
Thnx in advance
--
Pieter de Rijk
FiWeb Communications
+------------------------------------+
| Helpdesk linux: |
| helpme@penguinpowered.com |
| |
| E-Mail Ichthus Hogeschool: |
| ichthus@linuxfan.com |
+------------------------------------+
| Computer nodig??? |
| http://www.a-sys.nl |
+------------------------------------+
------------------------------
Date: Sun, 18 Jun 2000 13:00:15 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: [Fwd: Read password from $REMOTE_USER and remove it out of the browser]
Message-Id: <Pine.GHP.4.21.0006181256391.29175-100000@hpplus03.cern.ch>
On Sun, 18 Jun 2000, Pieter de Rijk wrote:
> Is there a possibilitie to read the password of $REMOTE_USER?
Check your web server configuration and FAQs.
f'ups suggested
> And can I remove the password and $REMOTE_USER settings out of
> the browser with perl???
The same as with any other programming language. You'll need to
understand a little bit about what you're doing first.
Nick Kew's CGI FAQ addresses this to some extent. (The bottom line is
that you can make it work part of the time.)
good luck.
------------------------------
Date: 18 Jun 2000 08:08:21 GMT
From: stanley@skyking.OCE.ORST.EDU (John Stanley)
Subject: Re: Crazy enough that it might just work...
Message-Id: <8ii01l$49q$1@news.NERO.NET>
In article <henry-C0ECB3.11255318062000@news.metropolis.net.au>,
Henry <henry@penninkilampi.net> wrote:
>In article <8ih66e$rp9$1@news.NERO.NET>, stanley@skyking.OCE.ORST.EDU
>(John Stanley) wrote:
>>> Alright, John. Since it doesn't look like you want to read the FAQs,
>>> I'll explain the process to you. It'll only take a moment because it
>>> is quite trivial...
>>
>> Description of a long and complicated process which will not succeed
>> the vote and will not happen, deleted.
>
>Whether or not the proposal would succeed or not is a different issue.
No it is not. If your proposal will not occur because you cannot achieve
the number of votes required, then it is not a trivial thing to
implement.
>The reason for my post was to address the misinformation that you were
>spreading. Specifically, your baseless assertion that it could not be
>done.
It cannot. You cannot funnel all postings for THIS GROUP through your
little bot for you to vet prior to appearance in this group. It is
simply not how news works. You CAN create a different group where all
such postings are open for your approval, but you do not seem interested
in creating a different group for this, you want it here.
If you understood how an unmoderated group works, you would know it is
impossible.
>> A process which would result in the formation of a different group
>> than this one.
>
>Wrong again. A RFD/CFV can be used to submit a modification to an
>existing group.
Which would create a different group.
>> That's not trivial. Not a single step of that is trivial.
>
>I'm sorry you are challenged by the details. Perhaps you should migrate
>your career towards something less mentally demanding - pottery, perhaps?
Bye bye, troll.
>I spent a couple of hours researching this topic, and _nowhere_ did I
Oh, a whole couple of hours. Now I understand.
>> Since you will never get this group changed, you will have to
>> create a DIFFERENT moderated group.
>
>Once again, the success/failure of the RFD/CFV process is not at issue,
When you claim it will be trivial to implement your plan, yes, it is.
>> Explain how YOUR system which simply delays
>> newbie FAQs for 8 days, is better than the current moderated group
>> system where every first time poster gets a pointer to the FAQ and
>> NOBODY's FAQ is posted at all.
>
>As I'm sure I've said on two previous occasions, it goes without saying
>that the newbie would get an instant response from the bot saying that
>their message was being placed in a queue. That message would also
>contain a pointer to the FAQ and to other online resources, so that the
>first-time poster could help themselves in the interim.
So how is this better than the pointer to the FAQ the poster to the
existing moderated group gets?
>As for comparisons between clp.moderated and my proposed system, what
>can I say except that clp.moderated is "censored" and my proposed system
>isn't.
All moderated groups are censored. Censorship is not defined by the
material that finally appears in the medium, it is defined by the act of
passing a censor.
>> Then you have to get the group passed.
>
>Well, then the proposal for modifications needs to be formalised and a
>RFD initiated. The usual processes take it from there.
You have no clue. Not even the small clue that most people are born
with. "The usual processes" do not get the group passed. You need to
convince enough people to let you vet their postings to the second
moderated perl newsgroup, with no remaining open USENET group left.
You need to convince enough people NOT to object to you changing this
group.
It will not be trivial to do this.
>All of your arguments have been systematically decimated. Your complete
Reduce them by 1/10th and they still hold.
>> Please do not waste our time messing in what you don't understand.
>
>I see no-one else fabricating and arguing about imaginary technical
>flaws but you.
You are not yet debating this in news.groups.
------------------------------
Date: Mon, 19 Jun 2000 00:19:37 +0930
From: Henry <henry@penninkilampi.net>
Subject: Re: Crazy enough that it might just work...
Message-Id: <henry-856462.00193719062000@news.metropolis.net.au>
In article <slrn8kofm3.ojo.abigail@alexandra.delanet.com>,
abigail@delanet.com wrote:
> But, exactly, what posts is it going to stop? If someone doesn't lurk
> in the group first, and just asks a FAQ, that posting isn't going to
> be stopped. It comes to the group after 8 days anyhow, after which
> it gets answered, while the posters no longer is interested in finding
> the answer.
I understand this, which is why I suggested (in the original post) that
a new poster's message could be outright rejected (instead of being
queued) and a FAQ/resource pointer immediately emailed back to them,
informing them of the process and other (faster) ways to help themselves.
That way the new poster would need to be persistent, and submit the post
a second time, before it would actually be placed in the queue.
I simply do not think many parasites would bother doing that, being as
impatient as they are, so we would avoid having to deal with their posts
at all.
So it doesn't just delay the inevitable, but it cuts out posts entirely
from extremely impatient new posters.
> And any subsequent posting of such a person isn't delayed,
> as only someone's first posting will be delayed.
Correct. The basic model assumes no delay on subsequent posts.
> What will happen is
> an increase of people that keep hitting the post button because their
> posting doesn't show up instantly.
And for every repost they make, they will be sent another FAQ/pointer to
resources, and advised of the procedure. Not only that, but their most
recent post would replace their previous post (only one item per poster
should be allowed in the queue at any time) so when their post finally
does get in, and makes it to the group, it was their very latest
question.
In this way a newbie could post a question, then wander off and if they
solved their first question by other means, post another one and have
that replace the first in the queue.
> It might stop someone who first looks around in the group, lurking,
> as (s)he will be aware of the procedures. But then it's stopping someone
> who is likely to be a good contributor to the group.
I believe that the only ones who will be so annoyed as to give up on
clpm, and never come back, are the people with no patience at all. I
believe a disproportianate amount of these people will be parasites. I
accept that there will be colateral damage, and that impatient, genuine
newbies may be affected, but believe that they will be in the minority.
In effect, we'd be filtering out the _really_ impatient people. That
would make this place a better lace, I think.
> Once again, I suggest you create a new group where you can test out
> your suggested practise. If it's effective, people will migrate from
> this group to yours. If it's not, this group hasn't been ruined.
Unfortunately, that approach is, and will always be, doomed to failure.
It is the nature of the masses to adopt the path of least resistance
and, given an option between two groups, one of which is totally open
(clp.misc) and another which is _not_ totally open (clp.moderated, for
example), the masses will virtually always choose the easiest, most open
path - right to the doorstep of clp.misc.
We could create alternative groups until the cows come home, but as long
as clp.misc exists, and has no barrier to entry, it will the the chosen
route for newbies.
What it'm trying to do is make the path of least resistance point to the
Perl FAQ, and to <http://www.perlfaq.com/> _instead_ of
comp.lang.perl.misc, and the _only_ way that that can be accomplished is
by increasing the resistance level of the path to this group.
I understand that there are concerns, but there is no reason why we
couldn't set the _initial_ delay to ZERO, and test the waters before
wading in.
What that would mean is that a new poster's message would get passed
straight through. It would make sense for the bot to send them the
FAQ/pointer to resources, so that could happen as well.
Then, once everyone could see that everything was working as it should,
we could reconfig the bot to reject the first post, respond with the
FAQ, and then queue the post if it is resubmitted - similar to ciwac.
Then, once that settled down, we could slowly bump up the delay period -
perhaps by an hour at a time, and _see_what_happens_. If the
signal:noise ratio starts dropping - great, increase it some more. If
the newsgroup starts to get quiet, then we can stop, or even back off a
bit.
By simply testing the parameters, we can see what sort of an effect it
is having, and then make a judgement about whether it is good or bad for
the group, and whether more change is desired, and in which direction.
All this idea does is give us a contol mechanism which might, just
might, make this place _better_ than it is now. At the very worst, what
would happen would have a bot available to automatically send FAQs to
new posters, but which lets their messages go straight though - just
like they do now.
What could we possibly lose?
Henry.
------------------------------
Date: Sun, 18 Jun 2000 01:43:52 -0700
From: psycho <psychoNOpsSPAM@pcpatches.com.invalid>
Subject: Dir Listing
Message-Id: <1b6cc7ba.8327a2c0@usw-ex0102-013.remarq.com>
hey, ok I need a way to get a Dir info. from a dir i want, so
far i have it displaying(listing) the contents of the dir. but
my probelm is is geting the rest of the information.. ok like on
the servers default dir listing it have the filename, size, date
and des. and how would i do this and get this information?
Thanks,
psycho
Got questions? Get answers over the phone at Keen.com.
Up to 100 minutes free!
http://www.keen.com
------------------------------
Date: Sun, 18 Jun 2000 01:32:51 -0700
From: psycho <psychoNOpsSPAM@pcpatches.com.invalid>
Subject: Dir Listsing
Message-Id: <1e9f04e3.8047d5e1@usw-ex0102-013.remarq.com>
hey, i've got a question. Im doing this script for some one, and
all it does is read's the dir and put's it out in to what ever i
want it to look like, but that's not the probelm. The probelm is
that on the server default listing it has the filename, last
modifed, size and crap i was woundering if theres a way to get
the size and the last modified, and des. So that i dont have to
have a file that has all the listings crap for the dir. in a
file.. if you know how to get the information. please bemy guest
and tell me.. =)
Thanks,
Psycho
Got questions? Get answers over the phone at Keen.com.
Up to 100 minutes free!
http://www.keen.com
------------------------------
Date: Sun, 18 Jun 2000 11:19:34 +0200
From: Markus Hediger <hedim@hta-bi.bfh.xxx>
Subject: Re: Dir Listsing
Message-Id: <394C9426.DE69A786@hta-bi.bfh.xxx>
hi there!
take a look at "perlfunc" in the perl-documentation. below a copy of
stat(), the function that you might be interested in:
regards
--
stat FILEHANDLE
stat EXPR
stat
Returns a 13-element list giving the status info for a file, either the
file opened via FILEHANDLE, or named by EXPR. If EXPR is omitted, it
stats $_. Returns a null list if the stat fails. Typically used as
follows:
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
$atime,$mtime,$ctime,$blksize,$blocks)
= stat($filename);
Not all fields are supported on all filesystem types. Here are the
meaning of the fields:
0 dev device number of filesystem
1 ino inode number
2 mode file mode (type and permissions)
3 nlink number of (hard) links to the file
4 uid numeric user ID of file's owner
5 gid numeric group ID of file's owner
6 rdev the device identifier (special files only)
7 size total size of file, in bytes
8 atime last access time since the epoch
9 mtime last modify time since the epoch
10 ctime inode change time (NOT creation time!) since the epoch
11 blksize preferred block size for file system I/O
12 blocks actual number of blocks allocated
(The epoch was at 00:00 January 1, 1970 GMT.)
--
------------------------------
Date: 17 Jun 2000 22:51:56 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: filesystem-like data structure
Message-Id: <961280363.5515@itz.pp.sci.fi>
In article <86n1kkhtps.fsf@kronstadt.speakeasy.org>, Ian Zimmerman wrote:
>times, but OTOH something like a recursively nested array (containing
>references to subdirectory contents) might take too much store, I am
>afraid (the typical tar listing I have in mind is between 1 and 5MB),
>and it wouldn't be trivial to construct, either. (Basically I'd need
>to rewrite the kernel namei() routine in perl...)
Hmm.. I don't know about the memory usage, but certainly constructing
a nested hash shouldn't be too hard:
sub element {
my $ref = shift;
return @_ ? element(\$$$ref{+shift}, @_) : $ref;
}
sub make_file_hash {
my $root = {};
for (@_) {
my $ref = element(\$root, split '/');
warn "$_ exists!\n" and next if defined $$ref;
$$ref = m!/$! ? {} : $_;
}
return $root;
}
Adding more elaborate error handling in case of inconsistent file
lists is left as an exercise, as is putting something more useful in
the hash values than just the file names.
--
Ilmari Karonen - http://www.sci.fi/~iltzu/
Please ignore Godzilla and its pseudonyms - do not feed the troll.
------------------------------
Date: Sun, 18 Jun 2000 12:34:48 +0100
From: "John Heath" <john@silsden.ezesurf.co.uk>
Subject: Re: good books for beginning Perl?
Message-Id: <8iic9m$4mf$1@news8.svr.pol.co.uk>
Picked up a cracking one yesterday - no good as a full reference, but
brilliant for learning the basics. Very impressed with it.
Elizabeth Castro
Perl & CGI for the world wide web
Its a 'visual quickstart guide'
published by Peachpit press
isbn 0-201-35358-x
Cost me £13.99
The book mentions a website - www.peachpit.com
Its nicely broken down into simple tasks that newcomers (like me) to perl
would typically need, then illustrates and explains the code
I'll be buying a few more for students at school.
John Heath
> I would like to learn Perl from scratch, can anyone recommend a good book
on
> it? I have very very little programming experience. So far I've short
listed
> "Learning Perl" and "Teach yourself Perl in 21 days". Any ideas?
>
> Thanks in advance.
>
>
> Jonathan Tsu
>
------------------------------
Date: Sun, 18 Jun 2000 15:54:20 +0200
From: "Charles W.W." <kingwang98@yahoo.com>
Subject: How to find a module for my project?
Message-Id: <394CD48C.47614830@yahoo.com>
------------------------------
Date: Sun, 18 Jun 2000 15:01:23 +0100
From: Dave Cross <dave@dave.org.uk>
Subject: Re: How to find a module for my project?
Message-Id: <1hlpks0vtd1j1k7tm5ijdp462lnefpa9i3@4ax.com>
On Sun, 18 Jun 2000 15:54:20 +0200, "Charles W.W."
<kingwang98@yahoo.com> wrote:
[nothing]
<http://search.cpan.org>
--
<http://www.dave.org.uk> SMS: sms@dave.org.uk
yapc::Europe - London, 22 - 24 Sep <http://www.yapc.org/Europe/>
"There ain't half been some clever bastards" - Ian Dury [RIP]
------------------------------
Date: Sun, 18 Jun 2000 09:46:41 +0200
From: Johan =?iso-8859-1?Q?B=FCnger?= <phuket@phuket-guide.com>
Subject: Re: I need help to get headlines on my site
Message-Id: <394C7E61.61B8D0B3@phuket-guide.com>
Hi Tina,
The problem with their answer is its not working!
I have spent a whole day testing, I only get Error 500 all the time, to get it
all work
I need a compleat script that first strip the HTML and the split the
headlines, after thi is should be plasing the info on my web-site via a SSI
Sincerely
Johan
PS. I think I am rather stupid when its about scripting so this just might be
the problem!
Tina Mueller wrote:
> hi,
>
> Johan Bünger <phuket@phuket-guide.com> wrote:
> > I have been trying to get hold on a simple way to include headlines that
> > is updated every day. I would like to collect the information from a
> > site:
>
> > http://www.phuketgazette.net/feedme/index.asp
> > [...]
>
> what was wrong with the answers of tad and dave to your posting
> 14 hours ago?
>
> tina
>
> --
> http://tinita.de \ enter__| |__the___ _ _ ___
> tina's moviedatabase \ / _` / _ \/ _ \ '_(_-< of
> search & add comments \ \ _,_\ __/\ __/_| /__/ perception
------------------------------
Date: Sun, 18 Jun 2000 14:58:38 +0100
From: Dave Cross <dave@dave.org.uk>
Subject: Re: I need help to get headlines on my site
Message-Id: <6ogpksksqvretehcdkqlekdg6p4fsr7kmm@4ax.com>
[Please put your responses _after_ the text that you're quoting]
On Sun, 18 Jun 2000 09:46:41 +0200, Johan Bünger
<phuket@phuket-guide.com> wrote:
>Tina Mueller wrote:
>
>> hi,
>>
>> Johan Bünger <phuket@phuket-guide.com> wrote:
>> > I have been trying to get hold on a simple way to include headlines that
>> > is updated every day. I would like to collect the information from a
>> > site:
>>
>> > http://www.phuketgazette.net/feedme/index.asp
>> > [...]
>>
>> what was wrong with the answers of tad and dave to your posting
>> 14 hours ago?
>>
>> tina
>>
>Hi Tina,
>
>The problem with their answer is its not working!
>I have spent a whole day testing, I only get Error 500 all the time, to get it
>all work
>I need a compleat script that first strip the HTML and the split the
>headlines, after thi is should be plasing the info on my web-site via a SSI
Sounds like you should be testing your script on a local machine
before trying it out on the web server. Here are a few ideas for
debugging CGI scripts.
1/ Use CGI.pm - as it has a command line debugging mode.
2/ Always use '-w' and 'use strict'.
3/ Put 'use CGI::Carp qw(fatalsToBrowser;' in your script.
4/ Read your web server error logs.
>PS. I think I am rather stupid when its about scripting so this just might be
>the problem!
If you want someone to write you a script, then employ a programmer.
Dave...
--
<http://www.dave.org.uk> SMS: sms@dave.org.uk
yapc::Europe - London, 22 - 24 Sep <http://www.yapc.org/Europe/>
"There ain't half been some clever bastards" - Ian Dury [RIP]
------------------------------
Date: Sun, 18 Jun 2000 13:02:35 +0200
From: "Dominik Weiss" <d.weiss@bytesatwork.de>
Subject: IRC and HTTPd
Message-Id: <8iia9b$4usha$1@fu-berlin.de>
Hi!
I'm searching for a simple IRC server written in Perl or a http server which
can handle more than one users the same time.
Does anyone know where to find some scripts/modules? Please no answers like
"look at CPAN" - I already was there.
--
MfG, Dominik "DASGiB" Weiss
www.drastic.de || icq 31369694
Wollen Sie Ihre Festplatte formatieren?
[J]a
[N]atürlich
------------------------------
Date: Sun, 18 Jun 2000 12:08:18 -0400
From: "Yishay Weiss" <yishay@cortext.co.il>
Subject: Re: module fields
Message-Id: <394c9130$1@news.barak.net.il>
Hi,
I will offer a simpler context for a similar problem. Consider the following
class...
package A;
use fields qw(x);
sub new {
...
}
sub foo {
my $self = shift;
my $test = $self->{x}; # line XX
}
1;
We might sometimes get the message
'no such array field at line XX'. Although one clearly sees 'x' was defined
as a field. Inheritance may or may not play a role here, I don't know.
Anyway, if it does it would be in the following context...
package B;
use A;
use base qw(A);
1;
my $b = B->new;
$b->foo();
Again, we might get the erroneous message 'no such array field at line XX'.
We couldn't isolate this bug into a demo script, so we can only offer this
description.
Any help would be appreciated,
Yishay
ran tene <rant@coretext.co.il> wrote in message
news:39474e76@news.barak.net.il...
> We have problems using the 'fields' module.
>
> Some times it seems that the fields are not inherited correctly.
>
> ex:
> class a is superclass of class b.
> class a use the line - use fields qw( aField ).
> class a has method m using the field 'aField'.
> class b use the line - use base qw( a)
>
> In some more complicated casses using an object of type b
> when i call b->m i recieve the massage:
> 'No such array field at a'.
>
> Unfortunatly we can not specify this 'more complicated casses'.
>
> Thanks in advance.
>
>
------------------------------
Date: Sun, 18 Jun 2000 13:08:43 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: Newlines again, was Re: Ugh
Message-Id: <Pine.GHP.4.21.0006181302260.29175-100000@hpplus03.cern.ch>
On Sun, 18 Jun 2000, jason wrote:
> is there some confusion with my use of the phrase "on Windows" ?? ..
So why did you contradict a statement that was explicitly about Macs?
> I made a comment about some code that was proposed as a solution to the
> originator's line ending problem ..
Sure, that problem was already covered. I was following up to the fact
that you contradicted Bart Lateur, who was apparently looking at the
broader picture. As far as I could see, your contradiction was wrong.
> I never tried to - nor wanted to - nor have any expertise to address any
> problem other than the one of the originator - specifically changing
> Windows line endings to UNIX ones
Fine.
------------------------------
Date: Sun, 18 Jun 2000 13:12:54 GMT
From: elephant@squirrelgroup.com (jason)
Subject: Re: Newlines again, was Re: Ugh
Message-Id: <MPG.13b7680c736f8907989747@news>
Alan J. Flavell writes ..
>On Sun, 18 Jun 2000, jason wrote:
>
>> is there some confusion with my use of the phrase "on Windows" ?? ..
>
>So why did you contradict a statement that was explicitly about Macs?
yes .. I was made a mistake in that part of my post .. can we let this
thread die the death that it deserves now ?
--
jason - elephant@squirrelgroup.com -
------------------------------
Date: Sun, 18 Jun 2000 15:28:42 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: Newlines again, was Re: Ugh
Message-Id: <Pine.GHP.4.21.0006181528020.9254-100000@hpplus03.cern.ch>
On Sun, 18 Jun 2000, jason wrote:
> >So why did you contradict a statement that was explicitly about Macs?
>
> yes .. I was made a mistake in that part of my post ..
fine, it's easily done.
> can we let this thread die the death that it deserves now ?
yes please.
------------------------------
Date: Sun, 18 Jun 2000 08:40:14 GMT
From: Hans <Hans.de.Bruin@Chello.nl>
Subject: Re: Perl code for unzip
Message-Id: <394C8B3C.C62B964C@Chello.nl>
Luc-Etienne Brachotte wrote:
>
> Hi,
>
> I'm looking for Perl code/module for unziping (also for zipping) files,
> mainly to a Perl scalar variable. unzipping to a file will also do.
>
> Tx
>
> LEB
I always try to avoid using additional modules when I don't realy need
to use them. So I use gzip to read a compressed like: open(FILE,"gzip
-dc filename |").
Hans
------------------------------
Date: Sun, 18 Jun 2000 22:53:17 +1200
From: "Tintin" <you.will.always.find.him.in.the.kitchen@parties>
Subject: Re: Perl code for unzip
Message-Id: <961325521.279805@shelley.paradise.net.nz>
"Hans" <Hans.de.Bruin@Chello.nl> wrote in message
news:394C8B3C.C62B964C@Chello.nl...
> Luc-Etienne Brachotte wrote:
> >
> > Hi,
> >
> > I'm looking for Perl code/module for unziping (also for zipping) files,
> > mainly to a Perl scalar variable. unzipping to a file will also do.
> >
> > Tx
> >
> > LEB
>
> I always try to avoid using additional modules when I don't realy need
> to use them. So I use gzip to read a compressed like: open(FILE,"gzip
> -dc filename |").
Except that gzip will not handle zip files.
------------------------------
Date: Sun, 18 Jun 2000 12:17:55 +0100
From: "John Heath" <john@silsden.ezesurf.co.uk>
Subject: Perl without a server ?
Message-Id: <8iibap$45t$1@news8.svr.pol.co.uk>
Is it possible to run perl scripts from a web browser without the script
residing on the ISP server ?
I wish to use Explorer as an off line HTML browser to browse the contents of
my own hard disk and be able to run a perl script as if I was on line. This
is to enable script testing before submitting them.
------------------------------
Date: Sat, 17 Jun 2000 14:15:15 +0200
From: Jan van Mansum <jvm@ysabel.net>
Subject: Re: Perl without a server ?
Message-Id: <394B6BD3.A2EA08C4@ysabel.net>
You could install an Apache server on your PC and set it up to do that.
I gather you are on a Win32 platform, so:
http://www.egovision.com/htmlresources/articles/apache_win32.html
John Heath schreef:
> Is it possible to run perl scripts from a web browser without the script
> residing on the ISP server ?
>
> I wish to use Explorer as an off line HTML browser to browse the contents of
> my own hard disk and be able to run a perl script as if I was on line. This
> is to enable script testing before submitting them.
------------------------------
Date: Sun, 18 Jun 2000 14:37:50 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: Perl without a server ?
Message-Id: <Pine.GHP.4.21.0006181430070.9254-100000@hpplus03.cern.ch>
On Sun, 18 Jun 2000, John Heath wrote:
> Is it possible to run perl scripts from a web browser without the script
> residing on the ISP server ?
The answer to the question which you asked is yes. I have certain
Perl scripts configured in the browser as helper applications for
various content-types, for example.
However, it becomes clear that this wasn't the question you intended
to ask. You don't really wish to run these scripts "from a web
browser" at all (the web browser is only used to invoke the network
transaction, and to view the results).
> I wish to use Explorer as an off line HTML browser to browse the contents of
> my own hard disk and be able to run a perl script as if I was on line.
Then install a web server on it, and invoke it as localhost
(127.0.0.1). You'll find this question discussed to some extent in
previous postings, but you'd be more at home in
comp.infosystems.www.servers.ms-windows (I'm assuming this is the OS
that your system runs in). The issue is also addressed in the
activestate Perl installation notes and (ahem) FAQs (ActivePerl FAQ ->
Web server Config).
good luck.
------------------------------
Date: Sun, 18 Jun 2000 13:16:31 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: read single chars
Message-Id: <Pine.GHP.4.21.0006181314480.29175-100000@hpplus03.cern.ch>
On Fri, 16 Jun 2000, Trevor Sky Garside wrote:
> Don't forget to set $/ back to "\n" when you're done.
You might rather want to restore it to whatever it had been before.
cheers
------------------------------
Date: Sun, 18 Jun 2000 14:13:49 GMT
From: metza@my-deja.com
Subject: redirection with cgi
Message-Id: <8iileo$vnq$1@nnrp1.deja.com>
Hi,
I'm new to perl, and I was writing a cgi script that after accepting form
input displays a thank you message. I know I can produce this thankyou
message using the print command, but I want be quite a complex looking page.
What I would prefer to do, is instead of writing a message out using the
print command, is indirect the user to a pre-prepared standard thank you
message page. Can I do this?
I guess if I cant redirect the user, I would have to copy the standard page
in, then output it to the standard output. But this seems to be a waste of
processing time. If I have to do this, can anyone tell me how to load a file
in to a data structure (a linked list of strings I guess), then send it to
the standard output?
Thanks
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sun, 18 Jun 2000 07:48:51 GMT
From: Ramya <omygod@my-deja.com>
Subject: Re: subdomain name forwarding scripts ??
Message-Id: <8ihut3$j1s$1@nnrp1.deja.com>
Thanks for all the responses. However does this mean that I need to
have multiple domain names parked. I mean do I need to register
geeks.myname.com, music.myname.com etc parked separately in order to
use them in the above url redirection.
Once again thank you very very much,
Ramya.
In article <394A585E.1CB83AD6@lycosmail.com>,
Johannes <gedichte@lycosmail.com> wrote:
> Ramya wrote:
>
> > Hi,
> > I am not sure a javascript can do this or you need a cgi/perl
script
> > but here is what I am looking for. I have a domain name
www.myname.com
> > and I want to create subdomain names like music.myname.com ,
> > geek.myname.com etc. which in turn will be pointing to
> > www.myname.com/music and www.myname.com/geek for there respective
index
> > pages.
>
> This isn't done with a script, you have to change your DNS
configuration,
> to send *.myname.com to your webserver.
> Then you can change your webserver to point anything different from
www to
> the subdirectory you want.
>
>
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 18 Jun 2000 12:34:56 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: Ugh
Message-Id: <961331318.12191@itz.pp.sci.fi>
In article <MPG.13b70c22a611f38f989745@news>, jason wrote:
> #!/usr/bin/perl -w -i
> while (<>) {s/\r\n*/\n/g;}
> continue {print;}
BTW, ITYM s/\r\n?/\n/g.
Using a * in the pattern would collapse CR-LF-LF-LF into a single LF,
which, while not likely to happen very often, is also unlikely to be
the desired behavior.
Actually, it wouldn't happen with your code - assuming $/ == "\n" - at
all, but I've found the idiom more useful when applied to entire files
at a time. And anyway it's still just not *right*.
--
Ilmari Karonen - http://www.sci.fi/~iltzu/
Please ignore Godzilla and its pseudonyms - do not feed the troll.
------------------------------
Date: Sun, 18 Jun 2000 15:35:58 +0200
From: "Kopija" <copy@eunet.yu>
Subject: win2K and perl include problem!
Message-Id: <8iijgs$akr$1@SOLAIR2.EUnet.yu>
I have problem with win2k advanced server and perl (activestate build 613).
When I use include of counter.plx (perliis.dll) in my shtml page:
...........
<td> you are visitor nr.: <!--#exec cgi="cgi-bin/counter.plx"--></td>
...........
I get this response from IIS and/or counter.plx:
you are visitor nr.: HTTP/1.1 200 OK Date: Sun, 18 Jun 2000 12:54:45 GMT
Server: Microsoft-IIS/5.0 Content-type: text/html 280.
my counter.plx finishes like this:
...........
print "Content-type: text/html\n\n"
print "$count"
...........
if I exlucude Content-type then i don't get anything back!
Is there something to setup in IIS5.0 or add some code in script???
Thanks
Zoran
------------------------------
Date: Sun, 18 Jun 2000 15:40:45 +0200
From: news <amir@cti2.com>
Subject: XS Makefile.PL using .cpp files
Message-Id: <394cc0a7@news.bezeqint.net>
Hi,
Is there a way to cause MakeMaker to use .cpp extensions for the c-code when
building an extension ?
I'm using VC++6.0 on NT and trying to create an extension for C++ code. When
I manually change the Makefile to use .cpp extension instead of .c, the
extension comiles fine, but the original Makefile does not work correctly.
Thanks,
Amir Rosen
amir@cti2.com
------------------------------
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 3412
**************************************