[12887] in Perl-Users-Digest
Perl-Users Digest, Issue: 297 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jul 29 13:07:18 1999
Date: Thu, 29 Jul 1999 10:05:15 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 29 Jul 1999 Volume: 9 Number: 297
Today's topics:
Re: Any Suggestions? <emschwar@rmi.net>
Re: Beginner needs help with a function (David Cantrell)
Re: Check if 2 dates are in the same week <eijkhout@prancer.cs.utk.edu>
Comparing Scalars jverk@mediaone.net
Re: Easy way to emulate Unix's "sort" command? <aqumsieh@matrox.com>
Re: Easy way to emulate Unix's "sort" command? (Jim Hutchison)
Re: ebcdic packed numbers <bivey@teamdev.com>
Re: ebcdic packed numbers <uri@sysarch.com>
Re: ebcdic packed numbers <uri@sysarch.com>
Re: eval() question <aqumsieh@matrox.com>
help can't install module sn0brdr@yahoo.com
Re: help can't install module (I R A Darth Aggie)
Re: Help! - Monitoring script (Mike Bristow)
Re: How can I develop WinNT service program? paul_rahe@cissc.canon.com
Re: How to count clicks to HTML link. (Greg Bacon)
Re: How to count clicks to HTML link. <swiftkid@bigfoot.com>
How to determine a date in the past <Steve.Walker@ing-barings.com>
Re: How to trim a String (Greg Bacon)
Re: How to trim a String (Greg Bacon)
Re: How to trim a String (Larry Rosler)
Re: How to trim a String (Larry Rosler)
Re: How to trim a String <swiftkid@bigfoot.com>
Re: How to trim a String <swiftkid@bigfoot.com>
Re: How to: run a DOS batch in perl/cgi? (Anno Siegel)
New Perl for Librarians mailing list (Perl4Lib@vims.edu (Charles McFadden)
Re: NEWSFLASH: Supremes rule anti-advert-ware illegal <blather@moodindigo.com>
Re: Pass by value or pass by reference? <c8133594@comp.polyu.edu.hk>
Re: Perl Anonymity Question (gulp!) <SimsiREMOVETHISBIT@hotmail.com>
Re: perl port to windows CE ? (David Cantrell)
print "Location: http://..." avec paramètres <beaugrand@activebaseconcept.com>
Re: print "Location: http://..." avec paramètres (Michel Dalle)
Re: print "Location: http://..." avec paramètres <beaugrand@activebaseconcept.com>
Re: print "Location: http://..." avec paramètres <beaugrand@activebaseconcept.com>
Re: print "Location: http://..." avec paramètres (Michel Dalle)
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 29 Jul 1999 10:27:32 -0600
From: Eric The Read <emschwar@rmi.net>
Subject: Re: Any Suggestions?
Message-Id: <xkf907zjua3.fsf@valdemar.col.hp.com>
anno4000@lublin.zrz.tu-berlin.de (Anno Siegel) writes:
> It will probably not be a module in most cases.
Ack, thanks. I've gotten so much in the habit of using modules, I use
them where I don't want to (like in documentation :).
-=Eric
------------------------------
Date: Thu, 29 Jul 1999 15:29:57 GMT
From: NukeEmUp@ThePentagon.com (David Cantrell)
Subject: Re: Beginner needs help with a function
Message-Id: <37a17302.80433206@news.insnet.net>
On 28 Jul 1999 15:52:31 GMT, Tobias Galitzien <tg@channel-one.de>
said:
>I assume "c" is your character you want to strip.
>
>So do a
>$string =~ s/^c+//g;
>to strip the c's at the beginning, and a
>$string =~ s/c+$//g;
>to strip them at the end.
>
>Maybe there is a way to do this with only one command, I would be glad to
>hear about it.
$string=~s/^c+(.*)c+$/$1/;
Or if you know that your delimiter will only appear once at each end
of the string, use substr().
[Copying newsgroup posts to me by mail is considered rude]
--
David Cantrell, part-time Unix/perl/SQL/java techie
full-time chef/musician/homebrewer
http://www.ThePentagon.com/NukeEmUp
------------------------------
Date: 29 Jul 1999 11:42:53 -0400
From: Victor Eijkhout <eijkhout@prancer.cs.utk.edu>
Subject: Re: Check if 2 dates are in the same week
Message-Id: <om907zqx6q.fsf@prancer.cs.utk.edu>
abigail@delanet.com (Abigail) writes:
> Did you know there's a FAQ that has "What is CPAN" as part of the heading?
Now I know.
> Expected response: What is a FAQ?
*Where* is the FAQ is more like it. But I got that from another poster.
Thanks everyone for the responses.
--
Victor Eijkhout
------------------------------
Date: Thu, 29 Jul 1999 16:16:40 GMT
From: jverk@mediaone.net
Subject: Comparing Scalars
Message-Id: <7npup0$q72$1@nnrp1.deja.com>
I'm having a problem comparing 3 scalars. In english, here's what I'm
trying to do:
if $scalar1 and $scalar2 and $scalar3 eq ""
then do this
else do this
My problem is I don't know the correct way to write the comparison
between the variables. If all three variables are null, then do this.
If at least one of the variables has a value (any value) then do this.
But how do I write this?
Please help.
Thanks
Jennifer
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Thu, 29 Jul 1999 10:25:42 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: Easy way to emulate Unix's "sort" command?
Message-Id: <x3yemhredne.fsf@tigre.matrox.com>
Eric The Read <emschwar@rmi.net> writes:
> See, folks, we don't REALLY
> hate newbies--
we don't?!
------------------------------
Date: Thu, 29 Jul 1999 15:56:09 GMT
From: jimhutchison@metronet.ca (Jim Hutchison)
Subject: Re: Easy way to emulate Unix's "sort" command?
Message-Id: <37a0711d.155538522@news1.cal.metronet.ca>
On 28 Jul 1999 20:04:13 -0000, Jonathan Stowe
<gellyfish@gellyfish.com> wrote:
>On Wed, 28 Jul 1999 18:38:53 GMT Jim Hutchison wrote:
>> Newbie question here...
>>
>> I'd like to sort a four-column table on a specific field. Perl's sort
>> is only for a simple list...
>>
>
>I would read the article entitled :
>
> =head2 How do I sort an array by (anything)?
>
>in perlfaq4. Of course after you have read that and possibly still
>have difficulties please feel free to ask again.
Thanks Jonathan. As I'm still digesting the basics, the FAQ wasn't
clear on how to do a simple numeric sort on, say, the 3rd column of a
multi-column table.
Their example was for "the first word after the first number"... I
don't know perl enough yet to be creative, so it's not clear to me how
to change the script to sort on another column.
Thanks for your patience.
jim
>
>/J\
>--
>Jonathan Stowe <jns@gellyfish.com>
>Some of your questions answered:
><URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
>Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 29 Jul 1999 15:16:25 GMT
From: "William" <bivey@teamdev.com>
Subject: Re: ebcdic packed numbers
Message-Id: <01bed9d5$6c562940$583c08cf@bill.jump.net>
Uri Guttman <uri@sysarch.com> wrote in article
<x7r9lsqdrb.fsf@home.sysarch.com>...
> >>>>> "W" == William <bivey@teamdev.com> writes:
> W> Something of a pity since it would be nice to have a BCD option
> W> for what I have to do. (The first BASIC I ever used had BCD
> W> floating point - six whole significant digits! I hacked it to
> W> use eight as soon as I could...)
>
> why? i think the bigint modules actual do that as they can hold infinite
> accuracy and it is easiest to use a format like this (maybe a digit per
> byte but i don't know their guts). most/some cheap calculators do bcd
> math since they use 4 bit cpus.
>
> bcd has its place in computerdom, but probably not in perl as a pack
format.
I wasn't clear; I wasn't talking about BCD for packing, I meant for
its accuracy. It represents decimal fractions exactly out to the
limit of its precision and that would be a help. (The lack of it
isn't crippling, though, and given perl's other fine qualities
I accept it gladly.)-Wm
------------------------------
Date: 29 Jul 1999 11:55:36 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: ebcdic packed numbers
Message-Id: <x7r9lrpi13.fsf@home.sysarch.com>
>>>>> "P'tmaN" == Philip 'Yes, that's my address' Newton <nospam.newton@gmx.net> writes:
P'tmaN> Uri Guttman wrote:
>>
>> only the ibm 360 (and descendents), the vax and a few others did this
>> in hardware. no risc machines could do it directly since by
>> definition, decimal instructions are cisc.
P'tmaN> As far as I know, x86 processors can do this in a two-step
process using P'tmaN> DAA / DAS (decimal adjust after
addition/subtraction) or AAA/AAS/AAD/AAM P'tmaN> (ASCII adjust
after...). I think DAA and DAS were in 8080 and Z80 chips, P'tmaN> as
well. So you could do addition and subtraction with packed numbers,
P'tmaN> at least -- by using the normal ADD/SUB opcode and then
correcting with P'tmaN> DAA/DAS.
which backs my point. x86 is a cisc cpu. also where did the decimal
point alignment happen? i recal something about actually converting
decimals to 80 bit floats that some 86's had and doing math and then
converting back.
but a key to decimal math is no rounding errors like you have with
binary versions of decimal numbers. hence pl/1 and cobol's supprt of
them for financial systems.
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
"F**king Windows 98", said the general in South Park before shooting Bill.
------------------------------
Date: 29 Jul 1999 11:57:05 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: ebcdic packed numbers
Message-Id: <x7oggvphym.fsf@home.sysarch.com>
>>>>> "W" == William <bivey@teamdev.com> writes:
W> Uri Guttman <uri@sysarch.com> wrote in article
W> <x7r9lsqdrb.fsf@home.sysarch.com>...
>> bcd has its place in computerdom, but probably not in perl as a pack
W> format.
W> I wasn't clear; I wasn't talking about BCD for packing, I meant for
W> its accuracy. It represents decimal fractions exactly out to the
W> limit of its precision and that would be a help. (The lack of it
W> isn't crippling, though, and given perl's other fine qualities
W> I accept it gladly.)-Wm
i mention that elsewhere in this thread. and perl's bigint modules
should satisfy that need without any extra effort.
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
"F**king Windows 98", said the general in South Park before shooting Bill.
------------------------------
Date: Thu, 29 Jul 1999 10:14:19 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: eval() question
Message-Id: <x3yg127ee6c.fsf@tigre.matrox.com>
Marshall Culpepper <marshalc@americasm01.nt.com> writes:
> I have a user input a variable...lets say $input, now i want the value
> of $input to be the name of a variable i need to use..so lets say i have
> the variables $a, $b, and $c..this is the way i did it:
> $input=$ARGV[0]; # This would be either a,b, or c
> my($a,$b,$c)=('a','b','c'); # Define
> eval("return \$$input"); # This works but what happens if they
> accidentaly enter an incorrect value?
How about using a hash instead?
my %vars = (
'a' => 1,
'b' => 2,
'c' => 3,
);
while (<>) {
chomp;
if (exists $vars{$_}) {
print "The value of \$$_ is $vars{$_}.\n";
} else {
print "The variable \$$_ doesn't exist.\n";
}
}
__END__
HTH,
Ala
------------------------------
Date: Thu, 29 Jul 1999 15:18:47 GMT
From: sn0brdr@yahoo.com
Subject: help can't install module
Message-Id: <7nprcg$nr9$1@nnrp1.deja.com>
hi,
i get the folowing error when i execute "perl -w Makefile.PL":
Can't open perl script "Makefile.PL": No such file or directory.
where can i get such script?
i'm running perl 5.004 on a linux (2.0.36) box.
tia,
newbie
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: 29 Jul 1999 15:48:05 GMT
From: fl_aggie@thepentagon.com (I R A Darth Aggie)
Subject: Re: help can't install module
Message-Id: <slrn7q0u1p.1dv.fl_aggie@thepentagon.com>
On Thu, 29 Jul 1999 15:18:47 GMT, sn0brdr@yahoo.com <sn0brdr@yahoo.com>, in
<7nprcg$nr9$1@nnrp1.deja.com> wrote:
+ i get the folowing error when i execute "perl -w Makefile.PL":
+ Can't open perl script "Makefile.PL": No such file or directory.
+ where can i get such script?
It should be in the module's archive, which you downloaded and
installed? the only other thing I can think of is that your
perl doesn't exist in the same place as the first line of Makefile.PL
thinks it should. But given your invocation, that shouldn't matter.
+ i'm running perl 5.004 on a linux (2.0.36) box.
Are you root? if so, go and get the CPAN module, install that,
then future module installations are much simpler.
James
------------------------------
Date: Thu, 29 Jul 1999 15:38:08 GMT
From: mike@fat.dotat.at (Mike Bristow)
Subject: Re: Help! - Monitoring script
Message-Id: <slrn7q0tb0.6cb.mike@lindt.fat.dotat.at>
On Thu, 29 Jul 1999 15:05:05 +0100, James Nedham <James_Nedham@ml.com> wrote:
>Does anyone know any examples of Perl scripts that check log files for
>certain words then notifies me when those words are written to the log
>files?
=head1 Found in /usr/lib/perl5/5.00503/pod/perlfaq5.pod
=head2 How do I do a C<tail -f> in perl?
This will be a really, really, /BIG/ clue.
You need to be cunning with logfile rotation. (I'll
probably write it up and throw it at The One True FAQer
at some point).
--
Mike Bristow, Geek-At-Large. GK/RT0038
one tequila - two tequila - three tequila - FLOOR !!!
------------------------------
Date: Tue, 27 Jul 1999 18:55:47 GMT
From: paul_rahe@cissc.canon.com
Subject: Re: How can I develop WinNT service program?
Message-Id: <379e0058.6101813@news.cis.canon.com>
You can use the SRVANY program, located on the WinNT Resources kit CD,
to create NT services. Using SRVANY will allow you to use any
executable, including Perl.exe with your script as a parameter, as an
NT service.
Paul
On Tue, 27 Jul 1999 07:58:28 +0900, "Park, Jong-Pork \(326899\)"
<okpolis@okpolis.joo.net> wrote:
>Hello.
>
>What modules that I need to develop for WinNT service with ActiveState Perl?
>
>I think PerlApp is great and it was long waitted for to release. But so big EXE file size when I trying to build with -freestanding
>option. So, I will develop major WinNT service with -freestanding and minor connecting cgi program for it.
>
>Thank you.
>
>
>
------------------------------
Date: 29 Jul 1999 15:16:58 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: How to count clicks to HTML link.
Message-Id: <7npr9a$6vs$3@info2.uah.edu>
In article <7nqsqm$obf5@news.cyber.net.pk>,
"Faisal Nasim" <swiftkid@bigfoot.com> writes:
: <a href="blah.cgi?/mydir/mypage.html">
:
: Use any nice database and increase hits .... and then redirect
: to the page... easy eh?
Your design is broken. Counting HTTP accesses is impossible. Give
it up.
Greg
--
I want to die peacefully in my sleep like my grandfather, not screaming in
terror like his passengers.
------------------------------
Date: Thu, 29 Jul 1999 20:52:23 +0500
From: "Faisal Nasim" <swiftkid@bigfoot.com>
Subject: Re: How to count clicks to HTML link.
Message-Id: <7nr0mh$oo08@news.cyber.net.pk>
: Your design is broken. Counting HTTP accesses is impossible. Give
: it up.
Your challenging me? The best way however are the logs :)
But I think I can hack Apache to call to a Perl script on each request
(to log the request). That would eliminate the need of a script
redirection :)
------------------------------
Date: Thu, 29 Jul 1999 16:59:45 +0100
From: Steve Walker <Steve.Walker@ing-barings.com>
Subject: How to determine a date in the past
Message-Id: <37A07A71.28798CAC@ing-barings.com>
Does anyone know of a way of determining a date in the past, by counting
back a specified number of days? Ideally the date would be returned as
an integer, i.e. YYYYMMDD.
Are there any Perl libraries which provide such a function?
------------------------------
Date: 29 Jul 1999 15:10:15 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: How to trim a String
Message-Id: <7npqsn$6vs$1@info2.uah.edu>
In article <37a063ba@discussions>,
"Amyn " <amynuk@aol.com> writes:
: I am a beginner in PERL and I wanted to know how to trim a String
That's a FAQ. Visit <URL:http://www.perl.com/perl/faq/> for your answer.
: I wanted to get rid of all spaces in a string
$str =~ s/\s+//g;
Greg
--
Irrationality is the square root of all evil.
-- Douglas Hofstadter
------------------------------
Date: 29 Jul 1999 15:13:18 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: How to trim a String
Message-Id: <7npr2e$6vs$2@info2.uah.edu>
In article <7nqsdv$obf3@news.cyber.net.pk>,
"Faisal Nasim" <swiftkid@bigfoot.com> writes:
: I wonder why there aren't precompiled functions like:
:
: rtrim(), ltrim, trim()....
Because they're trivially easy to do with the substitution operator.
: sub trim
: {
: ( local $_ = shift ) =~ s/\s+|\s+$//gs;
: $_
: }
I don't think that does what you think it does (unless you have a
different definition of what it means to trim a string).
Greg
--
Democracy: Two wolves and a sheep voting on what's for dinner.
------------------------------
Date: Thu, 29 Jul 1999 08:43:24 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: How to trim a String
Message-Id: <MPG.120a166ec1287e2b989d6c@nntp.hpl.hp.com>
In article <7npqsn$6vs$1@info2.uah.edu> on 29 Jul 1999 15:10:15 GMT,
Greg Bacon <gbacon@itsc.uah.edu> says...
> In article <37a063ba@discussions>,
> "Amyn " <amynuk@aol.com> writes:
> : I am a beginner in PERL and I wanted to know how to trim a String
>
> That's a FAQ. Visit <URL:http://www.perl.com/perl/faq/> for your answer.
Assuming a 'common-usage' meaning for 'trim' (strip leading and trailing
spaces) that the next sentence would seem to contradict.
> : I wanted to get rid of all spaces in a string
>
> $str =~ s/\s+//g;
Why do we persist in showing inefficient solutions, when the efficient
ones are just as easy to learn?
$str =~ tr/ //d;
Or, as you seem to have interpreted 'all spaces' to mean 'all white-
space characters',
$str =~ tr/ \t\r\n\f//d;
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Thu, 29 Jul 1999 08:50:43 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: How to trim a String
Message-Id: <MPG.120a182cf5f72baf989d6d@nntp.hpl.hp.com>
In article <7nqsdv$obf3@news.cyber.net.pk> on Thu, 29 Jul 1999 19:39:32
+0500, Faisal Nasim <swiftkid@bigfoot.com> says...
> : I am a beginner in PERL and I wanted to know how to trim a String
> : I wanted to get rid of all spaces in a string
>
> I wonder why there aren't precompiled functions like:
>
> rtrim(), ltrim, trim()....
Perhaps because it takes far less energy to write the code than to
remember the names of all the functions.
> Anyway.
>
> $str = " my string ";
> $str = trim ( $str );
>
>
> sub trim
> {
> ( local $_ = shift ) =~ s/\s+|\s+$//gs;
> $_
> }
Saving and restoring a global variable instead of using a lexical
variable is inefficient.
Using alternation of two semantically identical matches in a regex is
odd.
Using a '/s' modifier when there is no '.' in the regex is fatuous.
Using 's' when 'tr' would do the job is inappropriate.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Thu, 29 Jul 1999 20:49:38 +0500
From: "Faisal Nasim" <swiftkid@bigfoot.com>
Subject: Re: How to trim a String
Message-Id: <7nr0hf$oo07@news.cyber.net.pk>
: : sub trim
: : {
: : ( local $_ = shift ) =~ s/\s+|\s+$//gs;
: : $_
: : }
:
: I don't think that does what you think it does (unless you have a
: different definition of what it means to trim a string).
I thought trim means removing space from left and right...
but you are right, he asked, how to remove all spaces... :)
------------------------------
Date: Thu, 29 Jul 1999 20:50:30 +0500
From: "Faisal Nasim" <swiftkid@bigfoot.com>
Subject: Re: How to trim a String
Message-Id: <7nr0j7$ovu1@news.cyber.net.pk>
: : I am a beginner in PERL and I wanted to know how to trim a String
:
: That's a FAQ. Visit <URL:http://www.perl.com/perl/faq/> for your answer.
:
: : I wanted to get rid of all spaces in a string
:
: $str =~ s/\s+//g;
Gotcha! :)
That wouldn't remove all the _spaces_, actually it will remove all spaces,
but some other things (things?) too.... :P
------------------------------
Date: 29 Jul 1999 15:20:02 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: How to: run a DOS batch in perl/cgi?
Message-Id: <7nprf2$1j8$1@lublin.zrz.tu-berlin.de>
Abigail <abigail@delanet.com> wrote in comp.lang.perl.misc:
>Bart Lateur (bart.lateur@skynet.be) wrote on MMCLVII September MCMXCIII
>in <URL:news:37a31487.1973345@news.skynet.be>:
>[] Tim Nettleton wrote:
>[]
>[] >I have need to run a batch file that requests nslookup and ping information
>[] >on several hosts. I would like to have a form on a page that someone can
>[] >just type in the IP or domain and then the .bat file will run in the
>[] >CGI-BIN. I have a unix server and a NT server.
>[] >
>[] >Is this possible?
>[]
>[] Not on Unix. :-)
>
>
>What part of what he wants to do will not be possible on Unix?
Running the msdos .bat file?
Anno
------------------------------
Date: Thu, 29 Jul 1999 11:52:47 -0400 (EDT)
From: chuck@vims.edu (Charles McFadden)
Subject: New Perl for Librarians mailing list (Perl4Lib@vims.edu)
Message-Id: <Pine.GSO.4.05.9907290827530.24609-100000@pagan.vims.edu>
There is a new mailing list for librarians interested in Perl at
Perl4Lib@vims.edu. Its purpose is to encourage beginning Perl programmers
and to provide a forum for active Perl programmers to exchange ideas,
current projects, and programs (both modest and less modest ones).
www.vims.edu/perl4lib is its accompanying web site.
There is a lot of fine work out there in libraries. If you are in a
position to share the programs, please send them or notify the list how to
gain access to them. If you are a secret government agency, maybe not.
Send the message "subscribe perl4lib name" to "listproc@vims.edu".
Charles McFadden
____________________________________ ____________________
Charles McFadden chuck@vims.edu
Virginia Institute of Marine Science www.vims.edu/library
College of William & Mary 804-684-7114
Gloucester Point, VA 23062 804-684-7113 FAX
------------------------------
Date: Thu, 29 Jul 1999 16:00:29 GMT
From: "Dan McGarry" <blather@moodindigo.com>
Subject: Re: NEWSFLASH: Supremes rule anti-advert-ware illegal
Message-Id: <xU_n3.38404$ga.53830@news21.bellglobal.com>
Frank Quednau <quednauf@nortelnetworks.com> wrote in message
news:37A017FE.5430D9C2@nortelnetworks.com...
> Seriously, I enjoyed reading this a lot. It kind of summarises the
> problems I have as a European with that amazing Sub-continent that is
> the USA.
You spelled 'Incontinent' wrong.
(At least you don't have to share a border. It's been described as being in
bed with an elephant.)
--
Dan McGarry
------------------------------
Date: Thu, 29 Jul 1999 22:39:33 +0800
From: Carfield Yim <c8133594@comp.polyu.edu.hk>
Subject: Re: Pass by value or pass by reference?
Message-Id: <37A067A5.18FAC1AC@comp.polyu.edu.hk>
Thanks all
------------------------------
Date: Thu, 29 Jul 1999 17:36:40 +0100
From: "Simmo" <SimsiREMOVETHISBIT@hotmail.com>
Subject: Re: Perl Anonymity Question (gulp!)
Message-Id: <9s%n3.1$B62.948@news.enterprise.net>
Ok thanks anyway Martien....topic closed here i think :-)
><OFFTOPIC>
>IP spoofing is a bad thing, and will most likely confuse your network,
>and almost certainly the machines you are trying to contact. I could
>explain why, but really, this is not a perl matter anymore. I don't
>even believe that perl owuld be the language to do this sort of thing
>in, and have never tried it in perl.
>But honestly, how you do this has no real relevance to perl.
>
>Martien
>--
>Martien Verbruggen |
>Interactive Media Division | Useful Statistic: 75% of the people
>Commercial Dynamics Pty. Ltd. | make up 3/4 of the population.
>NSW, Australia |
------------------------------
Date: Thu, 29 Jul 1999 15:24:45 GMT
From: NukeEmUp@ThePentagon.com (David Cantrell)
Subject: Re: perl port to windows CE ?
Message-Id: <37a07227.80214582@news.insnet.net>
On 28 Jul 1999 21:01:17 -0000, Jonathan Stowe
<gellyfish@gellyfish.com> said:
>On Wed, 28 Jul 1999 09:58:28 -0500 Dan Baker wrote:
>
>> Has there been any action to port perl to windows CE?
>
>I would would hope that its waaay behind the Palmpilot and the Psion 5
>in priority.
Why? Just cos you don't like CE?
[Copying newsgroup posts to me by mail is considered rude]
--
David Cantrell, part-time Unix/perl/SQL/java techie
full-time chef/musician/homebrewer
http://www.ThePentagon.com/NukeEmUp
------------------------------
Date: Thu, 29 Jul 1999 17:26:39 +0200
From: "Sébastien BEAUGRAND" <beaugrand@activebaseconcept.com>
Subject: print "Location: http://..." avec paramètres
Message-Id: <7nps06$a9f$1@oceanite.cybercable.fr>
Comment envoyer des paramètres dans une redirection perl :
J'essaie :
print "Location: usr_copie.asp?Login=".$Login."\n\n";
et ça ne marche pas. La redirection marche, mais je ne reçopis pas lme
paramètre Login.
Merci de votre aide.
------------------------------
Date: Thu, 29 Jul 1999 16:11:07 GMT
From: michel.dalle@usa.net (Michel Dalle)
Subject: Re: print "Location: http://..." avec paramètres
Message-Id: <7npuiv$74$1@news.mch.sbs.de>
In article <7nps06$a9f$1@oceanite.cybercable.fr>, "Sébastien BEAUGRAND" <beaugrand@activebaseconcept.com> wrote:
>Comment envoyer des paramètres dans une redirection perl :
>J'essaie :
> print "Location: usr_copie.asp?Login=".$Login."\n\n";
>et ça ne marche pas. La redirection marche, mais je ne reçopis pas lme
>paramètre Login.
Est-ce que $Login existe ? Ou bien est-ce $login ? (en general,
on utilise des minuscules pour indiquer des variables en Perl.)
Pour le reste, si la redirection fonctionne vraiment, il n'y a pas
de raison pour que le parametre ne passe pas.
A noter que en general on utilise l'URL complet plutot que la
derniere partie. Et ce que le browser fait quand il recoit l'URL
depend de lui. Il se peut que le browser reagisse d'une maniere
bizarre. En tout cas, avec Netscape 4.6 et IE 4.01 ca marche.
Et es-tu sur que l'ASP receptionne bien les parametres avec GET ?
Bonne chance,
Michel.
------------------------------
Date: Thu, 29 Jul 1999 18:42:51 +0200
From: "Sébastien BEAUGRAND" <beaugrand@activebaseconcept.com>
Subject: Re: print "Location: http://..." avec paramètres
Message-Id: <7nq0f3$beo$1@oceanite.cybercable.fr>
Merci de ton aide car je suis coincé.
$Login existe bien et j'ai tout passé en minuscules pour vérifier.
L'asp essaye de récupérer avec :
request.form("login")
Mais ça ne marche toujours pas.
Michel Dalle <michel.dalle@usa.net> a écrit dans le message :
7npuiv$74$1@news.mch.sbs.de...
> In article <7nps06$a9f$1@oceanite.cybercable.fr>, "Sébastien BEAUGRAND"
<beaugrand@activebaseconcept.com> wrote:
> >Comment envoyer des paramètres dans une redirection perl :
> >J'essaie :
> > print "Location: usr_copie.asp?Login=".$Login."\n\n";
> >et ça ne marche pas. La redirection marche, mais je ne reçopis pas lme
> >paramètre Login.
>
> Est-ce que $Login existe ? Ou bien est-ce $login ? (en general,
> on utilise des minuscules pour indiquer des variables en Perl.)
>
> Pour le reste, si la redirection fonctionne vraiment, il n'y a pas
> de raison pour que le parametre ne passe pas.
>
> A noter que en general on utilise l'URL complet plutot que la
> derniere partie. Et ce que le browser fait quand il recoit l'URL
> depend de lui. Il se peut que le browser reagisse d'une maniere
> bizarre. En tout cas, avec Netscape 4.6 et IE 4.01 ca marche.
>
> Et es-tu sur que l'ASP receptionne bien les parametres avec GET ?
>
> Bonne chance,
>
> Michel.
------------------------------
Date: Thu, 29 Jul 1999 18:48:29 +0200
From: "Sébastien BEAUGRAND" <beaugrand@activebaseconcept.com>
Subject: Re: print "Location: http://..." avec paramètres
Message-Id: <7nq0pk$clc$1@oceanite.cybercable.fr>
J'ai trouvé, merci. Il fallait un request.querystring et non request.form
Merci encore
Sébastien BEAUGRAND <beaugrand@activebaseconcept.com> a écrit dans le
message : 7nq0f3$beo$1@oceanite.cybercable.fr...
> Merci de ton aide car je suis coincé.
> $Login existe bien et j'ai tout passé en minuscules pour vérifier.
> L'asp essaye de récupérer avec :
> request.form("login")
> Mais ça ne marche toujours pas.
>
>
> Michel Dalle <michel.dalle@usa.net> a écrit dans le message :
> 7npuiv$74$1@news.mch.sbs.de...
> > In article <7nps06$a9f$1@oceanite.cybercable.fr>, "Sébastien BEAUGRAND"
> <beaugrand@activebaseconcept.com> wrote:
> > >Comment envoyer des paramètres dans une redirection perl :
> > >J'essaie :
> > > print "Location: usr_copie.asp?Login=".$Login."\n\n";
> > >et ça ne marche pas. La redirection marche, mais je ne reçopis pas lme
> > >paramètre Login.
> >
> > Est-ce que $Login existe ? Ou bien est-ce $login ? (en general,
> > on utilise des minuscules pour indiquer des variables en Perl.)
> >
> > Pour le reste, si la redirection fonctionne vraiment, il n'y a pas
> > de raison pour que le parametre ne passe pas.
> >
> > A noter que en general on utilise l'URL complet plutot que la
> > derniere partie. Et ce que le browser fait quand il recoit l'URL
> > depend de lui. Il se peut que le browser reagisse d'une maniere
> > bizarre. En tout cas, avec Netscape 4.6 et IE 4.01 ca marche.
> >
> > Et es-tu sur que l'ASP receptionne bien les parametres avec GET ?
> >
> > Bonne chance,
> >
> > Michel.
>
>
------------------------------
Date: Thu, 29 Jul 1999 16:51:24 GMT
From: michel.dalle@usa.net (Michel Dalle)
Subject: Re: print "Location: http://..." avec paramètres
Message-Id: <7nq0ud$19d$1@news.mch.sbs.de>
In article <7nq0f3$beo$1@oceanite.cybercable.fr>, "Sébastien BEAUGRAND" <beaugrand@activebaseconcept.com> wrote:
>Merci de ton aide car je suis coincé.
>$Login existe bien et j'ai tout passé en minuscules pour vérifier.
>L'asp essaye de récupérer avec :
> request.form("login")
>Mais ça ne marche toujours pas.
Et ca fonctionne quand tu tapes l'URL directement dans ton browser ?
http://.../usr_copie.asp?Login=test123
Ton serveur web ne fait pas de difference entre 'Login' et 'login',
par hasard ? Sinon je ne vois vraiment pas...desole.
Michel.
------------------------------
Date: 1 Jul 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 1 Jul 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.
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 V9 Issue 297
*************************************
