[9965] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 3558 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Aug 27 02:02:42 1998

Date: Wed, 26 Aug 98 23:00:23 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Wed, 26 Aug 1998     Volume: 8 Number: 3558

Today's topics:
    Re: _reverse_ lookahead? (Ronald J Kimball)
    Re: comp.lang.perl.windows.misc <uri@sysarch.com>
        Determining strlen <dave@nic.com>
    Re: Determining strlen <uri@sysarch.com>
    Re: Determining strlen <egwong@netcom.com>
    Re: Getting dialup dynamic IP (David Hawker)
    Re: Getting dialup dynamic IP (Maurice Aubrey)
    Re: How to convince others using perl instead bourne sc dzuy@my-dejanews.com
    Re: Is there a size limit on $ vars? (Ronald J Kimball)
    Re: Max value in an array <mds-resource@mediaone.net>
    Re: MIME Type for files with .PL Extensions? <design@dansie.net>
    Re: newbie question (Ronald J Kimball)
    Re: numeric operators (Mark-Jason Dominus)
        perl CGI & IIS & win32... (GEMINI)
    Re: Perl compiler (Nathan V. Patwardhan)
    Re: Perl compiler <rra@stanford.edu>
    Re: Perl documentation (David Hawker)
    Re: Perl documentation (David Hawker)
    Re: Perl documentation (David Hawker)
    Re: Perl documentation <tchrist@mox.perl.com>
    Re: Prime numbers [was Re: here's an implementation of  <mgregory@asc.sps.mot.com>
    Re: RE Losing digits on numbers with magic increment <9401962@ml.petech.ac.za>
    Re: reading specific words from an Mp3 file <9401962@ml.petech.ac.za>
    Re: Remote Hash Access? dzuy@my-dejanews.com
    Re: Search and replace (Ronald J Kimball)
    Re: String terminators (Ronald J Kimball)
    Re: Submitting a form from a script (David Hawker)
    Re: Unreadable Scripts? <NOTHANKStbeaulieu@mediaone.net>
    Re: Unreadable Scripts? (Nathan V. Patwardhan)
    Re: Unreadable Scripts? (Nathan V. Patwardhan)
    Re: Unreadable Scripts? <ceci@bway.net>
    Re: Unreadable Scripts? (Nathan V. Patwardhan)
    Re: Using cookie-lib.pl to set cookies <design@dansie.net>
        Which DBM do I have here??? (Harry Darling)
    Re: Y2K Date Support (Ronald J Kimball)
        Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)

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

Date: Wed, 26 Aug 1998 23:10:52 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: _reverse_ lookahead?
Message-Id: <1dee2wg.rwdlae1h7lw88N@bay1-471.quincy.ziplink.net>

Todd "Waxahachiefortudinouslyexportitionismistically" Hartman
<thartman@xxxx.xx> wrote:

> Does Perl have a RE feature that does reverse-lookahead (or look-behind)?
> I didn't see any reference to it in ed. 2 of the Camel in the RE extensions
> section (pp. 58-69).

Look-behind is mentioned on Page 68, under the explanation of (?!...).
Basically, it says you can't use (?!...) for look-behind.  :-)

-- 
 _ / '  _      /         - aka -         rjk@coos.dartmouth.edu
( /)//)//)(//)/(     Ronald J Kimball      chipmunk@m-net.arbornet.org
    /                                  http://www.ziplink.net/~rjk/
        "It's funny 'cause it's true ... and vice versa."


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

Date: 26 Aug 1998 23:26:32 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: comp.lang.perl.windows.misc
Message-Id: <x7iujf3y1j.fsf@sysarch.com>

>>>>> "DN" == Dan Nguyen <nguyend7@msu.edu> writes:

  DN> Some history of Windows.  Win32 are all derived (NT is less as
  DN> much) from Win3.x.  Which is just the frosty coating on top of
  DN> MSDOS.  Which use to be PCDOS which was a hack of QDOS(Quick and
  DN> Dirty OS), which was a hack of CP/M which was a hack of UNIX.  So
  DN> most people are running a hack of a frosty coating of a hack of a
  DN> hack of a hack of UNIX.

the last parentage is wrong. cp/m was a hack on dec's (RIP) RT-11. there was
no lineage from unix (which wasn't fully out of at&t then) when RT-11
was out (about 1972-3).

uri

-- 
Uri Guttman  -----------------  SYStems ARCHitecture and Software Engineering
Perl Hacker for Hire  ----------------------  Perl, Internet, UNIX Consulting
uri@sysarch.com  ------------------------------------  http://www.sysarch.com
The Best Search Engine on the Net -------------  http://www.northernlight.com


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

Date: Thu, 27 Aug 1998 01:06:40 -0400
From: Dave Wreski <dave@nic.com>
Subject: Determining strlen
Message-Id: <35E4E960.BFA4D38E@nic.com>

Hi all.  I am very new at learning perl.  As a matter of fact, I've been
forced into learning it with this project I'm working on.

I'd like to be able to search a text file for URLs, and if they are
greater than 80 chars long, cut off the remaining characters.

I've figured out how to find out the length of the URL, but can't figure
out how to cut from the 81st character to the end out of the string.

Thanks for any ideas,
Dave




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

Date: 27 Aug 1998 01:41:49 -0400
From: Uri Guttman <uri@sysarch.com>
To: Dave Wreski <dave@nic.com>
Subject: Re: Determining strlen
Message-Id: <x7hfyz3rs2.fsf@sysarch.com>

>>>>> "DW" == Dave Wreski <dave@nic.com> writes:

  DW> Hi all.  I am very new at learning perl.  As a matter of fact,
  DW> I've been forced into learning it with this project I'm working
  DW> on.

well that is good. perl is good for you. better get a good book or two
like learning perl and programming perl. also the new perl cookbook is
very good.

also read the FAQs so you don't have to ask this kind of question again.

  DW> I'd like to be able to search a text file for URLs, and if they
  DW> are greater than 80 chars long, cut off the remaining characters.

  DW> I've figured out how to find out the length of the URL, but can't
  DW> figure out how to cut from the 81st character to the end out of
  DW> the string.

there are many ways, as perl has more than one way to do anything.

lookup the substr function for the simplest. it can be used on the right
or left side to truncate strings. how to do that i will leave as an
exercise to you and to encourage you to read the docs.

finally, the subject is wrong as you are asking aboth finding the length
and not setting it. accurate subjects are useful in getting accurate
answers.

hth,

uri

-- 
Uri Guttman  -----------------  SYStems ARCHitecture and Software Engineering
Perl Hacker for Hire  ----------------------  Perl, Internet, UNIX Consulting
uri@sysarch.com  ------------------------------------  http://www.sysarch.com
The Best Search Engine on the Net -------------  http://www.northernlight.com


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

Date: Thu, 27 Aug 1998 05:45:08 GMT
From: Eric Wong <egwong@netcom.com>
Subject: Re: Determining strlen
Message-Id: <egwongEyC2n8.1o8@netcom.com>

Dave Wreski <dave@nic.com> wrote:
: Hi all.  I am very new at learning perl.  As a matter of fact, I've been
: forced into learning it with this project I'm working on.

: I'd like to be able to search a text file for URLs, and if they are
: greater than 80 chars long, cut off the remaining characters.

: I've figured out how to find out the length of the URL, but can't figure
: out how to cut from the 81st character to the end out of the string.

You could use a regular expression:
  s/(.{80}).*/$1/;

Use of regexps is explained in the perlre manpage.

Oh, you might also check out the substr() function in
the perlfunc manpage, too :)

,Eric
[cc'd]


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

Date: Thu, 27 Aug 1998 03:09:20 GMT
From: dhawker@removethis.bigfoot.com (David Hawker)
Subject: Re: Getting dialup dynamic IP
Message-Id: <35e6cdd5.670055@news.cableol.net>

On Sat, 22 Aug 1998 16:10:40 GMT, maurice@hevanet.com (Maurice Aubrey) felt
the need to post:

>On Sat, 22 Aug 1998 14:24:47 GMT, David Hawker <dhawker@bigfoot.com> wrote:
>>Is there any way I can get my perl script to automatically obtain my
>>dynamic IP address whenever I dialup? Perhaps a winsock call? I'm running
>>Windows 95 and perl 5.004_02 for DOS.
>>
>>Currently I'm using a cgi script to send me the $ENV{REMOTE_HOST} data
>>which I then paste into the local perl script as my hostname.
>
>I'm not sure if this will work under 95. 
>
># getsockname() to find out what our IP address is.
># The remote host doesn't even need to exist, since
># a UDP connect doesn't actually send anything; it
># just determines what interface is needed to get out.
># If there's no route outside, we die.

I thought about doing getsockname, but I would have done it with TCP and
this may not be as good as your method - it'd probably just return the
address that the socket was bound to - putting us back to square one :)

>sub _determine_ip {
>  my $self = shift;
>  my($raddr, $myaddr, $socket);
>
>  $socket = new FileHandle;
>  $raddr = sockaddr_in(80, '1.1.1.1');
>  socket($socket, PF_INET, SOCK_DGRAM, getprotobyname('udp'))
>    or die "create socket: $!";
>  connect($socket, $raddr)
>    or die "connect: $!";
>  $myaddr = (unpack_sockaddr_in(getsockname($socket)))[1];
>  close $socket;
>  return inet_ntoa $myaddr;
>}                      

This code generated some errors so I inserted "use Socket" and that got rid
of the syntax errors - but when online it dies with "connect: Cant connect,
unknown error"

In particular, what is $self and the declaration of $socket for? The former
isn't used and the latter seems unnecessary.









































--
dhawker@bigfoot.com | ICQ 7222349
http://dhawker.home.ml.org


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

Date: Thu, 27 Aug 1998 05:35:51 GMT
From: maurice@hevanet.com (Maurice Aubrey)
Subject: Re: Getting dialup dynamic IP
Message-Id: <slrn6u9s1p.1pe.maurice@localhost.localdomain>

On Thu, 27 Aug 1998 03:09:20 GMT, David Hawker <dhawker@removethis.bigfoot.com> 
wrote:
>On Sat, 22 Aug 1998 16:10:40 GMT, maurice@hevanet.com (Maurice Aubrey) felt
>the need to post:
>
>>sub _determine_ip {
>>  my $self = shift;
>>  my($raddr, $myaddr, $socket);
>>
>>  $socket = new FileHandle;
>>  $raddr = sockaddr_in(80, '1.1.1.1');
>>  socket($socket, PF_INET, SOCK_DGRAM, getprotobyname('udp'))
>>    or die "create socket: $!";
>>  connect($socket, $raddr)
>>    or die "connect: $!";
>>  $myaddr = (unpack_sockaddr_in(getsockname($socket)))[1];
>>  close $socket;
>>  return inet_ntoa $myaddr;
>>}                      
>
>This code generated some errors so I inserted "use Socket" and that got rid
>of the syntax errors - but when online it dies with "connect: Cant connect,
>unknown error"
>
>In particular, what is $self and the declaration of $socket for? The former
>isn't used and the latter seems unnecessary.

Yes, sorry ... you need: 

use Socket;
use FileHandle;

_determine_ip() is a method within a larger module, so $self is the object.
You can remove that if you aren't creating a module.

I don't see why $socket is unnecessary ... isn't it required for the
calls to socket(), connect(), and getsockname()?

I'm afraid I can't help you with the error ... but if you discover its
cause, please let me know.

-- 
Maurice Aubrey <maurice@hevanet.com>

Real programmers don't comment their code. It was hard to write,
it should be hard to understand. 


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

Date: Thu, 27 Aug 1998 03:23:04 GMT
From: dzuy@my-dejanews.com
Subject: Re: How to convince others using perl instead bourne scripts
Message-Id: <6s2jeo$1l1$1@nnrp1.dejanews.com>

In article <35E4828F.B9E16F20@transarc.com>,
  Dennis Chang <dchang@transarc.com> wrote:
> Hi,
>
> My friend keeps saying bourne script and C is more efficient than perl.
> Where can I find the advantages and disadvantage among perl, bourne
> scripts and C?
>
> Thanks,
>
> --
> Dennis Chang
>
>
	Challenge him/her to write an sh script or C program that reads in
	a file, then re-arrange the lines randomly.  For example, I have a
	file which is a list of names sorted in alphabetical order.  Re-generate
	the file so that all the names are in random order.  If stumped,
	email me and I'll send a 20 line Perl script to solve this problem.
	Try it with a language of your choice.

	Dzuy

-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp   Create Your Own Free Member Forum


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

Date: Wed, 26 Aug 1998 23:10:54 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: Is there a size limit on $ vars?
Message-Id: <1dee3tb.t9t30gxrbyd0N@bay1-471.quincy.ziplink.net>

Tye McQueen <tye@fumnix.metronet.com> wrote:

> ) Instead, perlop suggests using readdir() to avoid invoking a shell.
> 
> I keep seeing this suggestions and I keep thinking that a much
> better idea would be to use a module that implments glob() using
> readdir().

*shrug*  Since your idea still proposes using readdir(), it's simply one
way of following the suggestion.

-- 
 _ / '  _      /         - aka -         rjk@coos.dartmouth.edu
( /)//)//)(//)/(     Ronald J Kimball      chipmunk@m-net.arbornet.org
    /                                  http://www.ziplink.net/~rjk/
        "It's funny 'cause it's true ... and vice versa."


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

Date: Wed, 26 Aug 1998 22:26:38 -0500
From: "Michael D. Schleif" <mds-resource@mediaone.net>
Subject: Re: Max value in an array
Message-Id: <35E4D1EE.2EAEACC1@mediaone.net>

Benchmark: timing 10000000 iterations of max_for, max_map...
	max_for: 107 secs (107.77 usr 0.00 sys = 107.77 cpu)
	max_map: 105 secs (103.89 usr 0.00 sys = 103.89 cpu)

use Benchmark;
my @array = qw(1 99 98 111 2 3 4 5 6 7 888 0.1 -99999 -0.00001 3.14159
123456789);
my $count = 10000000;
timethese($count, {
	'max_map' => 'max_map(\@array)',
	'max_for' => 'max_for(\@array)',
});

sub max_map {
    return unless @_;
    my   $max = shift;
    map {$max = $_ if $_ > $max; ()} @_;
    $max;
}
sub max_for {
    return unless @_;
    my   $max = shift;
	foreach (@_) { $max = $_ if $_ > $max };
    $max;
}

Craig Berry wrote:
> 
> Abigail (abigail@fnx.com) wrote:
> : ++ no hint of building and throwing away a list of results (even if the ()
> : ++ makes sure the list never grows, of course).
> :
> : Oh, I see. Throwing away a list of zero elements is bad, but you don't
> : care about the results of all the assignments?
> 
> Not sure what you mean, here.  Both our versions have one comparison for
> each array element after the first, and one assignment for each true
> comparison.  The only difference is the syntactic and (possibly) runtime
> overhead of (avoiding) building the map results list.

-- 

Best Regards,

mds
mds resource
888.250.3987

"Dare to fix things before they break . . . "

"Our capacity for understanding is inversely proportional to how much we
think we know.  The more I know, the more I know I don't know . . . "


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

Date: Wed, 26 Aug 1998 21:42:41 -0700
From: Craig <design@dansie.net>
To: Carter Blitch <carter@objectshare.com>
Subject: Re: MIME Type for files with .PL Extensions?
Message-Id: <35E4E3C1.9F20E57D@dansie.net>



Carter Blitch wrote:

> Can somebody tell me the MIME Type associated with files with .pl
> extensions???
> thanks!!!!!!!!!

 Try,

application/x-perl; charset="us-ascii"

--

Regards,

Craig Dansie
Dansie Shopping Cart
http://www.dansie.net
cart@dansie.net




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

Date: Wed, 26 Aug 1998 23:10:55 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: newbie question
Message-Id: <1dee438.ay2m7d12u9v6rN@bay1-471.quincy.ziplink.net>

[posted and mailed]

Justin Kidder <jrkst34+@pitt.edu> wrote:

> This is perl, version 4.0

You need perl, version 5.x

5.005 is the latest version.

-- 
 _ / '  _      /         - aka -         rjk@coos.dartmouth.edu
( /)//)//)(//)/(     Ronald J Kimball      chipmunk@m-net.arbornet.org
    /                                  http://www.ziplink.net/~rjk/
        "It's funny 'cause it's true ... and vice versa."


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

Date: 27 Aug 1998 01:18:30 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: numeric operators
Message-Id: <6s2q76$gar$1@monet.op.net>


In article <904181795.747.0.nnrp-10.c2deb1c5@news.demon.co.uk>,
Daniel Adams <dan@fearsome.net> wrote:

You have very bizarre control flow, which seems to come from a notion
that `&' means `go to'.  It does, but it also means `come back here
when you're done'.    You have this very suspicious comment in
`prev_month': 

># Return to subroutine "find_out"
>&find_out;

Normally, if `find_out' calls `prev_month', the way you return to
`find_out' is by doing `return'.  `&find_out' does not `return' to
`find_out' in the normal sense of that word; instead, it calls
`find_out' *again*; this is different, because Perl keeps track of all
subroutine calls, and when you return from one, either by doing
`return' or by falling off the bottom, it returns the the next line in
the previous unfinished subroutine.

If you want `find_out' to call `prev_month' repeatedly while some
condition is true, you should change ths tructure of the program: 

WRONG:

	sub find_out {
	  if (whatever) {
	    &prev_month;
	  }
	  ...
	}

	sub prev_month {
	  # adjust variables
	  &find_out;
	}

RIGHT:

	sub find_out {
	  while (whatever) {
	    &prev_month;
	  }
	  ...
	}

	sub prev_month {
	  # adjust variables
	  return;
	}

Until you clean up the subroutine calls, this program is going to be
quite difficult to debug, and more to the point, it may be hard to get
advice about it because it's so bizarre.  I admit that I didn't look
too closely at it, because as you can see I found plenty of things to
say about just the parts I glanced at.

A problem with your questions is that you didn't show `success' and
`fail', which may be crucial here.  (Maybe not, but you didn't include
them, so I can't tell.)  I'll try to guess anyway.  

My best guess is that you have an infinite loop in your program:
`find_out' calls `not', which calls `prev_month', which in turn calls
`find_out', and it's not clear when or how this is going to stop.  In
particular, the test in `not' that determines whether `prev_month' is
called is extremely peculiar:

>if ($day_found =~ 0) { &prev_month; }

I don't know what you think this is doing, but whatever you think,
you're almost certainly mistaken.  =~ is the string pattern matching
operator.  That bare 0 is being interpreted as a pattern, and the
effect of the test is to ask if `$day_found' *contains* a zero.
The test will be true when $day_found is 0 or 10 or 20 or 109, which 
surely isn't what you want.  Maybe you meant `$day_found <= 0' ?
That asks if the day is less than or equal to zero.

Here's a style point: Give functions meaningful names that describe
what they do.  `success' and `fail' are OK (although `success' should
probably be `succeed') but `not' is a big loser.  The name of the
function should be an imperative phrase (`imperative' is grammarese
for `do this!  now do that!') and should describe its, er, function.
If you can't figure out how to describe what a function does, then it
should not be a function.  `adjust_date' or `determine_previous_date'
or `compute_earlier_date' are good names for functions.  `not' is not.
`not' is also a bad name because it's already a predefined Perl
keyword and you'll confuse people with it, perhaps yourself.

Finally, you should to learn to use the debugger.  The debugger is a
Perl feature that lets you step through the code one line at a time
and examine the variables as you go.  At each step, you look at the
relevant variables, say to youself ``Ah, now the test should be false,
so it should go here.  Ah, now it should adjust the date, and when
it's done, the date should be 3/12/97.  Ah, now it's going to go back
and try again...''  You keep doing that, and then suddenly the program
takes the wrong way on a branch, or calls the wrong function, or the
variables don't have the values you want, and then you say `Aha!
That's where it goes wrong!'  Then you have a smoking gun, and you can
figure out what the problem is and fix it.  For example, you might be
stepping along, and discover that $month is -1.  ``Aha!'' you say.
``Of course there's no file with a negative month, and after the month
goes negative, it keeps looking backwards for $month -2, -3, and so on
forever!  I have to include a check for a month underflow in
`prev_month', and adjust the year if necessary.''  Or something like
that.  Of course, this takes time and patience and experience, but you
have time (I hope), you can cultivate patience, and you can acquire
experience.

Here's the ten-second introduction to the debugger:

	perl -d yourprogram

runs your program with the debugger.

	$var = whatever;

sets a variable.

	s

executes the current line of code and displays the next line, which it
will execute next time you do `s'.

	p $var

prints out the value of a variable

	h
	h h

get help.

	q

quits.


Thanks for asking such a complete question and for taking the time to
include a full description of the problem.  Next time, you might want
to consider a more descriptive subject like `program stuck in infinite
loop'.  Good luck!



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

Date: 27 Aug 1998 01:24:14 GMT
From: dennis@info4.csie.nctu.edu.tw (GEMINI)
Subject: perl CGI & IIS & win32...
Message-Id: <6s2cfu$n5n$1@netnews.csie.NCTU.edu.tw>

hi there,
  I use perl to develop CGI for IIS under win32.
I found that if I execute an external program or command
this way:
   $lines=`dir /w`

I won't be able to get output of the command by $lines,
and found that the perl CGI is executed by creating another
console (a dos prompt box) and output to the new console rather
than to the redirected standard output.

If I execute the CGI program under a DOS box directly,
the result is OK as expected,but how to resolve the problem
when used as a CGI?
thanks.


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

Date: Thu, 27 Aug 1998 03:42:10 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: Perl compiler
Message-Id: <mA4F1.85$wf3.749364@shore>

Russ Allbery (rra@stanford.edu) wrote:
: But it's still fundamentally a password.

Examples appreciated.  But there's a significant difference between a
couple of the examples you mentioned and merely plunking a cleartext
password into a script.  I mean -- the situations are of a different
magnitude.

--
Nate Patwardhan|root@localhost
"Fortunately, I prefer to believe that we're all really just trapped in a
P.K. Dick book laced with Lovecraft, and this awful Terror Out of Cambridge
shall by the light of day evaporate, leaving nothing but good intentions in
its stead." Tom Christiansen in <6k02ha$hq6$3@csnews.cs.colorado.edu>


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

Date: 26 Aug 1998 21:49:45 -0700
From: Russ Allbery <rra@stanford.edu>
Subject: Re: Perl compiler
Message-Id: <m3vhnft4eu.fsf@windlord.Stanford.EDU>

Nathan V Patwardhan <nvp@shore.net> writes:
> Russ Allbery (rra@stanford.edu) wrote:

>> But it's still fundamentally a password.

> Examples appreciated.  But there's a significant difference between a
> couple of the examples you mentioned and merely plunking a cleartext
> password into a script.  I mean -- the situations are of a different
> magnitude.

Oh, sure.  Like I said, I mostly agree with you.  It's just that there
*are* cases where one has to do the moral equivalent.

-- 
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
 00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print


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

Date: Thu, 27 Aug 1998 05:13:02 GMT
From: dhawker@removethis.bigfoot.com (David Hawker)
Subject: Re: Perl documentation
Message-Id: <35f0e610.6874015@news.cableol.net>

On 25 Aug 1998 13:53:12 GMT, Tom Christiansen <tchrist@mox.perl.com> felt
the need to post:

> [courtesy cc of this posting sent to cited author via email]
>
>In comp.lang.perl.misc, 
>    david.hawker@cableol.co.uk writes:
>:I *could* have been more thorough and searched everything in the perldoc
>:directory tree for "foreach" but then there'd have been less activity in
>:this bustling newsgroup, one less question that may have answered the query
>:of a thousand newbies reading the group.
>
>Everyone should be familiar with the pointers in the top-level
>manpage.  I've starred the ones most important to beginners.

I'm familiar with it but I'm not going to mush my brain by reading through
20 huge texts looking for something whose whereabouts I'm unsure of.

>If you first consult this list when you want to find something
>whose whereabouts you're unfamiliar with, I'll bet you'll go far.

A better and faster way is to use Windows 95's built-in Find tool which
searches files for a text string. You must have something like this on
UNIX? Granted, perl itself could do it.

--
dhawker@bigfoot.com | ICQ 7222349
http://dhawker.home.ml.org


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

Date: Thu, 27 Aug 1998 05:13:19 GMT
From: dhawker@removethis.bigfoot.com (David Hawker)
Subject: Re: Perl documentation
Message-Id: <35f3e843.7436843@news.cableol.net>

On Tue, 25 Aug 1998 09:25:35 GMT, huntersean@hotmail.com felt the need to
post:

>In article <35e4325a.11528910@news.cableol.net>,
>  david.hawker@cableol.co.uk wrote:
>> On Mon, 24 Aug 1998 02:29:42 -0400, "John Mason Jr" <masonj@erols.com> felt
>> the need to post:
>>
>> >David,
>> >  You might find the new version of perl from Activestate useful it has all
>> >the docs in one place.
>>
>> What about the docs for UNIX system calls? All the UNIX functions that
>> aren't documented in the perl docs?
>>
>
>What about all the other UNIX things that aren't in the perl docs?  After
>all, you could call them all inside backticks?	Give us a break.  Pick up a
>set of manpages if you want UNIX system call docs.  Pick up a copy of Plauger
>and Brodie if you need C standard library documentation.  If you're using
>unix, you'll already have manpages.  If you're not, there's no guarrantee
>what your system will do when you execute those functions, but you could get
>a set of linux or bsd manpages from sunsite.unc.edu or one of its many
>mirrors worldwide. Either way, the perl docs are unwieldy enough without
>including a load of redundant information.

I agree - and this argument stems, I believe, from people not understanding
what I'm saying nor reading my posts properly.

--
dhawker@bigfoot.com | ICQ 7222349
http://dhawker.home.ml.org


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

Date: Thu, 27 Aug 1998 05:14:13 GMT
From: dhawker@removethis.bigfoot.com (David Hawker)
Subject: Re: Perl documentation
Message-Id: <35f6eb1b.8165055@news.cableol.net>

On 25 Aug 1998 05:22:04 GMT, abigail@fnx.com (Abigail) felt the need to
post:

>David Hawker (dhawker@bigfoot.com) wrote on MDCCCXX September MCMXCIII in
><URL: news:35e53294.11586626@news.cableol.net>:
>++ On 23 Aug 1998 23:02:14 GMT, abigail@fnx.com (Abigail) felt the need to
>++ post:
>++ 
>++ >Then complain to the vendors for shipping a system without documentation.
>++ 
>++ I don't expect the vendors to bundle the interrupt guides, assembly
>++ language FAQs, windows api details, etc etc with a home computer.... maybe
>++ if I was buying one from a university for studying computing (which
>++ incidentally I shall be doing in a few weeks) but not from a high street
>++ store.
>
>Oh, so it's logical Perl supplies your missing documentation? And of
>course Python. And Rexx. And whatever other language/tool you install on
>your system and that might reference your your system. They all should
>come with documentation for your system. That makes a lot of sense,
>doesn't?

I didn't say that or imply it.

>++ >Would you buy a TV without a manual too, and then complain the TV guide
>++ >doesn't have instructions on how to operate your TV?
>++ 
>++ No, that's not the point. I can get the docs I want - it's just an
>++ inconvenient and costly way of getting them. I'd rather have them all in
>++ one place, on my hard disk :) I'll get to work on finding the UNIX manpages
>++ all packaged up.
>
>Then comp.lang.perl.misc isn't the place to ask, is it?

No, I guess it was just a question that came into my mind when I was
writing the original post complaining about the apparent lack of foreach
:-)















































--
dhawker@bigfoot.com | ICQ 7222349
http://dhawker.home.ml.org


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

Date: 27 Aug 1998 05:30:28 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Perl documentation
Message-Id: <6s2qtk$2tg$1@csnews.cs.colorado.edu>

In comp.lang.perl.misc, <A HREF="mailto:david.hawker@cableol.co.uk">
writes:

:>Everyone should be familiar with the pointers in the top-level
:>manpage.  I've starred the ones most important to beginners.
:
:I'm familiar with it but I'm not going to mush my brain by reading through
:20 huge texts looking for something whose whereabouts I'm unsure of.

Grep.  

grep grep grep grep grep grep.  grep grep grep grep grep grep.

Grep.

--tom
-- 
    "Help save the world!"              --Larry Wall in README


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

Date: 27 Aug 1998 11:03:17 +0930
From: Martin Gregory <mgregory@asc.sps.mot.com>
Subject: Re: Prime numbers [was Re: here's an implementation of diff in perl]
Message-Id: <r8n28rqkde.fsf@asc.sps.mot.com>

abigail@fnx.com (Abigail) writes:

> Martin Gregory (mgregory@asc.sps.mot.com) wrote on MDCCCXVIII September
> MCMXCIII in <URL: news:r8yasguvuu.fsf@asc.sps.mot.com>:
> ++ Daniel Grisinger <dgris@rand.dimensional.com> writes:
> ++ 
> ++ > [posted to comp.lang.perl.misc and mailed to the cited author]
> ++ > 
> ++ > In article <r8zpcyvrju.fsf_-_@asc.sps.mot.com>
> ++ > Martin Gregory <mgregory@asc.sps.mot.com> wrote:
> ++ > >
> ++ > >abigail@fnx.com (Abigail) writes:
> ++ > >> -- 
> ++ > >> perl -wle '(1 x $_) !~ /^(11+)\1+$/ && print while ++ $_'
> ++ > >
> If you think the regex is anywhere near efficient, you're sadly mistaken.

> ++ 1) I don't see any division going on there.
> ++ 2) Division seems to be a poor trick for detecting prime numbers: you
> ++    have to divide the number in question by evey number less than it.
> ++    Slow. This code does not do that: it has a one-shot hit to tell you
> ++    whether the number is prime.
> 
No, I didn't think that.  I was actually 'happily ignorant'  :-)

(I should have said 'it seems to have a one-shot' not 'it has a
one-shot', that's what I meant!)

That is, I did not know how the regex worked, and wondered whether it
knew something more than just plain division.  I'm glad I asked: quite
an interesting thread!

Thanks for your sig.

Martin.


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

Date: Thu, 27 Aug 1998 07:34:06 +0200
From: Bruce Smith <9401962@ml.petech.ac.za>
Subject: Re: RE Losing digits on numbers with magic increment
Message-Id: <35E4EFCE.CE75CA7E@ml.petech.ac.za>

Should have mentioned it. All the scripts that access the stats files using flock
to lock
the files with LOCK_EX. I have had a suggestion that Perl automatically determines
what
size of underlying variable the number must get stored in and that I am reaching
the end of the storage space, eg it allocate 16 bits and then the increment
requires 17.

It's just annoying.

Tony Curtis wrote:

> Re: RE Losing digits on numbers with magic increment, Bruce
> <9401962_@ml.petech.ac.za> said:
>
> Bruce> I have a problem. I have a large number of scripts on
> Bruce> a Web server and each script logs an access number
> Bruce> each time it is run. What I do is store the number in
> Bruce> a file, read it in using $Num = <FOO> and chop the
> Bruce> eol character. I then use $Num++ and write the number
> Bruce> back to the file with print FOO "$Num\n". What
> Bruce> happens, and I'm not really sure why, the number
> Bruce> clocks over, it happened at 65536 and again at about
> Bruce> 80000.
>
> It's because there are lots of punters flocking to your
> site.
>
> You are presumably getting multiple accesses `at the same
> time' which means there are 2 scripts trying to read/write
> the same counter file at the same time.
>
> So...you need to implement file locking on the counter file.
>
> See perlfaq5,
>
>     "How can I lock a file?"
> and
>     "I still don't get locking.  I just want to increment
>      the number in the file.  How can I do this?"
>
> hth
> tony
>
> PS The pun is intentional, no points for finding it.
> --
> Tony Curtis, Systems Manager, VCPC,    | Tel +43 1 310 93 96 - 12; Fax - 13
> Liechtensteinstrasse 22, A-1090 Wien,  | <URI:http://www.vcpc.univie.ac.at/>
> "You see? You see? Your stupid minds!  | private email:
>     Stupid! Stupid!" ~ Eros, Plan9 fOS.| <URI:mailto:tony_curtis32@hotmail.com>





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

Date: Thu, 27 Aug 1998 07:39:27 +0200
From: Bruce Smith <9401962@ml.petech.ac.za>
Subject: Re: reading specific words from an Mp3 file
Message-Id: <35E4F10E.595D1001@ml.petech.ac.za>

Hi

You can use read(handle, variable, length) to read length number of
bytes in from the file, and seek(-x, 2) to set the file pointer to x
bytes before the end of file. Hope this help.

Bruce Smith

ErLanGen wrote:

> Hi all,
>         Im using Perl 5.003_07, Perl for Win32 build 316 .
> I was given the bit stucture of the frame header in an
> Mp3 file. I want to read the first 32 bit word and
> also the last 8 words in a file so that I can get the Tag.
> Using sysread i think i can get the first word, but i have no
> idea how to get the last 8 words.
>         I think i need my hand held on this script. Has
> anyone already written it? These are steps needed to compute
> length of time for an Mp3 song.
>         If you want the bit structure of the frame header
> e-mail me back with * Frame Header Bits * someewhere in
> the body of the letter.
>         Cheers,
> --
> ErLanGen
> mpryor@nospam.sprintmail.com
> Where do you want to go today?
> Come back without crashing or catching a Virus!





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

Date: Thu, 27 Aug 1998 03:13:28 GMT
From: dzuy@my-dejanews.com
Subject: Re: Remote Hash Access?
Message-Id: <6s2iso$ub$1@nnrp1.dejanews.com>

In article <35E46DA3.3255D16D@fanniemae.com>,
  Ian Lowe <Ian_Lowe@fanniemae.com> wrote:
> I have just inherited a nearly finished perl program at work, but I am
> by no means a perl programmer :)  I was hoping that the group might be
> able to point me in the right direction.  Here is what I need to do:
>
> We are using Tivoli as an event fault management system, and need a
> monitor to be written which looks at filesystem levels and creates a
> problem ticket when the threshold gets above a certain level.  The
> current script has these filesystems hardcoded into the program (they
> are in a hash).  Since our filesystems change so much, this is not a
> practical solution.
>
> What I would like to do is take the hash and put it on one central
> server that
> the program calls from each of our other servers.  My question:
>
> Could a hash be called remotely like this?  If so, how would you go
> about doing it?
>
> Any assistance would be greatly appreciated.
>
> Ian A. Lowe
>
	When I hear central file server, I immediately think of NFS.  If you
	don't want or don't have NFS, how about a server process on the central
	server and client program that requests the info from other servers?
	I don't know if you can pass data structure over socketb but the server
	program can write the hash in an easily parsed fashion, then the client
	parses it back into the hash.  What about NIS?  You can put data into
	NIS file and NIS client can access anywhere.

	Dzuy

-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp   Create Your Own Free Member Forum


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

Date: Wed, 26 Aug 1998 23:10:56 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: Search and replace
Message-Id: <1dee4tm.1qwvt73rx0xx8N@bay1-471.quincy.ziplink.net>

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

> [Posted to comp.lang.perl.misc and copy mailed.]
> 
> In article <35E3609B.66F87E1@mail1.stofanet.dk> on Wed, 26 Aug 1998 
> 03:10:51 +0200, Henrik =?iso-8859-1?Q?J=F8rgensen?= 
> <hekke@mail1.stofanet.dk> says...
> > 
> > =~ s#(http://.*)(\W)#<A HREF="$1">$1</A>$2#ig;
> > 
> > It simply replaces an URL by <A HREF="URL">URL</A>
> 
> Good Lord, NO!  Try it with, for example, 'http://foo.bar'.  You get
> 
> <A HREF="http://foo">http://foo</A>.bar
> 
> exactly as you told it.  A URL does not end on the first non-word 
> character.

Even worse, this regex ends the URL not on the first non-word character,
but on the *last*.  Observe:

$_ = 'There is cool stuff at http://www.blahblahblah.com/ so go there
now!!!  Yeah'

s#(http://.*)(\W)#<A HREF="$1">$1</A>$2#ig;

'There is cool stuff at <A HREF="http://www.blahblahblah.com/ so go
there now!!! ">http://www.blahblahblah.com/ so go there now!!! </A>
Yeah'

And, as you may have guessed, this solution is completely useless for
strings containing multiple URLs.

-- 
 _ / '  _      /         - aka -         rjk@coos.dartmouth.edu
( /)//)//)(//)/(     Ronald J Kimball      chipmunk@m-net.arbornet.org
    /                                  http://www.ziplink.net/~rjk/
        "It's funny 'cause it's true ... and vice versa."


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

Date: Wed, 26 Aug 1998 23:10:58 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: String terminators
Message-Id: <1dee52u.14gpq1psbpwbbN@bay1-471.quincy.ziplink.net>

Daniel Adams <dan@fearsome.net> wrote:

> >You're wrong.  Refer to the documentation on here-docs in perldata,
> >please.
> >
> ><<"EOF" is exactly equivalent to <<EOF
> 
> 
> Thanks, yes, my mistake, I know. Which is what I strongly suspected, why I
> wrote "I may be wrong"

If you think you may be wrong, why not take the time to check?

> and why I added (in the only line of my message that you cut):

That was hardly the only line I cut.  In order to trim the quoted
material to the minimum I thought necessary as context for my response,
I cut every line of your message *except one*.

> " Even if they're not damaging, they're certainly not
> neccessary. "
> 
> which makes them entirely superfluous and therefore an unnecessary
> complication.

They are unnecessary, although I don't really see them as a
'complication'.  It's just another way to do it.  *shrug*

> Given that, Mike Stok's suggestion is probably the most appopriate - that
> there may be rogue whitespace somewhere in there. If not, the original
> poster will need to post more details of his problem.
> 
> And while you were making a post anyway, why on earth didn't you at least
> add your own 2c worth of help trying to aid the original poster?

Because, as you just said, Mike Stok had already answered the question.

-- 
 _ / '  _      /         - aka -         rjk@coos.dartmouth.edu
( /)//)//)(//)/(     Ronald J Kimball      chipmunk@m-net.arbornet.org
    /                                  http://www.ziplink.net/~rjk/
        "It's funny 'cause it's true ... and vice versa."


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

Date: Thu, 27 Aug 1998 05:13:21 GMT
From: dhawker@removethis.bigfoot.com (David Hawker)
Subject: Re: Submitting a form from a script
Message-Id: <35efe3f4.6333892@news.cableol.net>

On Mon, 24 Aug 1998 16:44:45 -0400, comdog@computerdog.com (brian d foy)
felt the need to post:

>In article <35f9ca18.23067793@news.cableol.net>, david.hawker@cableol.co.uk posted:
>
>>On 24 Aug 1998 14:02:58 GMT, andlin-7@jota.sm.luth.se (Anders Lindgren)
>>felt the need to post:
>
>>>I'd like to know if (I'm sure it is, so how?) I can open a URL from a perl
>>>script... I don't need to take care of the output as I just need to submit
>>>a form, so I would need to open something like
>>>http://host.domain/script.cgi?name=value
>
>>Try a HTTP FAQ or RFC.
>
>try the LWP module and save yourself the trouble of learning 
>everything there is to know about HTTP just to do a simple task. :)

You win :)

--
dhawker@bigfoot.com | ICQ 7222349
http://dhawker.home.ml.org


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

Date: Wed, 26 Aug 1998 23:03:04 -0400
From: "Todd B" <NOTHANKStbeaulieu@mediaone.net>
Subject: Re: Unreadable Scripts?
Message-Id: <6s2ibf$967$1@wbnws01.ne.highway1.com>

actually, it could very well be a perl question -- to a beginner.  what if
perl could be compiled?



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

Date: Thu, 27 Aug 1998 03:32:10 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: Unreadable Scripts?
Message-Id: <_q4F1.83$wf3.749364@shore>

David (ceci@bway.net) wrote:
: Now I'm a beginner at Perl and this may sound stupid and and I may get
: flames but I need to know.  Is there any way to make it so that your scripts

If you're using Unix, set permissions accordingly so that users can't
read (or retrieve) your programs.

: Well now's probably the time for all those flames :).

Strange.  Does clpmisc now have a reputation for being an unhelpful
flamebed?  If so, I wonder why people aren't careful and continue to
post FAQs.  Just curious.

--
Nate Patwardhan|root@localhost
"Fortunately, I prefer to believe that we're all really just trapped in a
P.K. Dick book laced with Lovecraft, and this awful Terror Out of Cambridge
shall by the light of day evaporate, leaving nothing but good intentions in
its stead." Tom Christiansen in <6k02ha$hq6$3@csnews.cs.colorado.edu>


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

Date: Thu, 27 Aug 1998 03:33:39 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: Unreadable Scripts?
Message-Id: <ns4F1.84$wf3.749364@shore>

Todd B (NOTHANKStbeaulieu@mediaone.net) wrote:
: what if perl could be compiled?

That would be scary.

--
Nate Patwardhan|root@localhost
"Fortunately, I prefer to believe that we're all really just trapped in a
P.K. Dick book laced with Lovecraft, and this awful Terror Out of Cambridge
shall by the light of day evaporate, leaving nothing but good intentions in
its stead." Tom Christiansen in <6k02ha$hq6$3@csnews.cs.colorado.edu>


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

Date: Wed, 26 Aug 1998 23:35:26 -0400
From: "David" <ceci@bway.net>
Subject: Re: Unreadable Scripts?
Message-Id: <6s2k1i$4el$1@camel25.mindspring.com>

1.  But let's say that the person just chmod's it back to 755, or whatever?
See that's the problem.  There's probably no solution.

2.  What would happen if me and the other person had different logins, but
both logins had the same home directory and could access the same files?
Would 711 still make it so only I can read them?

Martien Verbruggen wrote in message ...
>In article <6s2fbf$fpm$1@camel19.mindspring.com>,
> "David" <ceci@bway.net> writes:
>> Now I'm a beginner at Perl and this may sound stupid and and I may get
>> flames but I need to know.  Is there any way to make it so that your
scripts
>> are unreadable but still executable to people that have FTP access to
your
>> host?  Cause I'd like it so that people that use the same host as me
can't
>> take a look at my scripts.  Well now's probably the time for all those
>> flames :).
>
>This is not a perl question, but a quesiton about file access
>permissions, which depends on your platform. Assuming that's some unix
>variant:
>
>chmod 711 script.pl
>
>Martien
>--
>Martien Verbruggen                      |
>Webmaster www.tradingpost.com.au        | "In a world without fences,
>Commercial Dynamics Pty. Ltd.           |  who needs Gates?"
>NSW, Australia                          |




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

Date: Thu, 27 Aug 1998 04:03:13 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: Unreadable Scripts?
Message-Id: <5U4F1.86$wf3.749364@shore>

David (ceci@bway.net) wrote:
: 1.  But let's say that the person just chmod's it back to 755, or whatever?
: See that's the problem.  There's probably no solution.

Umm, who is this person?  root?  A steroid abuser?  Someone with your
password (tisk tisk :-)?  If they don't have permissions to change it,
they can't.  Consider:

$ whoami
nvp

$ ls -l /bin/csh
-r-xr-xr-x  1 bin  bin  249856 Jul 19 18:34 /bin/csh

$ chmod 777 /bin/csh
chmod: /bin/csh: Operation not permitted

$ rm /bin/csh
override r-xr-xr-x  bin/bin for /bin/csh? y
rm: /bin/csh: Permission denied

Or this:

$ whoami
nvp

$ cat foo.txt
this is a test.
can you read me?
over and out

$ chmod 711 foo.txt

% whoami
bbaggins

% ls -al /home/nvp/foo.txt
-rwx--x--x  1 nvp  ora  46 Aug 26 23:59 foo.txt

% cat ~nvp/foo.txt
cat: /home/nvp/foo.txt: Permission denied

% more ~nvp/foo.txt
/home/nvp/foo.txt: Permission denied

% cp ~nvp/foo.txt ~/
cp: /home/nvp/foo.txt: Permission denied

: 2.  What would happen if me and the other person had different logins, but
: both logins had the same home directory and could access the same files?
: Would 711 still make it so only I can read them?

That would be unpleasant.  I hope that this isn't the case now.

--
Nate Patwardhan|root@localhost
"Fortunately, I prefer to believe that we're all really just trapped in a
P.K. Dick book laced with Lovecraft, and this awful Terror Out of Cambridge
shall by the light of day evaporate, leaving nothing but good intentions in
its stead." Tom Christiansen in <6k02ha$hq6$3@csnews.cs.colorado.edu>


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

Date: Wed, 26 Aug 1998 21:53:25 -0700
From: Craig <design@dansie.net>
To: sbernard@mail.esiea.fr
Subject: Re: Using cookie-lib.pl to set cookies
Message-Id: <35E4E645.B2DFCE21@dansie.net>



sbernard@mail.esiea.fr wrote:

>         I try to use cookie-lib.pl to set up cookies, but I'm really a newbie. So if
> anyone have already used it with success, I'd be happy to learn from him. I've
> tried to setup a simple cookie this way :
>
> #!/bin/perl
> #
> require "cgi-lib.pl";
> require "cookie-lib.pl";
>
> $expiration="";
> $path="/";
> $domain="";
> $secure="0";
> $cookie{'itsok'} = 1;
> &set_cookie($expiration,$domain,$path,$secure);
>
> print &PrintHeader;
> print &HtmlTop;
> print "Le cookie a ete fixe avec succes";
> print &HtmlBot;
>
> exit;
>
>         But this doesn't seem to work (well, I'm using Netscape, and in my
> configuration, I asked to make an alert before accepting a cookie, and nothing
> happens when I run the script). A example would be fine ...
>
>                                                         Sibastien BERNARD
>
> PS : Please add a direct e-mail answer to mailto:sbernard@mail.esiea.fr
> Thanks !
>
> -----== Posted via Deja News, The Leader in Internet Discussion ==-----
> http://www.dejanews.com/rg_mkgrp.xp   Create Your Own Free Member Forum



Set your browser to "Warn before accepting cookies" and go here:
http://www.kiwi.net/~rcd/cookies.html


--

Regards,

Craig Dansie
Dansie Shopping Cart
http://www.dansie.net
cart@dansie.net




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

Date: Thu, 27 Aug 1998 05:50:41 GMT
From: harry.darling@sn.novartis.com (Harry Darling)
Subject: Which DBM do I have here???
Message-Id: <35e4f04c.2766067@news.is.chbs>

Inherited: large perl program to maintain database
Interface: Netscape routine named "shuser"

Database files:
-rw-r--r--   1 www      daemon   2637824 Aug 27 07:02 Users.db
-rw-r--r--   1 www      daemon    327680 Aug 26 16:01 Users.id

I have been told that this is a Berkely DB.  Can anybody identify this
db type from the file extensions, or give me another hint as to how I
can identify the db type.

Thanks,
Harry


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

Date: Wed, 26 Aug 1998 23:10:59 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: Y2K Date Support
Message-Id: <1dee5l4.1ohekt2jlgr5bN@bay1-471.quincy.ziplink.net>

Mark-Jason Dominus <mjd@op.net> wrote:

> I kept expecting Jon to slip it into one of those quiz show questions
> about `expend the following acronyms', but he didn't.

Of course, it takes a lot more to expend some acronyms than others.
TMTOWTDI, for example.  People keep using that one over and over, but it
still hasn't been expended!

-- 
 _ / '  _      /         - aka -         rjk@coos.dartmouth.edu
( /)//)//)(//)/(     Ronald J Kimball      chipmunk@m-net.arbornet.org
    /                                  http://www.ziplink.net/~rjk/
        "It's funny 'cause it's true ... and vice versa."


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

Date: 12 Jul 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 Mar 98)
Message-Id: <null>


Administrivia:

Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.

If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu. 


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

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