[7957] in Perl-Users-Digest
Perl-Users Digest, Issue: 1582 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jan 5 11:09:59 1998
Date: Mon, 5 Jan 98 08:00:23 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Mon, 5 Jan 1998 Volume: 8 Number: 1582
Today's topics:
Re: **1A Please Help, Perl is harrassing me ** (Jonathan Feinberg)
Re: [Help?] Feasible in PERL? <grg@philol.msu.ru>
Re: Carriage Return Error <rootbeer@teleport.com>
Re: CGI Bin Locked????? HAY-ELP!! <mpchandler@mema.mail.fedex.com>
Re: Find two strings in a file (Frank)
Re: flock v.s. Sun OS (Nathan V. Patwardhan)
form+mail : script <affix@usa.net>
Re: Hashes - Heres my try, can you help me to tidy it u <jdporter@min.net>
Re: Hashes - Heres my try, can you help me to tidy it u <rootbeer@teleport.com>
Re: Help! "%1 is not a valid Windows NT application." <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
how do you get today's date for DateCalc ? (Alexander Farber)
Re: how do you get today's date for DateCalc ? <rootbeer@teleport.com>
Re: i need perl5.0** <emorr@fast.net>
IIS4, Perl and HTTP headers <freeman@exti.com>
Integrating perl's regex functionss into other packages (Robert Waldstein)
IPC Between 2 Systems <fussy@mpinet.net>
Is there a random function <kobe@technologist.com>
Re: Is there a random function (Mike Stok)
Re: Javascript error on CGI perl application using Comu <rootbeer@teleport.com>
newbie question: install perl on solaris 2.5.1 <selz@wise.wiwi.tu-dresden.de>
Re: perl is c worsened (was: Re: word wrap routine) <jdporter@min.net>
Re: Perl not Y2K compliant (Chris Nandor)
Re: Perl not Y2K compliant (John Moreno)
PERL: How do I overwrite output? <poohba@io.com>
PERL: How do I terminate a session? <poohba@io.com>
Processnumber $$ on NT <bjorn.elstad@sds.no>
require not working (Mark)
Re: sending email (Net::SMTP).. problem <gbarr@ti.com>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 5 Jan 1998 10:17:56 -0500
From: jdf@pobox.com (Jonathan Feinberg)
Subject: Re: **1A Please Help, Perl is harrassing me **
Message-Id: <MPG.f1ac3add2de511f9896a5@news.concentric.net>
[This followup was posted to comp.lang.perl.misc and a copy was sent to the cited author.]
dmartine@cu.campus.mci.net said...
> Perl thinks that the @ symbol is the beginning of an array obviously.
> Can anyone show me some code that would search the $form{'email'}
> variable for the @ symbol and then stick the \ (backslash) symbol in
> front of it so it takes it as a literal?
>
> Would this be an 'if' statement kind of thing?
This would be found in perlfunc under the "quotemeta" entry.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
------------------------------
Date: Mon, 5 Jan 1998 17:17:13 +0300
From: "Grigoriy Strokin" <grg@philol.msu.ru>
Subject: Re: [Help?] Feasible in PERL?
Message-Id: <34b0eb7b.0@boy.nmd.msu.ru>
You should read a VERY good article on the subject:
http://www.stonehenge.com/merlyn/UnixReview/col04.html
I'll hope you'll then be able to do what you want.
Grigoriy Strokin.
>e.g. My database file: (n rows, by m colums)
>
> field1 field2 field3 field4 field5 ... fieldm [return]
> r1_field1 r1_field2 ... r1_fieldm [return]
> r2_field1 r2_field2 ... r2_fieldm [return]
> .
> .
> rn_field1 rn_field2 ... rn_fieldm [return]
>
>The database is dynamic so it can have an arbitrary n rows and
>m columns. What I would to know is how to use PERL to:
>
>(1) read in first line, determine how many "fields" (columns) there are.
>(2) use these fields as keys to the data section that immediately
> so we can access data by:
>
> data[row_m][column_n]
> -or-
> data[row n]{"field name"} ## somehow use associate array?
>
>(3) Modify and/or delete a whole row?
>
------------------------------
Date: Mon, 5 Jan 1998 07:11:01 -0800
From: Tom Phoenix <rootbeer@teleport.com>
To: "Jack M. King" <jhnyreb@gnt.net>
Subject: Re: Carriage Return Error
Message-Id: <Pine.GSO.3.96.980105070702.18360C-100000@user2.teleport.com>
On Sun, 4 Jan 1998, Jack M. King wrote:
> I'm attempting to setup a webshop (written by someone else) and keep
> getting the following error:
>
> Did you forget to remove the carriage returns following a network
> transfer?
>
> Needless to say there was no network transfer,
The message suggests that because the most frequent cause of this problem
(by far) is an incorrect transfer between a Unix and a non-Unix machine.
But if you've got some carriage return characters which your text editor
won't let you easily change, you could try a command like this one, which
uses the Unix command-line conventions.
perl -pi.bak -e 's/\r\n?/\n/g' textfiles*
Hope this helps!
--
Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
Ask me about Perl trainings!
------------------------------
Date: Mon, 05 Jan 1998 09:44:36 -0600
From: Michael P Chandler <mpchandler@mema.mail.fedex.com>
Subject: Re: CGI Bin Locked????? HAY-ELP!!
Message-Id: <34B0FFE4.ECA2CA61@mema.mail.fedex.com>
Joshua J. Kugler wrote:
> On Sun, 04 Jan 1998 13:33:06 -0500, sean@dcdX.net (Sean O'Dwyer)
> wrote:
>
> ()Hi,
> ()
> ()I'm a Perl newbie. I've written some scripts which I want to run
>
> ()error message saying "403 Forbidden. Your client does not have
> permission
> ()to get URL /cgi-bin/demo/rndmzr.cgi from this server."
> ()
> ()Is there some security option I'm missing? Or does anyone have a
> clue
> ()what's going on?
>
> This is a FAQ.
Some web-servers recognize 'configured' directories only for cgi processing...
if you're using NCSA and/or NSCP you may want to have your subdirectory
added to a STD-CGI-PATH (else it is an unrecognizable file).
------------------------------
Date: Mon, 05 Jan 1998 15:17:09 GMT
From: FHeasley@chemistry.com (Frank)
Subject: Re: Find two strings in a file
Message-Id: <34b0f7a6.1731078@news.halcyon.com>
On Sat, 03 Jan 1998 17:04:09 GMT, boggiano@venus.it wrote:
>Hi all,
>i must write a program for matching 2 strings (AND)
>in a file.
>
>The file might have the strings on different rows,
>so i can't use the statment:
>
>if ((/$string1)&&(/$string2))
>
>also, i can't use:
>
>if (/$string1/)||(/$string2/)
>{
> $flag=1;
>}
>if ((/$stringa1/)||(/$stringa2/)&& flag=1)
>{
> print "Match!\n";
>}
>
>becuse i risk to find the same string on different rows.
Your problem breaks down into two solutions, one simple, one complex.
Solution 1. Where you know the identity of the string you're checking
for duplication, or where it's readily identifieable as a subset of
the file you're checking, you simply load it into a variable, and then
check that variable against the file.
Solution 2. You don't know the identity of the string. In this case,
you will need to decide how long the test string should be, then you
will need to recursively pick out every possibility of that length and
check it against the entire file.
Either option can be set up using regular expressions. Obviously, #1
will be finished much sooner than #2!
Frank
------------------------------
Date: 5 Jan 1998 15:00:35 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: flock v.s. Sun OS
Message-Id: <68qsij$57c@fridge.shore.net>
John Bokma (use@reply.address.com) wrote:
: Summary of my perl5 (5.0 patchlevel 4 subversion 1) configuration:
: Platform:
: osname=solaris, osvers=2.5.1, archname=sun4-solaris
Ahh, Solaris. If I'm correct, Solaris uses fcntl not flock unless you
tell it to link stuff differently. Linking against the
BSD-compatibility libs is covered in the Solaris FAQ (see:
rtfm.mit.edu or such).
--
Nathan V. Patwardhan
please don't send spam to president@whitehouse.gov
------------------------------
Date: 5 Jan 1998 15:39:29 GMT
From: <affix@usa.net>
Subject: form+mail : script
Message-Id: <01bd19e7$b1f1de40$ec6b9ec2@clubinternet.club-internet.fr>
hi,
I need to find a simple PERL script that is used to send form mails,
without any external pogram, (like blat!)
This is for a NT server
TQ
Lawrence
------------------------------
Date: Mon, 05 Jan 1998 09:35:03 -0500
From: John Porter <jdporter@min.net>
Subject: Re: Hashes - Heres my try, can you help me to tidy it up !
Message-Id: <34B0EF97.1F68@min.net>
> > $_ = "egg egg bacon bread egg fried chips"; # its early morning !
The one time when spam is actually appropriate, it is omitted! ...
------------------------------
Date: Mon, 5 Jan 1998 07:22:51 -0800
From: Tom Phoenix <rootbeer@teleport.com>
To: "Daniel V. Klein" <dvk@lonewolf.com>
Subject: Re: Hashes - Heres my try, can you help me to tidy it up !
Message-Id: <Pine.GSO.3.96.980105071325.18360D-100000@user2.teleport.com>
On Sun, 4 Jan 1998, Daniel V. Klein wrote:
> I love Perl - 99.9% of my coding is in Perl nowadays. And sometimes,
> Perl just isn't the right answer. Here's a shellish answer - the
> advantage to which is that it will handle *gigantic* files without
> huge amounts of memory:
>
> tr -cd '[a-zA-Z]' '\012' < file | sort | uniq -c | sort -nr
Perl is not the right answer? A Perl script to do the same thing as that
command, using a hash tied to (say) a B-Tree structure on disk, could
also handle gigantic files without taking huge amounts of memory. But it
would probably run faster. :-)
--
Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
Ask me about Perl trainings!
------------------------------
Date: Mon, 5 Jan 1998 06:20:28 -0800
From: "Creede Lambard" <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Subject: Re: Help! "%1 is not a valid Windows NT application."
Message-Id: <68qq60$7e2@bgtnsc02.worldnet.att.net>
I can't give you much help because I can't see the code. However, it's
possible that you don't know that if you run a program from NT's console, %1
is assigned the value of the first parameter. Or, in an easier-to-understand
language, Example, if you run
perl foo.pl bar
then NT assigns an NT console variable called %0 the value "perl", %1 takes
the value "foo.pl" and %2 takes the value "bar".
So, it looks like this is an NT console problem rather than a Perl problem.
Sorry.
--- Creede Lambard
Minister of Irregular Expressions
Programming Republic of Perl
Neil Barker wrote in message <34B0AD79.8572E307@mail.cqit.qld.edu.au>...
>I have an IIS 4 pentium server with perl working fine. I just installed
>the Dec 31 release OK as well.
>I am trying to add a discussion BBS. There are a few written for Unix
>that should work. However, I get the following error when my browser
>calls the cgi file.
>"%1 is not a valid Windows NT application. "
>I can't see the %1 used anywhere in the cgi file nor am I using it as a
>parameter.
>Any clues?
>
>Neil
>
>--
>+----------------------------------------------------------------+
>| /\ / /--- / / Neil Barker neil@cqit.qld.edu.au |
>| / \ / /-- / / Ph 61 79 403335 Fax 61 79 403319 |
>| / \/ /___ / /___ Central Queensland Institute of TAFE |
>| http://www.cqit.qld.edu.au Mackay, Queensland, Australia |
>+----------------------------------------------------------------+
>
>
------------------------------
Date: 5 Jan 1998 13:47:45 GMT
From: eedalf@eed.ericsson.se (Alexander Farber)
Subject: how do you get today's date for DateCalc ?
Message-Id: <68qoa1$1br11@aken.eed.ericsson.se>
Hi,
i am using the very comfortable module DateCalc,
but wonder how do the others calculate today's
date (year, month, day) for it? I do it like this:
@today = decode_date ((localtime)[3] . '/' .
((localtime)[4] + 1) . '/' .
(1900 + (localtime)[5]));
and then i can use further for example:
$week1 = week_number (@today);
But i think it is not the best way: localtime is being
called 3 times and then the complicated decode_date.
So what is your way?
Thanks in advance
Alex
------------------------------
Date: Mon, 5 Jan 1998 07:45:21 -0800
From: Tom Phoenix <rootbeer@teleport.com>
To: Alexander Farber <eedalf@eed.ericsson.se>
Subject: Re: how do you get today's date for DateCalc ?
Message-Id: <Pine.GSO.3.96.980105073459.18360I-100000@user2.teleport.com>
On 5 Jan 1998, Alexander Farber wrote:
> i am using the very comfortable module DateCalc,
> but wonder how do the others calculate today's
> date (year, month, day) for it? I do it like this:
>
> @today = decode_date ((localtime)[3] . '/' .
> ((localtime)[4] + 1) . '/' .
> (1900 + (localtime)[5]));
Wait - As I read the docs, the return value of decode_date is ($year, $mm,
$dd), three numbers. Don't you want to simply do something like this?
@today = (localtime)[5,4,3]; # yy mm dd
$today[1]++; # fix 0-based month
$today[0]+=1900; # fix 1900-based year
> and then i can use further for example:
>
> $week1 = week_number (@today);
That should work, if I've read the docs right.
> But i think it is not the best way: localtime is being
> called 3 times and then the complicated decode_date.
You were right to be cautious - imagine if midnight passed between one
call to localtime and the next! :-)
--
Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
Ask me about Perl trainings!
------------------------------
Date: Mon, 05 Jan 1998 14:07:21 GMT
From: "Edward Morris, Jr." <emorr@fast.net>
To: jea kwnag lee <webmaster@www.synergy.co.kr>
Subject: Re: i need perl5.0**
Message-Id: <34B0E954.1B56@fast.net>
jea kwnag lee wrote:
>
> hi there
> i need windowNT perl5.0**
Visit http://www.activestate.com
ed
------------------------------
Date: Mon, 05 Jan 1998 10:27:33 -0500
From: Bob Freeman <freeman@exti.com>
Subject: IIS4, Perl and HTTP headers
Message-Id: <34B0FBE4.A0248E79@exti.com>
I am running IIS4 and trying to get it to process a perl script that
does two things in the http header:
set-cookie
and
location: ( a redirect)
It seems that IIS will process one or the other but not both in the same
header portion of the same perl script.
Does anyone have any experience with HTTP headers and IIS that would
tell me what's going on here?
--
Bob Freeman Experience Technology, Inc.
mailto:freeman@exti.com http://www.exti.com/
(905)-383-7086
------------------------------
Date: 5 Jan 1998 15:14:54 GMT
From: wald@envy.mh.lucent.com (Robert Waldstein)
Subject: Integrating perl's regex functionss into other packages
Message-Id: <68qtde$15e@nntpb.cb.lucent.com>
I have had applications that used regex functions for a long time (12+ years).
I have decided it is time to upgrade - and my primary user population
(including myself) are perl programmers. Plus perl's regex has features
I would certainly miss.
I upgraded to Henry Spencer's package without trouble - it is designed/
documented to be used that way. Went to take the next step and find perl's
setup much harder to use.
Has anyone done it? Can anyone give me any pointers (would love to see a
grep or sed done using perl's pregcomp)? Is it discouraged
(besides in the ease of reusing the code -))?
Has anyone taken the simple step of extending Spencer's regex to use
the backslash extensions in perl in addition to the posix approach
(e.g. \s == [:space:])?
THis last looks easy - and may be the approach I will go with - it
would lose primarily the non-greedy features of perl; I suspect it would
lose details that I am not thinking of that would hurt.
THanks for any pointers,
Bob Waldstein wald@lucent.com
------------------------------
Date: Mon, 05 Jan 1998 10:20:14 -0500
From: Mike Fussy <fussy@mpinet.net>
Subject: IPC Between 2 Systems
Message-Id: <34B0FA2E.9AA0D872@mpinet.net>
I'm currently spawning an executable locally from a CGI script (in Perl)
and reading from STDOUT for the IPC.
I need to do the same thing only launch the process on a different
machine (same network) and be able to do the one way IPC. Do I need to
open a socket or what is the simplest way about doing this?
------------------------------
Date: Mon, 05 Jan 1998 15:29:55 +0100
From: Kobe Lenjou <kobe@technologist.com>
Subject: Is there a random function
Message-Id: <34B0EE62.F6F6088@technologist.com>
I know it's probably an easy question, but is there a random number
generator in perl?
Kobe
Kobe@technologist.com
------------------------------
Date: 5 Jan 1998 10:11:01 -0500
From: mike@stok.co.uk (Mike Stok)
Subject: Re: Is there a random function
Message-Id: <68qt65$1vb$1@stok.co.uk>
In article <34B0EE62.F6F6088@technologist.com>,
Kobe Lenjou <kobe@technologist.com> wrote:
>I know it's probably an easy question, but is there a random number
>generator in perl?
Perl has srand/rand which call the C library routines of the same name.
srand seeds the state of the random number generator and rand gets a
number. srand and rand are documented in the perlfunc manual page.
If that's not good enough (the C library has a fast and not *too* bad
algorithm) then you might want to look for a perl module in the
Comprehensive Perl Archive Network (CPAN) whose master site can be found
at ftp.funet.fi under /pub/languages/perl/CPAN (but it may be easier to
look at http://www.perl.com and follow the CPAN links.)
Hope this helps,
Mike
--
mike@stok.co.uk | The "`Stok' disclaimers" apply.
http://www.stok.co.uk/~mike/ | PGP fingerprint FE 56 4D 7D 42 1A 4A 9C
http://www.tiac.net/users/stok/ | 65 F3 3F 1D 27 22 B7 41
stok@colltech.com | Collective Technologies (work)
------------------------------
Date: Mon, 5 Jan 1998 07:25:15 -0800
From: Tom Phoenix <rootbeer@teleport.com>
To: Henri Irla <hi@univ-perp.fr.>
Subject: Re: Javascript error on CGI perl application using Comunicator 4.x
Message-Id: <Pine.GSO.3.96.980105072331.18360E-100000@user2.teleport.com>
On 5 Jan 1998, Henri Irla wrote:
> I obtain currious error in javascript program on Communicator 4.x
>
> JAVASCRIPT error http:/.......cv-manager.pl?view
> forms.elements[0] has no properties !!!
If it's a JavaScript error, you should probably ask about it in a
newsgroup about JavaScript, since the people there can give you a better
and more complete answer than we can give here in a Perl newsgroup.
Thanks!
--
Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
Ask me about Perl trainings!
------------------------------
Date: Mon, 05 Jan 1998 15:34:09 +0100
From: Achim Selz <selz@wise.wiwi.tu-dresden.de>
Subject: newbie question: install perl on solaris 2.5.1
Message-Id: <34B0EF61.1FB759EB@wise.wiwi.tu-dresden.de>
Hi everybody,
I try to install perl 5.004_04 on a Sun Netra with Solaris 2.5.1.
Configure correctly detects the Solaris 2 system and then hangs. Any
hints? BTW, I am installing as root.
Thanks for your input!
Regards
Achim Selz
e-mail: selz@wise.wiwi.tu-dresden.de
WWW: http://www.tu-dresden.de/wwwise/mitarb/adrselz.html
Technische Universitaet Dresden
Fakultaet Wirtschaftswissenschaften
Lehrstuhl fuer Wirtschaftsinformatik, insb. Systementwicklung
D-01062 Dresden
------------------------------
Date: Mon, 05 Jan 1998 09:56:03 -0500
From: John Porter <jdporter@min.net>
Subject: Re: perl is c worsened (was: Re: word wrap routine)
Message-Id: <34B0F483.4625@min.net>
Eli the Bearded wrote:
>
> ... flesh-eating-faggot-hacker-vultures) are weak, while
Not sure what you mean by this, but I think I'm offended... :-)
John Porter
jporter@logicon.com
------------------------------
Date: Mon, 05 Jan 1998 09:01:29 -0500
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Perl not Y2K compliant
Message-Id: <pudge-0501980901290001@ppp-9.ts-1.kin.idt.net>
In article <68hppo$99g@flatland.dimensional.com>, mfuhr@dimensional.com
(Michael Fuhr) wrote:
# mbudash@sonic.net (Michael Budash) writes:
#
# >> The date and time functions supplied with perl (gmtime and localtime)
# >> supply adequate information to determine the year well beyond
# >> 2000 (2038 is when trouble strikes).
# >
# > can someone explain why 2038 is such a magic number?
#
# % perl -le 'print scalar gmtime 2**31-1'
# Tue Jan 19 03:14:07 2038
# % perl -le 'print scalar gmtime 2**31'
# Fri Dec 13 20:45:52 1901
Unless you're on one of them new-fangled Macs ...
perl -le 'print scalar localtime 2**31-1'
Wed Jan 19 03:14:07 1972
perl -le 'print scalar localtime 2**31'
Wed Jan 19 03:14:08 1972
perl -le 'print scalar localtime 2**32-2'
Mon Feb 6 06:28:14 2040
perl -le 'print scalar localtime 2**32'
Mon Feb 6 06:28:15 2040
Hm. I retire (turn 65) in July 2038. If I am using Macs, then I can
retire before the problem hits. Score one for Apple. ;-)
--
Chris Nandor pudge@pobox.com http://pudge.net/
%PGPKey=('B76E72AD',[1024,'0824 090B CE73 CA10 1FF7 7F13 8180 B6B6'])
#== MacPerl: Power and Ease ==#
#== Publishing Date: Early 1998. http://www.ptf.com/macperl/ ==#
------------------------------
Date: Mon, 5 Jan 1998 09:18:45 -0500
From: phenix@interpath.com (John Moreno)
Subject: Re: Perl not Y2K compliant
Message-Id: <1d2diz0.1f4cjyt11jn0owN@roxboro-188.interpath.net>
Daryn Sharp <daryn@cambert.com> wrote:
> phenix@interpath.com (John Moreno) wrote:
> > If they had used 1900 as a base (like perl does)
> ^^^^^^^^^^^^^^
> That's not entirely correct. My understanding is that perl is completely
> dependent upon the underlying OS's time representation.
Perl is, of course, utterly dependent upon the underlying OS to create
and maintain the current date and time - but it does have it's own API
for accessing that information and that API is platform independent.
localtime will return the year as a offset of 1900 no matter what OS it
is called upon. The meaning of the parameter passed INTO localtime
might vary from OS to OS but the results OF that call don't. Like Unix
the Mac also uses a 32 bit value for the date/time but unlike unix it is
a unsigned value. This means it has a different base date and the exact
same scalar value passed into localtime on a mac or on a unix box will
produce different results - but if those machines are sitting side by
side and call localtime at the same time (assuming the clocks have been
sync'd) it will return the exact same results.
--
John Moreno
------------------------------
Date: Sun, 4 Jan 1998 18:45:32 -0600
From: Chocolate <poohba@io.com>
Subject: PERL: How do I overwrite output?
Message-Id: <Pine.BSI.3.96.980104184409.21690A-100000@bermuda.io.com>
Is it possible to overwrite the output with the new output? Like if I
wanted to do a count down can I have it so that it starts with 10 and then
the 9 replaces the ten instead of going next to it or below it. Is this
possible?
------------------------------
Date: Sun, 4 Jan 1998 19:05:04 -0600
From: Chocolate <poohba@io.com>
Subject: PERL: How do I terminate a session?
Message-Id: <Pine.BSI.3.96.980104190304.22611A-100000@bermuda.io.com>
I am on a unix machine. It is also an Apache server if that makes any
difference. I now have it set up so that I type done and it does a couple
of things before I can close out. I then want it to log out without
having to go back to the prompt and type logout. How would I do this?
------------------------------
Date: 5 Jan 1998 14:58:25 GMT
From: "Bjxrn Elstad" <bjorn.elstad@sds.no>
Subject: Processnumber $$ on NT
Message-Id: <01bd19ea$5add82f0$3840698b@belpcnt>
Temporary files are often created as
open (FU, ">xxx.$$");
On NT the process number is not unique.
Microsoft Information Server starts perl processes with same
process number.
Is there a recommended method on NT?
- bjxrn
------------------------------
Date: 5 Jan 1998 15:10:11 GMT
From: gt2863a@acmey.gatech.edu (Mark)
Subject: require not working
Message-Id: <68qt4j$rbh@catapult.gatech.edu>
unshift (@INC, "L:\\scripts\\mec\\subs");
require ("test_too.pl");
I am using this code to get to my test_too.pl subroutine.
However, the program does not work, if I comment out the require
line then everything works fine (except I can't call my sub).
I assure you that the sub is there and is returning a positive value (1;)
What could possibly be wrong???????
--
mec --gt2863a
------------------------------
Date: Mon, 05 Jan 1998 08:25:22 -0600
From: Graham Barr <gbarr@ti.com>
Subject: Re: sending email (Net::SMTP).. problem
Message-Id: <34B0ED52.CA7BC756@ti.com>
Eli the Bearded wrote:
>
> Graham Barr <gbarr@pobox.com> wrote:
> > catty wrote:
> > > I prefer to aim for the recipient's server if possible,
> > > bypassing the relay hop unless the target is unavailable.
> > > Something like this fragment:
> >
> > Then I hope you don't always expect your mail to be read. I
> > myself automatically trash any mail that cannot be traced as
> > this is a common technique used by spammers. I know of several
>
> What are you going on about? How do you define "traced"?
A message that can be traced is one which you can use the Received
lines to determine it's source. It is the reason for such lines.
> It is
> a perfectly legitimate thing to connect to an SMTP server and
> give it mail. It is up to the receiving SMTP server to add a
> "Received" header that states where the mail came from.
I know it is legitimate, I did not say it was not, I was just
trying to point out that SPAMmers use this techneque to avoid
the "junk mail" being traced back to them. And so is a good
target for filtering out unwanted mail.
> > other people who do this to. There are also some ISP's that will
> > refuse to deliver mail that cannot be traced.
>
> I still have no idea what you are thinking "trace" is.
The I would suggest you read up a bit more on mail, before
you start flaming people.
> > I would highly recommend that you connect to your local
> > SMTP host.
>
> I don't need to relay mail to have it get delivered,
No you do not, but you will find that your mail is delivered more
efficiently, and the relay servers handle remote servers being down,
and do re trys.
> why do you think
> discarding non-relayed mail will reduce your spam?
Experience. I have spent a lot of time reading headers of
unsolicited mail. Over the last few years I have written my
own filters which prevent over 90% of junk mail getting into my
mailbox. During this time I do not think I have lost any more
that about 10 "real" mails.
--
Originality is the ability to conceal your source.
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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 V8 Issue 1582
**************************************
