[11674] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 5274 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Apr 1 03:04:23 1999

Date: Thu, 1 Apr 99 00:00:49 -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           Thu, 1 Apr 1999     Volume: 8 Number: 5274

Today's topics:
    Re: <STDIN> (Tad McClellan)
        > I need HELP!!!!!!!! <JK@sandwell98.free-online.co.uk>
    Re: > I need HELP!!!!!!!! (Sam Holden)
    Re: changing to numeric month (Ronald J Kimball)
    Re: create html (Ronald J Kimball)
        decoding quoted-printable (was Re: Unicode/Base64 ?) <Russell_Schulz@locutus.ofB.ORG>
    Re: does perl discourage obfuscated code? (was Re: Perl <Russell_Schulz@locutus.ofB.ORG>
    Re: does perl discourage obfuscated code? (was Re: Perl <Russell_Schulz@locutus.ofB.ORG>
    Re: File Upload in Internet Explorer <ntogmi@abs.ascom.ch>
    Re: File Upload in Internet Explorer (Martin Ackermann)
    Re: Getting owner of WindowsNT files <chirstius@mediaone.net>
        Getting user last login time and date from perl (Tony Keating)
    Re: HELP: Overwriting data within a file <rick.delaney@home.com>
    Re: liars vs. non-liars (was Re: does perl discourage o <Russell_Schulz@locutus.ofB.ORG>
    Re: my random doesn't return number!! (Tad McClellan)
    Re: perl and y2k (was Re: The millennium cometh -- even <Russell_Schulz@locutus.ofB.ORG>
    Re: perl and y2k (was Re: The millennium cometh -- even <Russell_Schulz@locutus.ofB.ORG>
        Perl internals question / bytecode generation via perl_ <paul.cameron@slip.net>
    Re: program interaction using <<HERE docs (Ronald J Kimball)
        Recovering a (list) hash ley <jeffrey_mattox@my-dejanews.com>
    Re: Running a perl script as a daemon.... (Ronald J Kimball)
    Re: Running a perl script as a daemon.... (Tad McClellan)
    Re: Running a perl script as a daemon.... (Tad McClellan)
    Re: Sendmail errors to ME and not the SERVER admin (Ronald J Kimball)
        Sun Microsystems Sponsors Perl Mongers (brian d foy)
        Text::Soundex for languages other than English? (Jed Parsons)
    Re: two questions need help fanxin@my-dejanews.com
    Re: URGENT Socket Failure with Perl 5.005_02 and Dynix  <ronald_f@my-dejanews.com>
    Re: Validating Email addresses <brent.s@ihug.co.nz>
    Re: Web Mail <hklife@soback.kornet.nm.kr>
        Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Wed, 31 Mar 1999 19:38:51 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: <STDIN>
Message-Id: <r6fud7.fr5.ln@magna.metronet.com>

Elliot Slater (eslater@frinc.com) wrote:

: Am I able to assign a value to <STDIN> as I would any other variable?

   No.

   Because it is not a variable.


   Actually it is not an "it" at all.

   It is a "them" (there are 2 things there)

      1) <STDIN>  the input operator
         ^     ^
         ^     ^

      2) <STDIN>  a filehandle
          ^^^^^
          ^^^^^


--
    Tad McClellan                          SGML Consulting
    tadmc@metronet.com                     Perl programming
    Fort Worth, Texas


------------------------------

Date: Thu, 1 Apr 1999 08:26:41 +0100
From: "Graeme Sandwell" <JK@sandwell98.free-online.co.uk>
Subject: > I need HELP!!!!!!!!
Message-Id: <hbFM2.1089$04.814@stones>

Dear All,

I am writing a perl script, and I have no experience of perl.  I would like
some help doing this though email.  I would like to send you small perl
script and for you to tell me what is wrong, because the Error 500 message
doesn't help me.  All is wrong is the layout (I think).

If you email I will tell you what I want to perl script for, however, what I
am doing is going to be big and I have already had contact with companies
which want to advertise when this is fished.  I would be perpared to offer
FREE advertising to you.

Please Email - Graeme@Sandwell98.free-online.co.uk

Graeme,

--
A FREEWARE program every Windows user needs, protect against BIOS virus and
Speeds up booting time/Windows 95/98/NT starting time.  Its from British
Bulldog Software and it is available NOW!!  Download it from -
Http://www.BritishBulldogSoftware.Homepad.com




------------------------------

Date: 1 Apr 1999 07:41:40 GMT
From: sholden@pgrad.cs.usyd.edu.au (Sam Holden)
Subject: Re: > I need HELP!!!!!!!!
Message-Id: <slrn7g68pk.hpk.sholden@pgrad.cs.usyd.edu.au>

Graeme Sandwell <JK@sandwell98.free-online.co.uk> wrote:
>Dear All,
>
>I am writing a perl script, and I have no experience of perl.  I would like
>some help doing this though email.  I would like to send you small perl
>script and for you to tell me what is wrong, because the Error 500 message
>doesn't help me.  All is wrong is the layout (I think).
>
>If you email I will tell you what I want to perl script for, however, what I
>am doing is going to be big and I have already had contact with companies
>which want to advertise when this is fished.  I would be perpared to offer
>FREE advertising to you.

You have got to be joking...

Go and hire a bloody programmer...

-- 
Sam

If your language is flexible and forgiving enough, you can prototype
your belief system without too many core dumps.
	--Larry Wall


------------------------------

Date: Wed, 31 Mar 1999 23:25:50 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: changing to numeric month
Message-Id: <1dpjz8b.1ybg0yg4yxzpcN@p88.tc2.state.ma.tiac.com>

Larry Rosler <lr@hpl.hp.com> wrote:

> Indeed, that is a cleaner and somewhat faster initialization.  But the
> initialization of the hash overwhelms the time for the lookup.  Unless
> the lookup is taking place lots of times and the initialization is done
> once only, the simple 'index' solution that I posted it a clear winner.

If the lookup is not done many times, it really doesn't matter which
solution you pick, does it?  Doing one index will save you about one
ten-thousandth of a second over doing one hash intialization and one
hash lookup.

-- 
 _ / '  _      /       - aka -
( /)//)//)(//)/(   Ronald J Kimball      rjk@linguist.dartmouth.edu
    /                                http://www.tiac.net/users/chipmunk/
        perl -le 'print "Just another \u$^X hacker"'


------------------------------

Date: Wed, 31 Mar 1999 23:25:52 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: create html
Message-Id: <1dpjzh0.gincwud00tjcN@p88.tc2.state.ma.tiac.com>

apple <jearanai@science.gmu.edu> wrote:

> Can I create a html file from my perl file without usong CGI?

Yes.


#!/usr/local/bin/perl -w

print <<EOHTML;
<HTML>
  <HEAD>
    <TITLE>HTML file</TITLE>
  </HEAD>
  <BODY>
    This is an HTML file!
  </BODY>
</HTML>
EOHTML


-- 
 _ / '  _      /       - aka -
( /)//)//)(//)/(   Ronald J Kimball      rjk@linguist.dartmouth.edu
    /                                http://www.tiac.net/users/chipmunk/
        "It's funny 'cause it's true ... and vice versa."


------------------------------

Date: Wed, 31 Mar 1999 21:59:33 -0500
From: Russell Schulz <Russell_Schulz@locutus.ofB.ORG>
Subject: decoding quoted-printable (was Re: Unicode/Base64 ?)
Message-Id: <19990331.215933.4o4.rnr.w164w_-_@locutus.ofB.ORG>

Paul Kunysch <illume@gmx.net> writes:

> s/=(\d+)/chr($1)/ge;

Except that at some point you'd need to use the hexadecimal representation
(so it would be something like `s/=(..)/pack("H2",$1)/ge').
-- 
Russell_Schulz@locutus.ofB.ORG  Shad 86c


------------------------------

Date: Wed, 31 Mar 1999 21:19:57 -0500
From: Russell Schulz <Russell_Schulz@locutus.ofB.ORG>
Subject: Re: does perl discourage obfuscated code? (was Re: Perl evangelism)
Message-Id: <19990331.211957.6n7.rnr.w164w@locutus.ofB.ORG>

Jerome O'Neil <jeromeo@atrieva.com> writes:

>> or that `while (0)' is the same as `while (1)',
>
> Run this, and then clarify your statements, because you lost me here.

That was my error; I meant `0 while' and `1 while'.

>> partly because I've worked with Perl code that is unintentionally
>> obfuscated, from people I know who don't write hard-to-read code in
>> other languages.
>
> Here lies the rub.  I've worked with Perl code that is easily
> understood, written by people that don't have a good grasp on all
> things perly, but otherwise write good code in other languages.
> Almost the exact opposite of your experience.

Well, I think it'd be the exact opposite if they wrote BAD code in other
languages, and good Perl.  :-)
-- 
Russell_Schulz@locutus.ofB.ORG  Shad 86c


------------------------------

Date: Wed, 31 Mar 1999 23:36:57 -0500
From: Russell Schulz <Russell_Schulz@locutus.ofB.ORG>
Subject: Re: does perl discourage obfuscated code? (was Re: Perl evangelism)
Message-Id: <19990331.233657.9C6.rnr.w164w@locutus.ofB.ORG>

Jerome O'Neil <jeromeo@atrieva.com> writes:

> I will say that if they ever come up with a "natural language" regex
> engine, I'll beat a path to their door! 

And yet, when I have done this, people post saying it's COBOL.  Perl
and the Perl community do not, in my experience, discourage obfuscation.
-- 
Russell_Schulz@locutus.ofB.ORG  Shad 86c


------------------------------

Date: Thu, 01 Apr 1999 07:22:41 +0200
From: Toggweiler Mike <ntogmi@abs.ascom.ch>
Subject: Re: File Upload in Internet Explorer
Message-Id: <370302A0.AB4B5D4A@abs.ascom.ch>

Ja, hab ich bereits |berpr|ft.

Florentin Hauber wrote:

> Hi!
>
> Hast Du sowas wie
>
> ENCTYPE="multipart/form-data"
>
> in Deinem Form-Tag stehen?
>
> gru_
>
> Florentin
>
> --
> /*  Scripts nach Mass
>      Florentin Hauber
>      fh@webaid.de  */



------------------------------

Date: Thu, 01 Apr 1999 09:53:19 +0200
From: Surferman@t-online.de (Martin Ackermann)
Subject: Re: File Upload in Internet Explorer
Message-Id: <370325EF.87881E5F@schmetterling.nu>

Toggweiler Mike schrieb:
> 
> Ja, hab ich bereits |berpr|ft.
> 
> Florentin Hauber wrote:
> 
> > Hi!
> >
> > Hast Du sowas wie
> >
> > ENCTYPE="multipart/form-data"
> >
> > in Deinem Form-Tag stehen?
> >
> > gru_
> >
> > Florentin
> >
> > --
> > /*  Scripts nach Mass
> >      Florentin Hauber
> >      fh@webaid.de  */

Hallo,

Da fehlt die While Schleife f|r den Buffer...

Bye
-- 
Homepage : http://www.schmetterling.nu

ICQ-UIN  : 9559861


------------------------------

Date: Wed, 31 Mar 1999 22:14:57 -0600
From: "Chuck Hirstius" <chirstius@mediaone.net>
Subject: Re: Getting owner of WindowsNT files
Message-Id: <LoCM2.1751$JO4.4623450@rmnws01.ce.mediaone.net>

Check out the docs on the Win32::FileSecurity module  Should give you what
yer looking for.

Chuck


Reiner Fischer wrote in message
<3701B93A.910C61ED@Non-HP-Germany-om4.om.hp.com>...
>Hello,
>
>i have a problem. In WindowsNT, every file has an owner, for example
>shown in the file properties.
>
>Is there a module in Perl, which help me getting the ownername? I tried
>stat() and File, but i found no
>possibility.
>
>Bye,
>
>--
>Reiner Fischer
>
>--
>Reiner Fischer
>
>Advanced Technology Services Team
>Application Services Europe
>Hewlett Packard GmbH
>
>Hanns-Klemm-Str. 5
>71034 Bvblingen
>
>Phone: +49 7031 626-1333, Telnet 702-1333
>Fax:   +49 7031 626-1134
>E-mail: REINER_FISCHER@Non-HP-Germany-om4.om.hp.com
>
>




------------------------------

Date: 1 Apr 1999 06:10:48 GMT
From: tonyk@pluto.rcode.com.au (Tony Keating)
Subject: Getting user last login time and date from perl
Message-Id: <slrn7g633l.6ne.tonyk@pluto.rcode.com.au>


Is there a way to easily get the last login time and date of a user on the
system directly from perl? Or do I have to run finger and extract the
relevent data?

Tony.

-- 
Tony Keating <keating@mech.uq.edu.au>
Department of Mechanical Engineering, University of Queensland
PGP Public Key: finger e4321280@student.uq.edu.au


------------------------------

Date: Thu, 01 Apr 1999 04:14:47 GMT
From: Rick Delaney <rick.delaney@home.com>
Subject: Re: HELP: Overwriting data within a file
Message-Id: <3702F4B7.C60E139E@home.com>

[posted & mailed]

Mario D'Alessio wrote:
> 
> Rick Delaney <rick.delaney@home.com> writes:
> 
> > Can you create a complete (but small) program that
> >exhibits this behaviour?  I have used open/seek/print many times and
> >have never had this problem.

And now I know that I've just been lucky with the platforms I've use
them on.

> Below is the complete program.

I tried it on my win95 box and sure enough, I got the same results as
you.  Puzzled, I finally went back to the docs on seek() and look what I
found!

    On some systems you have to do a seek whenever you switch between 
    reading and writing. Amongst other things, this may have the effect 
    of calling stdio's clearerr(3). A WHENCE of 1 (SEEK_CUR) is useful 
    for not moving the file position: 

         seek(TEST,0,1);

Adding 

    seek(MP3_FILE, 0, 1);

before

> print   MP3_FILE

fixed it for me.  Hope it works for you too.

-- 
Rick Delaney
rick.delaney@home.com


------------------------------

Date: Wed, 31 Mar 1999 21:31:57 -0500
From: Russell Schulz <Russell_Schulz@locutus.ofB.ORG>
Subject: Re: liars vs. non-liars (was Re: does perl discourage obfuscated code?...)
Message-Id: <19990331.213157.6Q5.rnr.w164w@locutus.ofB.ORG>

merlyn@stonehenge.com (Randal L. Schwartz) writes:

> I didn't call you a liar.  I said that what you said are lies.  That's
> different (at least to me it is).

I don't see any difference; but then, all I speak is English.

> And you seem to have a habit of paraphrasing things to put stuff in
> people's mouths.

I did that once, and said I was paraphrasing (to help the terminally
clueless avoid confusion).  I don't think anyone was confused.

Other times I take what people say to a logical extreme, to see if they
still agree with it when it's looked at fully.  This is extrapolation,
not paraphrasing.  People definitely _have_ been confused by this, but
this is hardly unique to me.

> And maybe I'm more sensitive to it than most, because law enforcement
> officers extra-contextually paraphrasing things I said made me look
> like a criminal to a jury, and I'm not interested in repeating that.

a. Subtle tactic, comparing me with your prosecutors.
b. I have some good advice that would have allowed you to avoid it
   in the first place (that is far too late to give you now, though
   I often give it to others).

> -- 
> Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- 
> me

With the PGP line going over 80 chars, I count 6, at least.

Randal, you have my explicit permission to use `Followup-To: poster' on
your next (if any) post on this; I would have done it myself, except for
wanting to avoid people posting who were concerned about how I was trying
to trick you into not being able to respond.
-- 
Russell_Schulz@locutus.ofB.ORG  Shad 86c


------------------------------

Date: Wed, 31 Mar 1999 20:19:36 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: my random doesn't return number!!
Message-Id: <8jhud7.qt5.ln@magna.metronet.com>

Larry Rosler (lr@hpl.hp.com) wrote:

: [Posted and a dis-courtesy copy mailed.]

   Nice touch.


: In article <37028C89.7566@protix.com> on Wed, 31 Mar 1999 14:58:49 -
: 0600, David Delikat <ddelikat@protix.com> says...

: > Larry, I do not know what it is that you do. but I'm a programmer.
: > please don't tell me my business.
: > 
: > I'd appretiate it if you would take your own advice.
: > also, learn to read code.

: This is the point at which many members of this newsgroup would say 
: 'PLONK', 


   For me, that point was reached somewhat earlier than this
   current juncture  :-)


: meaning (in case you don't know) that you are not worth 
: listening to any more, and you are wasting my time, so I don't want ever 
: to see any of your messages.

: But it is far too much fun for me, watching you make an ass of yourself 
: in your first appearance in this newsgroup.


   That's eerie!

   I later temporarily unplonked so as not to miss any grins.

   I have not been disappointed.


--
    Tad McClellan                          SGML Consulting
    tadmc@metronet.com                     Perl programming
    Fort Worth, Texas


------------------------------

Date: Wed, 31 Mar 1999 21:52:39 -0500
From: Russell Schulz <Russell_Schulz@locutus.ofB.ORG>
Subject: Re: perl and y2k (was Re: The millennium cometh -- eventually)
Message-Id: <19990331.215239.5N7.rnr.w164w@locutus.ofB.ORG>

"David L. Cassell" <cassell@mail.cor.epa.gov> writes:

>> again:  this is why I disagree with the FAQ.  I have never seen a
>> pencil that would surprise a user (who, shockingly, hadn't memorized
>> its manual) by writing 100 when referring to 2000.
>
> Oh no!  He's right!  All programming languages are Y2K noncompliant,
> since someone somewhere can misuse them!

I see a big difference between `can misuse' and `will misuse, if using the
natural way provided'.

Does your response mean:

  a. You don't understand this difference?
  b. You don't think the difference is real?
  c. You think the difference won't affect real code?
  d. You just wanted to make a Unabomber post?
  e. Other...?
-- 
Russell_Schulz@locutus.ofB.ORG  Shad 86c


------------------------------

Date: Wed, 31 Mar 1999 23:45:44 -0500
From: Russell Schulz <Russell_Schulz@locutus.ofB.ORG>
Subject: Re: perl and y2k (was Re: The millennium cometh -- eventually)
Message-Id: <19990331.234544.2s9.rnr.w164w@locutus.ofB.ORG>

jkekoni@cc.hut.fi (Joonas Timo Taavetti Kekoni) writes:

>> again:  this is why I disagree with the FAQ.  I have never seen a
>> pencil that would surprise a user (who, shockingly, hadn't memorized
>> its manual) by writing 100 when referring to 2000.
>
> NO. 107 years old people have been asked for scool before times of
> computers.

That (forced, consistent truncation) is actually the opposite problem.
-- 
Russell_Schulz@locutus.ofB.ORG  Shad 86c


------------------------------

Date: Wed, 31 Mar 1999 23:48:11 +0000
From: Paul Cameron <paul.cameron@slip.net>
Subject: Perl internals question / bytecode generation via perl_eval_sv ?
Message-Id: <3702B43B.8EE48978@slip.net>

Hi,

Of course, before I start, I'm very new to all of this.

Now, suppose I do:

perl_eval_pv("$foo = $blah", TRUE);

That's great. Lovely. Woohoo. This statement is arbitrary, I don't
know what it is at runtime.

Is it possible to get the bytecode generated from perl_eval_pv (or
_sv, whatever), and re-execute it at a later stage ? I guess my
reason for this is lack of experience with perl internals ... but
I'm wondering how to simulate having all of these equivalent
perl_eval_pv statements executed within a context of a subroutine.
(sounds weird, doesn't it!)

Note, I don't want to do something like this (yet I'll probably
end up using it):

SV *cvrv = perl_eval_pv("sub { $foo =~ /12 $blah 34/ }", TRUE);
perl_call_sv(cvrv, G_SCALAR | G_EVAL | G_KEEPERR);

I suppose what I really would want is to create these routines
in a shared 'closure' like environment, ie:
sub foo {
        my $bar;

        (sub { $bar++ }, sub { $bar-- } );
}

I guess what I'd like to know is how to simulate the above
closures with the strings "$bar++" and "$bar--". If it
involves anonymous closures, then I probably already know.

Note: this is merely a very general example. I know how to
increment and decrement SV's in C (or at least ... how you're
meant to!)

Paul.


------------------------------

Date: Wed, 31 Mar 1999 23:25:57 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: program interaction using <<HERE docs
Message-Id: <1dpk05x.5sr3gvasf3p3N@p88.tc2.state.ma.tiac.com>

Christian M. Aranda <christianarandaOUT@OUTyahoo.com> wrote:

> FYI - I wasn't ignoring his help.  I stated a couple of times that the
> sysadmin WILL NOT let a module be on his machine.  Period.  End of
> story.  It doesn't matter where I put it.  Period.

But he'll let you run arbitrary Perl scripts on his machine?
That's really weird.

-- 
 _ / '  _      /       - aka -
( /)//)//)(//)/(   Ronald J Kimball      rjk@linguist.dartmouth.edu
    /                                http://www.tiac.net/users/chipmunk/
        "It's funny 'cause it's true ... and vice versa."


------------------------------

Date: Thu, 01 Apr 1999 05:11:44 GMT
From: Jeffrey Mattox <jeffrey_mattox@my-dejanews.com>
Subject: Recovering a (list) hash ley
Message-Id: <7duv6c$ab2$1@nnrp1.dejanews.com>

I'm a neebie to Perl.  I have a hash that I create as follows:

    $hash{$x,$y,$z} = [ $a, $b ];

Later, I want to go through the hash, looking at each entry, but I also
want to see the elements of my 3-part key.

    while ( ($key,$val) = each %hash ) {
       $a = $$val[0];  # works
       $b = $$val[1];  # works
       $x = ????;
       $y = ????;
       $z = ????;
       print "$a, $b, $x, $y, $z";
    }

How can I do this?  If I display $key as a string, it contains $x, $y, and
$z separated by nulls (I think), but I don't know how to split the key up.

    ($x,$y,$z) = split(/\000/$key);  # does not work.

Instead, if I also store the key in the hash this way:

    $hash{$x,$y,$z} = [ $a, $c, [$x,$y,$z] ];

I can recover $x from $$val[2][0], etc., but that seems wasteful because I
have to store the key in the hash.  However, if this method is best, is
there a way I should be doing it to minimize memory requirements?  I don't
know if my keys and $$val[2] take up separate spaces.

I suppose I'm violating some rile by constructing a key this way, but it
works great.  Am I just being lucky?  If so, how do I construct a key from
those three values (some are strings, some are numerals)?

Thanks,

Jeff

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/       Search, Read, Discuss, or Start Your Own    


------------------------------

Date: Wed, 31 Mar 1999 23:25:58 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Running a perl script as a daemon....
Message-Id: <1dpk0c8.qspozl1k31u3kN@p88.tc2.state.ma.tiac.com>

[posted and mailed]

David Delikat <ddelikat@protix.com> wrote:

> Tad McClellan wrote:
> > 
> > Diggy Tim (tim@diggy.com) wrote:
> > 
> > : Subject: Re: Running a perl script as a daemon....
> >                                           ^^^^^^
> >                                           ^^^^^^
> > 
> > : How do I go about running a perl script from the command line and have it
> > : sit in the background and not die when I log out.
> > 
> >    What happened when you did a word search in the Perl FAQs
> >    before posting?
> 
> oh for crying out loud, I just joined this group and the first thing I
> see is some bonehead picking on spelling, and it isn't even wrong.
> it just isn;t the spelling he likes.

He wasn't picking on the spelling.  He was telling the user to do a word
search in the Perl FAQs.  I suppose you didn't have time to read the
whole message?


> I might just as well turn around and go home.

Yep, might as well.  You've only managed to embarass yourself so far.


-- 
 _ / '  _      /       - aka -
( /)//)//)(//)/(   Ronald J Kimball      rjk@linguist.dartmouth.edu
    /                                http://www.tiac.net/users/chipmunk/
        "It's funny 'cause it's true ... and vice versa."


------------------------------

Date: Wed, 31 Mar 1999 10:24:41 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Running a perl script as a daemon....
Message-Id: <pnetd7.9n5.ln@magna.metronet.com>

David Delikat (ddelikat@protix.com) wrote:
: Tad McClellan wrote:
: > Diggy Tim (tim@diggy.com) wrote:
: > 
: > : Subject: Re: Running a perl script as a daemon....
: >                                           ^^^^^^
: >                                           ^^^^^^
: > : How do I go about running a perl script from the command line and have it
: > : sit in the background and not die when I log out.
: > 
: >    What happened when you did a word search in the Perl FAQs
: >    before posting?

[ snip quoted signature]

: oh for crying out loud, I just joined this group 


   Welcome.


: and the first thing I 
: see is some bonehead 


   Oh yeah?

   Well ...    ... your feet stink!

   So there.


: picking on spelling, and it isn't even wrong.
                           ^^^^^^^^^^^^^^^^^^^

   Which did not suggest to you that picking on spelling
   was not what I was doing at all?

   I was telling him how to find the definitive answer to his
   question in the standard Perl docs.



   I don't think you have to worry about me following up to any
   of your future postings with spelling corrections...


--
    Tad McClellan                          SGML Consulting
    tadmc@metronet.com                     Perl programming
    Fort Worth, Texas


------------------------------

Date: Wed, 31 Mar 1999 20:02:22 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Running a perl script as a daemon....
Message-Id: <uigud7.qt5.ln@magna.metronet.com>

David Delikat (ddelikat@protix.com) wrote:

: maybe I was wrong to come back.


   When were you here before?


--
    Tad McClellan                          SGML Consulting
    tadmc@metronet.com                     Perl programming
    Fort Worth, Texas


------------------------------

Date: Wed, 31 Mar 1999 23:25:59 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Sendmail errors to ME and not the SERVER admin
Message-Id: <1dpk0n1.zeuqavik035N@p88.tc2.state.ma.tiac.com>

Benne <benne@village.uunet.be> wrote:

> How can I make "sendmail" to send error messages directly to my email
> address and not the server?

This is not a Perl question.  You would do it the same way if you were
interfacing to sendmail with some other programming language.


[That way might be using an Errors-To header:

Errors-To: benne@village.uunet.be

HTH!]

-- 
 _ / '  _      /       - aka -
( /)//)//)(//)/(   Ronald J Kimball      rjk@linguist.dartmouth.edu
    /                                http://www.tiac.net/users/chipmunk/
        "It's funny 'cause it's true ... and vice versa."


------------------------------

Date: 1 Apr 1999 05:33:47 GMT
From: comdog@computerdog.com (brian d foy)
Subject: Sun Microsystems Sponsors Perl Mongers
Message-Id: <comdog-1303040026030001@news.panix.com>
Keywords: just another new york perl hacker

SUN MICROSYSTEMS SPONSORS PERL MONGERS

Perl Mongers [1] and Sun Microsytems [2] recently inked
contracts arranging for the California-based hardware
company to sponsor the New York based non-profit to the tune
of a quarter of a million dollars said industry spokesperson
Tim O'Reilly, whose technical book publishing house O'Reilly
& Associates [3] recently purchased all rights to Perl 6,
and will rename it Java 1.3. "These changes had been in the
works for a long." said O'Reilly, "You didn't think JPL
[Java-Perl Lingo] was for Perl's benefit, did you?"

As part of the deal, Perl Mongers will be known as Java
Mongers, and the affiliate groups, whose names typically
ended in ".pm" as a play on the Perl module system, will now
end with ".class", and there will be three versions
of each group meeting, although a member could theoretically
attend any one of them without a problem.  Java Mongers is
expected to announce membership licensing and support
contract information shortly.  Randal Schwartz [4], a
director of Java Mongers, hailed the re-organization noting
that, despite the private inurement laws, it supports his
soon-to-be released books "Learning Java" and "Learning Java
on NT". He was quick to point out that he has pictures of
the waitresses and of what everyone ate at the business
lunch where the contracts were signed [5]. The executive
director of Java Mongers, brian d foy, replied "did you
check the FAQ?" [6].  Microsoft chairman Bill Gates announced
the formation of Visual JMongers++ soon after the Sun
press release, noting that every Windows user will be required
to attend group meetings.

David Adler, Ruthless Dictator of NY.class and a director of
Java Mongers, gave a resounding Bronx cheer for the move,
hoping that this change to the organization would get him
even more free stuff. Chris Nandor, the original author of
the Boston.pm module announced that he will not be involved
with Java Mongers since Java does not run on the Mac,
despite his book "MacJava: Pain and Frustration".  Adam Turoff,
charter member of NY.class and leader of Philly.class, rejoiced
in the triumph of the cathedral-style re-organization as he took
a break from installing NT on his Beowolf cluster.

[1] Java Mongers: http://www.pm.org
[2] Sun Microsystems: http://www.sun.com
[3] O'Reilly & Associates: http://www.oreilly.com
[4] Randal L. Schwartz: http://www.stonehenge.com/merlyn/
[5] What everyone ate: http://web.stonehenge.com/merlyn/Pictures/
[6] Java Mongers FAQ: http://www.pm.org/faq.shtml

-- 
brian d foy                                 <http://computerdog.com>
Comprehensive Perl Archive Network (CPAN) <URL:http://www.perl.com>
Perl Mongers <URL:http://www.pm.org>


------------------------------

Date: 1 Apr 1999 07:48:17 GMT
From: jed@socrates.berkeley.edu (Jed Parsons)
Subject: Text::Soundex for languages other than English?
Message-Id: <7dv8c1$hrr$1@agate.berkeley.edu>

Greetings -

Does anyone know of a module like Text::Soundex that is modeled on a language
other than English?  I want to use it to compare Latin words, so some 
Romance language would be useful.  

Many thanks,

Jed

-- 
Jed Parsons:                                ``Lingua balbus, hebes ingenio
Harpsichordist, Classicist, Homebrewer.        Viris doctis sermonem facio.''
mailto:jed@socrates.berkeley.edu                             -- Archipoeta
http://www.OCF.Berkeley.EDU/~jparsons/


------------------------------

Date: Thu, 01 Apr 1999 06:20:45 GMT
From: fanxin@my-dejanews.com
Subject: Re: two questions need help
Message-Id: <7dv37m$dje$1@nnrp1.dejanews.com>

no, think about the update notice mailing list :)

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/       Search, Read, Discuss, or Start Your Own    


------------------------------

Date: Thu, 01 Apr 1999 06:38:03 GMT
From: Ronny <ronald_f@my-dejanews.com>
Subject: Re: URGENT Socket Failure with Perl 5.005_02 and Dynix 4.x
Message-Id: <7dv48b$e6a$1@nnrp1.dejanews.com>

In article <37024387.A63BCEA0@cisco.com>,
  Bill Williams <biwillia@cisco.com> wrote:
> After having upgrading a few weeks ago,  I am seeing rampant wierdness
> with scripts using
> Socket.pm. Am starting to think there may be a problem with the
> distribution. This was a
> clean install, and am wondering if anyone else has seen this.
>
> None of these invocations will work; perl cannot find the socket module:
>
> #use IO::Socket;
> #require 'sys/socket.ph';
> #use lib '/local/lib/perl5/i386-dynixptx/IO';
>
> However, if I use this one:
>
> use lib '/local/lib/perl5/5.00502/i386-dynixptx/IO';
>
> I get:
>
> <monza> <1839> </users/b/biwillia> ./lckusers_EMAN.pl -t
> Socket version 1.3 required--this is only version  at
> /local/lib/perl5/5.00502/i386-dynixptx/IO/Socket.pm line 118.
>
> a long listing of this Socket.pm shows:
>
> > -r--r--r--    1 root     other      16948 Mar 26 08:53
> > /local/lib/perl5/5.00502/i386-dynixptx/IO/Socket.pm
>
> which is when I compiled it, but it  claims to be $VERSION = "1.1603";
>
> On a different system, compiled this morning, I have a socket.pm with
> the following attributes:
>
> > -r--r--r--    1 root     other       8039 Sep 14  1998
> > /local/lib/perl5/i386-dynixptx/Socket.pm
>
> which claims to be $VERSION = "1.7"; but that one just hangs
[snip]
> So the $64k question is, why would two separate compiles of perl with
> the same source load
> two entirely different versions of Socket.pm? Any help would be
> appreciated.

Maybe the two compiles were installed for different libraries. You could do a
   perl -e 'print "@INC\n"'
to get a list of directories which perl searches in order to find the modules.
Most likely, your two perl installations will display different directory
lists. Note also that you can override this in several ways, for instance
by setting the PERL5LIB environment variable.

Doing this, you will easily find the IO/Socket.pm that perl uses for your
application, but of course this does not explain yet why your program hangs.
I think the best to do is making sure that you get the most recent version
of everything in IO and below. If you have reasons to believe that perl
accesses and old version, or that the libraries were corrupted somehow,
you could download the most recent release, set PERL5LIB accordingly (so
that perl can find them) and run the test cases that come with them.

If it still does not work, you know at least that the perl installation is
correct and the problem could probably be in your program or the OS.

Ronald
--
Ronald Fischer <ronald_f@my-dejanews.com>
http://ourworld.compuserve.com/homepages/ronald_fischer/

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/       Search, Read, Discuss, or Start Your Own    


------------------------------

Date: Thu, 1 Apr 1999 16:29:40 +1200
From: Brent Singers <brent.s@ihug.co.nz>
Subject: Re: Validating Email addresses
Message-Id: <Pine.LNX.3.96.990401162558.24494B-100000@brent.ihug.co.nz>

> but I keep getting the fail line every time, even for valid emails, even
> though I have escaped the @, any ideas why ?

As Alan has already pointed out - the FAQ is a wonderous source of info.
However, if you are only wanting to check that the email address has the
'@' symbol in it then try the following:

	if ($ToEmail=~/@/)
----------------------^^  note - no escaping the @ symbol.

This may or may not be 'correct' - but it works for me.

Brent

=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=  /"\
  The scientific name for an animal that         \ / ASCII RIBBON CAMPAIGN
  doesn't either run from, or fight, it's         X AGAINST HTML EMAIL
  enemies is 'lunch'.                            / \
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= 




------------------------------

Date: 1 Apr 1999 04:51:27 GMT
From: Yun Giljung <hklife@soback.kornet.nm.kr>
Subject: Re: Web Mail
Message-Id: <7duu0f$2us$1@news2.kornet.net>

Michael Yevdokimov <flanker@sonnet.ru> wrote:


http://hkshop.co.kr/perl/anymail/anymail.zip

the main file is  main.cgi


> Does anyone have Perl script for making Web mail under FreeBSD? Or 
where to > find it?

> Thanks.

> --
> Best wishes,

> Michael Yevdokimov

> Email: flanker@sonnet.ru
> ICQ: 30874618
> -------------------------------------------------
>>> Developers Support Site <<
> Web: http://developer.tsx.org
> http://www.basicnet.sonnet.ru
> -------------------------------------------------





------------------------------

Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>


Administrivia:

Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing. 

]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body.  Majordomo will then send you instructions on how to confirm your
]subscription.  This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.

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 5274
**************************************

home help back first fref pref prev next nref lref last post