[18282] in Perl-Users-Digest
Perl-Users Digest, Issue: 450 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Mar 9 03:07:42 2001
Date: Fri, 9 Mar 2001 00:05:14 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <984125113-v10-i450@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Fri, 9 Mar 2001 Volume: 10 Number: 450
Today's topics:
Re: building data structure with hash references <cdh@ala.net>
Re: Can a regex do this? <c_clarkson@hotmail.com>
Re: Can a regex do this? (Gwyn Judd)
Re: Can a regex do this? <blah@blah.com>
Re: Can a regex do this? <blah@blah.com>
Re: Can a regex do this? (Sam Holden)
Re: Can a regex do this? <c_clarkson@hotmail.com>
Re: Can a regex do this? (Gwyn Judd)
Re: Can a regex do this? <c_clarkson@hotmail.com>
Re: Can a regex do this? (Jay Tilton)
Re: execution problem (Logan Shaw)
Re: execution problem <john@particlewave.com>
Re: execution problem <wleung@engin.umich.edu>
Re: execution problem <wleung@engin.umich.edu>
Re: execution problem <hafateltec@hotmail.com>
Re: FAQ 6.0: Why do I get weird spaces when I print a (Gwyn Judd)
Re: FAQ 6.0: Why do I get weird spaces when I print a <uri@sysarch.com>
Re: GUI interface for Perl program <cave@pertus.com.pl>
Re: GUI interface for Perl program <cave@pertus.com.pl>
Re: Help to Install Perl <webmaster@webdragon.munge.net>
Re: HELP!!!! perl script that writes to a text database (Gwyn Judd)
Re: Hidden URL (Logan Shaw)
Re: Hidden URL (Miguel Cruz)
Re: Hidden URL <wyzelli@yahoo.com>
Re: Hidden URL <godzilla@stomp.stomp.tokyo>
Re: Hidden URL <hilda@invopower.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 08 Mar 2001 23:34:18 -0600
From: cdh <cdh@ala.net>
Subject: Re: building data structure with hash references
Message-Id: <3AA86B5A.EA603A36@ala.net>
Daniel's account wrote:
> I have some data that is clearly hierarchical, for example like a
> directory listing is.
> eg: /home/foo/test
>
> I want to put this data into a hash data structure. Using the above
> example, I want to create the following hash:
>
> home
> |-> foo
> |-> test
>
> This problem is complicated by the fact that my data is not of a fixed
> depth. For example,
> one entry is: /home/foo/test
> another is: /home/foo/test/applepie
> and another is: /home/foo
>
> So I cannot use the following perl code:
> $ref->{1}->{2}->{3};
> where the numbers represent home, foo, test in my above example.
>
<snip>
Interesting problem, it was quite fun to play with. Try this code out:
#!/usr/bin/perl -w
use strict;
sub store_deephash {
my $hash_ref = shift;
my @keys = @_;
for (@keys) {
my %newhash;
if (not exists $hash_ref->{$_}) {
$hash_ref->{$_} = \%newhash;
}
$hash_ref = $hash_ref->{$_};
}
}
sub fetch_deephash {
my $hash_ref = shift;
my @keys = @_;
my @result;
for (@keys) {
if (not exists $hash_ref->{$_}) {
return undef;
}
@result = keys %{$hash_ref->{$_}};
$hash_ref = $hash_ref->{$_};
}
return @result;
}
my %foo;
store_deephash(\%foo, "foo", "bar", "baz");
store_deephash(\%foo, "foo", "bar", "quux");
store_deephash(\%foo, "foo", "bar", "quux", "quuux");
my @keys;
@keys = fetch_deephash(\%foo, "foo", "bar");
print join(", ", @keys) . "\n";
@keys = fetch_deephash(\%foo, "foo", "bar", "quux");
print join(", ", @keys) . "\n";
Hope this helps:)
Cheers,
Chris Hickman
------------------------------
Date: Thu, 8 Mar 2001 23:31:07 -0600
From: "Charles K. Clarkson" <c_clarkson@hotmail.com>
Subject: Re: Can a regex do this?
Message-Id: <E43382C17BAD04B5.23DACB6D438A93C5.55F735E8AAEC14A6@lp.airnews.net>
: This does not work because it's utilizing parts of the perl language
: and not regexes.
:
: >But that would be a pretty silly way of doing it. Why not just:
: >
: >%m=( 1 => 'a', 2 => ' b', 3 => 'c');$test =~ s/([123])/$m{$1}/g;
:
: Because that's two lines of code, not one.
:
: Looks like it can't be done!
Never say never:
$test =~ s/([123])/${['a', 'b', 'c']}[$1 - 1]/g;
HTH,
Charles K. Clarkson
------------------------------
Date: Fri, 09 Mar 2001 05:30:33 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: Can a regex do this?
Message-Id: <slrn9agqjk.4ja.tjla@thislove.dyndns.org>
I was shocked! How could blahblah <blah@blah.com>
say such a terrible thing:
>>$test =~ s/([123])/{1 => 'a', 2 => ' b', 3 => 'c'}->{$1}/ge;
>
>This does not work because it's utilizing parts of the perl language
>and not regexes.
Say what? Since when were regular expressions not part of the Perl
language? Perhaps you need to specify your problem's arbitrary
preconditions a little better as everyones' laziness genes seem to be
kicking in a little hard for you. It's possible you don't really
understand what a regular expression actually *is*. The s/// operator is
just that, an operator. It *uses* regular expressions, but then again,
so do m//, qr() and split //.
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
Fortune's real live weird band names #689:
Swollen Monkeys
------------------------------
Date: Thu, 08 Mar 2001 23:58:44 -0600
From: blahblah <blah@blah.com>
Subject: Re: Can a regex do this?
Message-Id: <q2sgatk8h67fp5j0qgcclmca5kj0on4u6d@4ax.com>
On Thu, 8 Mar 2001 23:31:07 -0600, "Charles K. Clarkson"
<c_clarkson@hotmail.com> wrote:
>
>
>: This does not work because it's utilizing parts of the perl language
>: and not regexes.
>:
>: >But that would be a pretty silly way of doing it. Why not just:
>: >
>: >%m=( 1 => 'a', 2 => ' b', 3 => 'c');$test =~ s/([123])/$m{$1}/g;
>:
>: Because that's two lines of code, not one.
>:
>: Looks like it can't be done!
>
> Never say never:
>
> $test =~ s/([123])/${['a', 'b', 'c']}[$1 - 1]/g;
>
>HTH,
>Charles K. Clarkson
>
>
Arrrgh, and it's seems so close too! Unfortunately, .net and
jakarta-oro don't like it, the test variable never gets changed. I'm
pretty sure now that "pure" regexes can't do it, and the suggestions
so far have relied on implementation-specific abilities. Thanks for
your effort, though.
------------------------------
Date: Fri, 09 Mar 2001 00:01:08 -0600
From: blahblah <blah@blah.com>
Subject: Re: Can a regex do this?
Message-Id: <29sgat02lakeotdmng5line6fi0t2a8jt8@4ax.com>
On Fri, 09 Mar 2001 05:30:33 GMT, tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
wrote:
>I was shocked! How could blahblah <blah@blah.com>
>say such a terrible thing:
>>>$test =~ s/([123])/{1 => 'a', 2 => ' b', 3 => 'c'}->{$1}/ge;
>>
>>This does not work because it's utilizing parts of the perl language
>>and not regexes.
>
>Say what? Since when were regular expressions not part of the Perl
>language? Perhaps you need to specify your problem's arbitrary
>preconditions a little better as everyones' laziness genes seem to be
>kicking in a little hard for you. It's possible you don't really
>understand what a regular expression actually *is*. The s/// operator is
>just that, an operator. It *uses* regular expressions, but then again,
>so do m//, qr() and split //.
I think you need to go back and read my original post, and then you'd
see that yours makes no sense whatsoever. And while you're at it, I
would suggest you consult with a proctologist about removing the bug
that crawled up your ass.
------------------------------
Date: 9 Mar 2001 06:18:38 GMT
From: sholden@pgrad.cs.usyd.edu.au (Sam Holden)
Subject: Re: Can a regex do this?
Message-Id: <slrn9agtdu.3pm.sholden@pgrad.cs.usyd.edu.au>
On Thu, 08 Mar 2001 23:58:44 -0600, blahblah <blah@blah.com> wrote:
>
>Arrrgh, and it's seems so close too! Unfortunately, .net and
>jakarta-oro don't like it, the test variable never gets changed. I'm
>pretty sure now that "pure" regexes can't do it, and the suggestions
>so far have relied on implementation-specific abilities. Thanks for
>your effort, though.
Maybe that's because this is a perl group.
If you didn't want it done with perl you should ask in a group
that actually cares about the language you want it done in.
--
Sam
I took the initiative in creating the Internet.
--Al Gore
------------------------------
Date: Fri, 9 Mar 2001 00:30:41 -0600
From: "Charles K. Clarkson" <c_clarkson@hotmail.com>
Subject: Re: Can a regex do this?
Message-Id: <1089EC63B5AFEDBC.2766351981AB6A0F.F00B9892202A7A71@lp.airnews.net>
"blahblah" <blah@blah.com> wrote in message
: <c_clarkson@hotmail.com> wrote:
:
: >
: >
: >: This does not work because it's utilizing parts of the perl language
: >: and not regexes.
: >:
: >: >But that would be a pretty silly way of doing it. Why not just:
: >: >
: >: >%m=( 1 => 'a', 2 => ' b', 3 => 'c');$test =~ s/([123])/$m{$1}/g;
: >:
: >: Because that's two lines of code, not one.
: >:
: >: Looks like it can't be done!
: >
: > Never say never:
: >
: > $test =~ s/([123])/${['a', 'b', 'c']}[$1 - 1]/g;
: >
: >HTH,
: >Charles K. Clarkson
: >
: >
:
: Arrrgh, and it's seems so close too! Unfortunately, .net and
: jakarta-oro don't like it, the test variable never gets changed. I'm
: pretty sure now that "pure" regexes can't do it, and the suggestions
: so far have relied on implementation-specific abilities. Thanks for
: your effort, though.
I thought jakarta-oro was java. The above works in perl. In
perl s/// the second part is a string not a regex. Did you try
asking on a java group or am I wrong about jakarta-oro being
java only?
------------------------------
Date: Fri, 09 Mar 2001 06:35:51 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: Can a regex do this?
Message-Id: <slrn9ague0.4ra.tjla@thislove.dyndns.org>
I was shocked! How could blahblah <blah@blah.com>
say such a terrible thing:
>I think you need to go back and read my original post, and then you'd
>see that yours makes no sense whatsoever. And while you're at it, I
>would suggest you consult with a proctologist about removing the bug
>that crawled up your ass.
That's easily fixed *plonk* If you don't want to have a rational
discussion then I'll leave you to troll the rest of the newsgroup
without me.
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
Evil is "live" spelled backwards.
------------------------------
Date: Fri, 9 Mar 2001 00:43:07 -0600
From: "Charles K. Clarkson" <c_clarkson@hotmail.com>
Subject: Re: Can a regex do this?
Message-Id: <714D07FC2FBE5CBB.8A6F2E4D2C1B97FF.4CD66C559DDAC475@lp.airnews.net>
"Charles K. Clarkson" <c_clarkson@hotmail.com> wrote in message :
: "blahblah" <blah@blah.com> wrote in message
: : <c_clarkson@hotmail.com> wrote:
: :
: : >
: : >
: : >: This does not work because it's utilizing parts of the perl language
: : >: and not regexes.
: : >:
: : >: >But that would be a pretty silly way of doing it. Why not just:
: : >: >
: : >: >%m=( 1 => 'a', 2 => ' b', 3 => 'c');$test =~ s/([123])/$m{$1}/g;
: : >:
: : >: Because that's two lines of code, not one.
: : >:
: : >: Looks like it can't be done!
: : >
: : > Never say never:
: : >
: : > $test =~ s/([123])/${['a', 'b', 'c']}[$1 - 1]/g;
: : >
: : >HTH,
: : >Charles K. Clarkson
: : >
: : >
: :
: : Arrrgh, and it's seems so close too! Unfortunately, .net and
: : jakarta-oro don't like it, the test variable never gets changed. I'm
: : pretty sure now that "pure" regexes can't do it, and the suggestions
: : so far have relied on implementation-specific abilities. Thanks for
: : your effort, though.
:
: I thought jakarta-oro was java. The above works in perl. In
: perl s/// the second part is a string not a regex. Did you try
: asking on a java group or am I wrong about jakarta-oro being
: java only?
:
Ah, I see your problem now. Jakarta-oro allows perl5 regexes
but doesn't support perl5 data strucures. I can't test java from here.
See if you can create an array or list from java and place it in the
s///:
$test =~ s/([123])/${['a', 'b', 'c']}[$1 - 1]/g;
This is just a perl array
${['a', 'b', 'c']}[$1 - 1]
if you can do something similar in java you may have a solution.
HTH,
Charles K. Clarkson
------------------------------
Date: Fri, 09 Mar 2001 07:05:40 GMT
From: tiltonj@erols.com (Jay Tilton)
Subject: Re: Can a regex do this?
Message-Id: <3aa87cbd.146495555@news.erols.com>
On Thu, 08 Mar 2001 22:54:10 -0600, blahblah <blah@blah.com> wrote:
There's something wrong with using an appropriate tool? Why are you
placing burdensome constraints on an otherwise trivial problem?
>This does not work because it's utilizing parts of the perl language
>and not regexes.
Only the first half of s/// is a regex. By the rules stated, the
problem is invalid.
No matter. Ridiculous problems require ridiculous solutions. Try one
of these.
$test =~ s/([123])/substr 'abc',$1-1,1/eg;
$test =~ s/([123])/chr($1+ord('a')-1)/eg;
$test =~ s/([123])/sprintf "%lx",$1+9/eg;
$test =~ s/([123])/chr(($-[0]+578)\/6)/eg;
If /e bothers you, here's a sure bet.
$test =~ s/test1 test2 test3/testa testb testc/;
------------------------------
Date: 8 Mar 2001 23:09:34 -0600
From: logan@cs.utexas.edu (Logan Shaw)
Subject: Re: execution problem
Message-Id: <989oie$29t$1@pip.cs.utexas.edu>
In article <JsZp6.1311$mI.146570@typhoon.mw.mediaone.net>,
Stephanie <wleung@engin.umich.edu> wrote:
>I'm trying to execute a cgi script in apache written in perl, but when I run
>it on the server using './<script_name>' I get a 'No such file or directory'
>error. When I type 'perl <script_name>' it runs.
Do you have the *correct* path to perl on the first line?
Try this:
file `sed -e '2,$d' -e 's/^#!//' script_name | awk '{print $1}'`
That was a little goofy, but it's a nice concise way of telling you to
be *sure* that the pathname is actually correct.
- Logan
--
my your his her our their *its*
I'm you're he's she's we're they're *it's*
------------------------------
Date: Thu, 08 Mar 2001 21:39:28 -0800
From: John Lockwood <john@particlewave.com>
Subject: Re: execution problem
Message-Id: <fvqgatoc78ksheu61sg461geo1r44k5s3d@4ax.com>
Well, it's a bit off topic, and I'm not really sure, but offhand two
other possiblities that come to mind are:
1) mod_perl is not loaded.
2) Case mismatch?
Also, what's up with that dot before the backslash? Don't you
typically want "/filename" or "/directory/filename"?
On Fri, 09 Mar 2001 05:01:29 GMT, "Stephanie" <wleung@engin.umich.edu>
wrote:
>Hi,
>
>I'm trying to execute a cgi script in apache written in perl, but when I run
>it on the server using './<script_name>' I get a 'No such file or directory'
>error. When I type 'perl <script_name>' it runs. I'm fairly sure that apache
>was set up correctly, and I've included the path of perl in the first line
>of the script, and set it to 755.
>
>Can anybody tell me what's wrong? I'd appreciate it very much.
>
>Thanks,
>Stephanie
>
------------------------------
Date: Fri, 09 Mar 2001 05:37:33 GMT
From: "Stephanie" <wleung@engin.umich.edu>
Subject: Re: execution problem
Message-Id: <x_Zp6.1410$mI.149466@typhoon.mw.mediaone.net>
I typed in the command and it returned a '>' prompt. What should be the
correct output? I'm pretty sure it's the correct path to perl since I ran
'which perl' and it returned the exact same path I have in the first line.
What else can be wrong?
"Logan Shaw" <logan@cs.utexas.edu> wrote in message
news:989oie$29t$1@pip.cs.utexas.edu...
> In article <JsZp6.1311$mI.146570@typhoon.mw.mediaone.net>,
> Stephanie <wleung@engin.umich.edu> wrote:
> >I'm trying to execute a cgi script in apache written in perl, but when I
run
> >it on the server using './<script_name>' I get a 'No such file or
directory'
> >error. When I type 'perl <script_name>' it runs.
>
> Do you have the *correct* path to perl on the first line?
>
> Try this:
>
> file `sed -e '2,$d' -e 's/^#!//' script_name | awk '{print $1}'`
>
> That was a little goofy, but it's a nice concise way of telling you to
> be *sure* that the pathname is actually correct.
>
> - Logan
> --
> my your his her our their *its*
> I'm you're he's she's we're they're *it's*
------------------------------
Date: Fri, 09 Mar 2001 05:39:51 GMT
From: "Stephanie" <wleung@engin.umich.edu>
Subject: Re: execution problem
Message-Id: <H0_p6.1430$mI.148869@typhoon.mw.mediaone.net>
Thanks - I'm executing it in the server's local directory as an ordinary
perl script, that's why I have to add the dot. mod_perl is loaded, and I
don't think it really matters in this case coz all I'm trying to do is run a
perl script.
What did you mean by case mismatch?
"John Lockwood" <john@particlewave.com> wrote in message
news:fvqgatoc78ksheu61sg461geo1r44k5s3d@4ax.com...
> Well, it's a bit off topic, and I'm not really sure, but offhand two
> other possiblities that come to mind are:
>
> 1) mod_perl is not loaded.
> 2) Case mismatch?
>
> Also, what's up with that dot before the backslash? Don't you
> typically want "/filename" or "/directory/filename"?
>
> On Fri, 09 Mar 2001 05:01:29 GMT, "Stephanie" <wleung@engin.umich.edu>
> wrote:
>
> >Hi,
> >
> >I'm trying to execute a cgi script in apache written in perl, but when I
run
> >it on the server using './<script_name>' I get a 'No such file or
directory'
> >error. When I type 'perl <script_name>' it runs. I'm fairly sure that
apache
> >was set up correctly, and I've included the path of perl in the first
line
> >of the script, and set it to 755.
> >
> >Can anybody tell me what's wrong? I'd appreciate it very much.
> >
> >Thanks,
> >Stephanie
> >
>
------------------------------
Date: Fri, 9 Mar 2001 15:54:10 +1000
From: "Copenhagen" <hafateltec@hotmail.com>
Subject: Re: execution problem
Message-Id: <ce_p6.686$h9f.24117388@news.randori.com>
"Stephanie" <wleung@engin.umich.edu> wrote in message
news:JsZp6.1311$mI.146570@typhoon.mw.mediaone.net...
> Hi,
>
> I'm trying to execute a cgi script in apache written in perl, but when I
run
> it on the server using './<script_name>' I get a 'No such file or
directory'
> error. When I type 'perl <script_name>' it runs. I'm fairly sure that
apache
> was set up correctly, and I've included the path of perl in the first line
> of the script, and set it to 755.
>
> Can anybody tell me what's wrong? I'd appreciate it very much.
>
> Thanks,
> Stephanie
>
>
I'm not sure but are you putting the full path to the file in your browser?
example: http://www.myname.com/cgi-bin/myscript.pl or
http://www.myhost.com/cgi-bin/myscript.cgi
????
------------------------------
Date: Fri, 09 Mar 2001 05:19:45 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: FAQ 6.0: Why do I get weird spaces when I print an array of lines?
Message-Id: <slrn9agpvc.4ja.tjla@thislove.dyndns.org>
I was shocked! How could Michael Carman <mjcarman@home.com>
say such a terrible thing:
>The regular FAQ postings have resulted in a lot of messages like this.
>While its great to see the folks here improving the quality of the
>answers, I've yet to see anyone say that they've submitted their
>enhancements for inclusion into future revisions. Have people been doing
>this silently? (I hope so.)
Ok, just for future reference, the correct address to send things to is
faq@denver.pm.org?
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
And 1.1.81 is officially BugFree(tm), so if you receive any bug-reports
on it, you know they are just evil lies.
-Linus Torvalds
------------------------------
Date: Fri, 09 Mar 2001 07:59:02 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: FAQ 6.0: Why do I get weird spaces when I print an array of lines?
Message-Id: <x7k85zcr08.fsf@home.sysarch.com>
>>>>> "GJ" == Gwyn Judd <tjla@guvfybir.qlaqaf.bet> writes:
GJ> I was shocked! How could Michael Carman <mjcarman@home.com>
GJ> say such a terrible thing:
>> The regular FAQ postings have resulted in a lot of messages like this.
>> While its great to see the folks here improving the quality of the
>> answers, I've yet to see anyone say that they've submitted their
>> enhancements for inclusion into future revisions. Have people been doing
>> this silently? (I hope so.)
GJ> Ok, just for future reference, the correct address to send things to is
GJ> faq@denver.pm.org?
if you look in the headers of the FAQ posts, that is the mail-copy-to
address. your newsreader should support that feature. try doing a
test followup to an FAQ post and see if a CC: faq@denver.pm.org is added to
the headers. don't send in the test. if you don't see the header, add it
yourself.
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: Fri, 09 Mar 2001 07:41:22 +0100
From: Mirek Rewak <cave@pertus.com.pl>
Subject: Re: GUI interface for Perl program
Message-Id: <lbtgatooren5d8m5mepak1kvg02c7mkjaa@4ax.com>
On Tue, 27 Feb 2001 10:57:11 +1300, "Peter Sundstrom"
<peter.sundstrom-eds@eds.com> wrote:
>So why does that disclude it?
>
Some problems: install a web server only for my script, HTML as
interface isn't very elastic - I will need to make not standard
methods, eg. when user types a query, program should interpret
"online" and show clues about the sytntax, errors - I know this might
be done in JavaScript but then I would have to write my prog in
Perl(CGI) + JS + HTML. I would prefer better Perl+(Tk|Win32::GUI).
And what about differences between internet browsers.
Pozdrowienia
Mirek Rewak
cave@pertus.com.pl
------------------------------
Date: Fri, 09 Mar 2001 07:41:23 +0100
From: Mirek Rewak <cave@pertus.com.pl>
Subject: Re: GUI interface for Perl program
Message-Id: <8fugat82lcrh5cuk05n3eeme66ogdu2u8i@4ax.com>
On Tue, 27 Feb 2001 08:13:04 -0600, Michael Carman <mjcarman@home.com>
wrote:
>That said, I would suggest using Tk over Win32::GUI. There's more
>documentation, the aforementioned newsgroup, and your code will be
>portable across platforms. (Presumably Gtk is as well.) On the other
>hand, Win32::GUI may give you a more native "feel."
Thanks. I will try Tk. Maybe I will like it. I gave up with Win32::GUI
when I get strange results.
Pozdrowienia
Mirek Rewak
cave@pertus.com.pl
------------------------------
Date: 9 Mar 2001 07:39:17 GMT
From: "Scott R. Godin" <webmaster@webdragon.munge.net>
Subject: Re: Help to Install Perl
Message-Id: <98a1b5$t00$3@216.155.32.134>
In article <%qKp6.161592$B6.36271990@news1.rdc1.md.home.com>, "Suzanne"
<sbucciarelli1@home.com> wrote:
[snip]
| accomplished. As for "top posting" ... not familiar with any
| particular etiquette ... if that means
[snip]
as for 'top-posting' here's some informational stuff you can peruse, as
to why it's bad form, bad nettiquette, wasteful of resources, and can
and will cause people to simply ignore your posts ( I kid you not )
This is akin to a "dress code" here and IS something that the perl
masters and gurus who post here will tend to insist on.
Top posting wouldn't even exist if some bright young and stupid
MicroSoft programmer hadn't written the app to use that as the 'default'
instead of following usenet convention for this purpose. (visualizing MS
inter-company e-mail, all top-posted and containing zillions of lines of
previous text that no one ever reads along with every single .sig of
every previous poster. and laughing.)
anyway, the links I promised:
[ Please put your comments *following* the quoted text that you
are commenting on.
Please do not quote an entire article. (notice that I snipped your
post -- usenet has 'references' to previous articles that can be used --
there's ABSOLUTELY NO NEED to include the entire previous article in a
follow-up as long as you follow-up properly. notice at the top of my
post it even kindly INCLUDES the reference to the previous article! :)
Please do not quote .sigs. (I snipped your .sig too, following
standard usenet convention)
Please see:
http://www.geocities.com/nnqweb/nquote.html
http://www.uwasa.fi/~ts/http/quote.html
http://www.btinternet.com/~chiba/sbox/topposters.html
Thank you.
Jeopardectomy performed. (it's called Jeopardy-style after the
gameshow "Jeopardy")
]
I hope you find this useful information. I hope you decide to stop
top-posting based on the knowledge you gain from this information. I
hope you don't think I'm flaming you in ANY way shape or form. (I'm not
-- I'm being informative and helpful)
--
unmunge e-mail here:
#!perl -w
print map {chr(ord($_)-3)} split //, "zhepdvwhuCzhegudjrq1qhw";
# ( damn spammers. *shakes fist* take a hint. =:P )
------------------------------
Date: Fri, 09 Mar 2001 05:21:06 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: HELP!!!! perl script that writes to a text database question.
Message-Id: <slrn9agq1s.4ja.tjla@thislove.dyndns.org>
I was shocked! How could alan scanlon <alan@afdsolutions.com>
say such a terrible thing:
>hmm... how do i fix it then?
How about what I suggested? Getting a lock on the file before you read
from it?
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
Fortune's real live weird band names #544:
Premature Ejaculation
------------------------------
Date: 8 Mar 2001 23:12:18 -0600
From: logan@cs.utexas.edu (Logan Shaw)
Subject: Re: Hidden URL
Message-Id: <989oni$2cp$1@pip.cs.utexas.edu>
In article <3aa8628a$0$19564@wodc7nh1.news.uu.net>,
Hilda <hilda@invopower.com> wrote:
>I am now using perl to write some web pages and want to open a new page
>without the user knowing the IP and port that shown in the URL...
>Is that a way to hide this URL???
>
>eg.
>
>http://123.123.2.4:9999/cgi-bin/test.pl
>
>becomes
>
>http://cgi-bin/test.pl or something else not showing 123.123.2.4:9999
There isn't a way to do this. The user's browser has to know the
hostname and port number in order to make the connection. If
there were a way to tell the browser to hide this information, it
would be possible to defeat it because the user owns the browser.
- Logan
--
my your his her our their *its*
I'm you're he's she's we're they're *it's*
------------------------------
Date: Fri, 09 Mar 2001 05:18:09 GMT
From: mnc@admin.u.nu (Miguel Cruz)
Subject: Re: Hidden URL
Message-Id: <lIZp6.1129$g17.711997@typhoon2.ba-dsg.net>
Hilda <hilda@invopower.com> wrote:
> Hoping this is not quite off-topic.
Completely.
> I am now using perl to write some web pages and want to open a new page
> without the user knowing the IP and port that shown in the URL...
> Is that a way to hide this URL???
>
> eg.
> http://123.123.2.4:9999/cgi-bin/test.pl
> becomes
> http://cgi-bin/test.pl or something else not showing 123.123.2.4:9999
Two options:
1. Frame the new page.
2. Proxy the page through the original server.
In either case, the URL will not show up in the browser's location window.
In the second case, the user will have no way of knowing where it is; in the
first, they can tell by looking at the HTML source or the link or, if not
using IE, their browser's "page info" command.
miguel
------------------------------
Date: Fri, 9 Mar 2001 15:06:25 +0930
From: "Wyzelli" <wyzelli@yahoo.com>
Subject: Re: Hidden URL
Message-Id: <GNZp6.25$Cy2.5389@vic.nntp.telstra.net>
"Hilda" <hilda@invopower.com> wrote in message
news:3aa8628a$0$19564@wodc7nh1.news.uu.net...
> Hi,
>
> Hoping this is not quite off-topic.
>
> I am now using perl to write some web pages and want to open a new
page
> without the user knowing the IP and port that shown in the URL...
> Is that a way to hide this URL???
>
> eg.
>
> http://123.123.2.4:9999/cgi-bin/test.pl
>
> becomes
>
> http://cgi-bin/test.pl or something else not showing 123.123.2.4:9999
>
Have the user connect to your script.
Have your script grab the other page (using LWP)
Have your script print the page to the users browser.
Wyzelli
--
push@x,$_ for(a..z);push@x,' ';
@z='092018192600131419070417261504171126070002100417'=~/(..)/g;
foreach $y(@z){$_.=$x[$y]}y/jp/JP/;print;
------------------------------
Date: Thu, 08 Mar 2001 21:51:07 -0800
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: Hidden URL
Message-Id: <3AA86F4B.C7560020@stomp.stomp.tokyo>
Hilda wrote:
(snipped)
> ...want to open a new page without the user knowing the IP
http://www.nwi.net/~pchelp/obscure.htm
Godzilla!
--
Kira, Professional Poker Player
http://la.znet.com/~callgirl/android/poker.cgi
Kira, Professional Blackjack Player
http://la.znet.com/~callgirl/android/blakjack.cgi
Androids And More
http://la.znet.com/~callgirl/android.html
------------------------------
Date: Fri, 9 Mar 2001 15:30:41 +0800
From: "Hilda" <hilda@invopower.com>
Subject: Re: Hidden URL
Message-Id: <3aa88061$0$23739@wodc7nh1.news.uu.net>
"Miguel Cruz" <mnc@admin.u.nu> wrote in message
news:lIZp6.1129$g17.711997@typhoon2.ba-dsg.net...
> Hilda <hilda@invopower.com> wrote:
> > Hoping this is not quite off-topic.
>
> Completely.
>
> > I am now using perl to write some web pages and want to open a new page
> > without the user knowing the IP and port that shown in the URL...
> > Is that a way to hide this URL???
> >
> > eg.
> > http://123.123.2.4:9999/cgi-bin/test.pl
> > becomes
> > http://cgi-bin/test.pl or something else not showing 123.123.2.4:9999
>
> Two options:
>
> 1. Frame the new page.
> 2. Proxy the page through the original server.
>
> In either case, the URL will not show up in the browser's location window.
> In the second case, the user will have no way of knowing where it is; in
the
> first, they can tell by looking at the HTML source or the link or, if not
> using IE, their browser's "page info" command.
>
> miguel
Thanks.
But i am not quite sure how to frame a new page, can u give me an example?
Hilda
------------------------------
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 V10 Issue 450
**************************************
