[12431] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 6031 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jun 17 12:07:44 1999

Date: Thu, 17 Jun 99 09:00:26 -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           Thu, 17 Jun 1999     Volume: 8 Number: 6031

Today's topics:
    Re: Afraid to ask about Y2K! <tchrist@mox.perl.com>
        ANNOUNCE: File::Flock 99.061501 (David Muir Sharnoff)
        Announce: makerpm.pl <joe@ispsoft.de>
        ANNOUNCE: Time::ParseDate 99.061501 - Y2K edition (David Muir Sharnoff)
        ANNOUNCE: Unix::ConfigFile 0.05 <ssnodgra@fore.com>
        ANNOUNCE: Verilog (Wilson P. Snyder II)
        ANNOUNCEMENT: NEW MODULE: Lingua::EN::Numbers <pandich@yahoo.com>
        ANNOUNCEMENT: NEW MODULE: Net::RMI <pandich@yahoo.com>
        ANNOUNCEMENT: NEW VERSION: HTML::Template 0.03 <sam@tregar.com>
        Anyone CPAN.pm w/ native Win32 Perl? <sb@sdm.de>
    Re: Anyone CPAN.pm w/ native Win32 Perl? <randy@theoryx5.uwinnipeg.ca>
    Re: Asking for passwords and security (core dumps) <dhenders@cpsgroup.com>
    Re: Bit Twiddling Troubles (Greg Bacon)
    Re: Getting the current directory path/name <ludlow@us.ibm.com>
    Re: Getting the current directory path/name <latsharj@my-deja.com>
    Re: help using large memory from perl <sugalskd@netserve.ous.edu>
        How to do binary number calculations? <chrisvo@on.bell.ca>
    Re: How to do binary number calculations? (Greg Bacon)
    Re: Inclusive Split (Mark-Jason Dominus)
    Re: IO::Pipe question... (M.J.T. Guy)
    Re: Is it better perl than awk ? <tchrist@mox.perl.com>
    Re: Is it better perl than awk ? (Stepan Kasal)
    Re: LD_LIBRARY_PATH setting within the perl program (Dan Wilga)
        Opening files across the web? <mattc@terragon.com>
    Re: pattern matching question (Greg Bacon)
    Re: pattern matching question <craig@mathworks.com>
    Re: pattern matching question <dscapin@harris.com>
        Perl Script Question <microfhy@netvigator.com>
        Perl Script Question <microfhy@netvigator.com>
    Re: Perl training on east coast (Tad McClellan)
    Re: Rank HoH by sub-sub-key? (Greg Bacon)
    Re: Real perl Y2K bug! (Bill)
    Re: Regular expresions as parameters <garethr@cre.canon.co.uk>
    Re: shortest self printing perl program (Kevin Reid)
        Signature removal regex? (I.J. Garlick)
    Re: Signature removal regex? (Greg Bacon)
    Re: this  charecter @ ruined my day!! <revjack@radix.net>
        URGENT--pppd and chat sherifhanna@my-deja.com
        Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)

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

Date: 17 Jun 1999 08:13:35 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Afraid to ask about Y2K!
Message-Id: <3769028f@cs.colorado.edu>

     [courtesy cc of this posting mailed to cited author]

In comp.lang.perl.misc, 
    lr@hpl.hp.com (Larry Rosler) writes:
:I believe that this is a correct statement.  But when asked to, I was 
:unable to come up with an authoritative reference for it.  Please post 
:your reference.

    ``It is inappropriate to require that a time represented as seconds
     since the Epoch precisely represent the number of seconds between
     the referenced time and the Epoch''
		    --IEEE Std 1003.1b-1993 (POSIX) Section B.2.2.2

-- 
Heavy, adj.:
        Seduced by the chocolate side of the force.


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

Date: 17 Jun 1999 15:16:23 GMT
From: muir@idiom.com (David Muir Sharnoff)
Subject: ANNOUNCE: File::Flock 99.061501
Message-Id: <7kb3g7$ct4$1@play.inetarena.com>

I learned something at Usenix...  There's a new built-in
function in perl call "lock".  Turns out that function 
broke File::Flock.  

This happened a while ago, but I didn't know 'cause my
perl was out of date.  I've upgraded my perl and now
fixed File::Flock.

http://www.cpan.org/authors/id/MUIR/modules/File-Flock-99.061501.tar.gz

-Dave





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

Date: 17 Jun 1999 15:16:41 GMT
From: Jochen Wiedmann <joe@ispsoft.de>
Subject: Announce: makerpm.pl
Message-Id: <7kb3gp$ct5$1@play.inetarena.com>


Hi,

I'd like to announce the first public release of "makerpm.pl", a script
for generating RPM packages from Perl packages. It is based on the
standard MakeMaker mechanism, thus hopefully compliant to both Perl
and RPM standards. To use it, you simply

  - store makerpm.pl and the packages .tar.gz file in
    /usr/src/redhat/SOURCES
  - run

	makerpm --specs --source=<package>-<version>.tar.gz

    this will create a SPECS file in /usr/src/redhat/SPECS
  - run

	rpm -ba /usr/src/redhat/SPECS/<package>-<version>.spec

    this will create binary and source RPM's


I intend to enhance the script for building PPM files ASAP. Any
feedback welcome.

The script is available from any CPAN mirror, in particular

  ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/JWIED



Bye,

Jochen


-- 
Jochen Wiedmann						joe@ispsoft.de
A mathematician is an engine for converting coffee	+49 7123 14887
into theorems. (Hi, Lukas! :-)




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

Date: 17 Jun 1999 15:16:08 GMT
From: muir@idiom.com (David Muir Sharnoff)
Subject: ANNOUNCE: Time::ParseDate 99.061501 - Y2K edition
Message-Id: <7kb3fo$ct3$1@play.inetarena.com>

I've just released a new version of Time::ParseDate.  Grab
it from CPAN.  (Version 99.061501)

Previous versions eliminated gross Y2K bugs.  This version
adds post Y2K test cases.

Also fixed: dates prior to 1970.

http://www.cpan.org/modules/by-module/Time/Time-modules-99.061501.tar.gz

-Dave





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

Date: 17 Jun 1999 15:18:08 GMT
From: Steve Snodgrass <ssnodgra@fore.com>
Subject: ANNOUNCE: Unix::ConfigFile 0.05
Message-Id: <7kb3jg$cu9$1@play.inetarena.com>
Keywords: Unix perl module

Unix::ConfigFile is a new module package designed for Unix administrators,
especially those who have to write scripts to manipulate the various config
files in Unix.  This is the first public release of Unix::ConfigFile.

This module is available on CPAN:

http://www.cpan.org/authors/id/S/SS/SSNODGRA/Unix-ConfigFile-0.05.tar.gz

Here is a description from the README file:

Welcome to Unix::ConfigFile 0.05.  This is an *alpha* release.  That means
that interfaces may change in the future and there will probably be some bugs
lurking around.  You have been warned.

The Unix::ConfigFile distribution is a suite of modules that provide simple
interfaces to various Unix configuration files.  The objective is to free the
system administrator from dealing with the trivial formatting details of the
files, and allow him or her to concentrate on the information therein.
Currently supported files include:

        aliases    Unix::AliasFile
	automount  Unix::AutomountFile
        group      Unix::GroupFile
        passwd     Unix::PasswdFile

-- 
Steve "Pheran" Snodgrass * ssnodgra@fore.com * FORE Systems Unix Administrator
Geek Code: GCS d? s: a- C++ US++++$ P+++ L+ w PS+ 5++ b++ DI+ D++ e++ r++ y+*
"What to do I find it hard to know/The road I walk is not the one I chose" -Yes




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

Date: 17 Jun 1999 15:18:17 GMT
From: wsnyder@ultranet.com (Wilson P. Snyder II)
Subject: ANNOUNCE: Verilog
Message-Id: <7kb3jp$cua$1@play.inetarena.com>


Verilog is a hardware description language adopted by many EE CAD vendors,
and a IEEE standard.  These modules provide some simple parsing and
language features and will expand to more advanced features.

Verilog::* is in CPAN, but they have not been indexed under the Verilog top
level name.  If the moderators could fix that, I would appreciate it.

9) Interfaces to or Emulations of Other Programming Languages

Name           DSLI  Description                                  Info
-----------    ----  -------------------------------------------- -----
Verilog::
::Pli          Rdch  Access to simulator functions                WSNYDER
::Language     Rdpf  Language support, number parsing, etc        WSNYDER
::Parser       RdpO  Language parsing                             WSNYDER
::SigParser    RdpO  Signal and module extraction                 WSNYDER

-Wilson Snyder, wsnyder@ultranet.com




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

Date: 17 Jun 1999 15:17:32 GMT
From: Stephen Pandich <pandich@yahoo.com>
Subject: ANNOUNCEMENT: NEW MODULE: Lingua::EN::Numbers
Message-Id: <7kb3ic$ctl$1@play.inetarena.com>

NAME
      Lingua::EN::Numbers - Converts numeric values into their
      English string equivalents.

SYNOPSIS
              ## EXAMPLE 1

              use Lingua::EN::Numbers qw(American);

              $n = new Lingua::EN::Numbers(313721.23);
              if (defined $n) {
                      $s = $n->get_string;
                      print "$s\n";
              }

              ## EXAMPLE 2

              use Lingua::EN::Numbers;

              $n = new Lingua::EN::Numbers;
              $n->parse(-1281);
              print "N = " . $n->get_string . "\n";

REQUIRES
      Perl 5, Exporter, Carp

DESCRIPTION
      Lingua::EN::Numbers converts arbitrary numbers into human-
oriented English text. Limited support is included for
      parsing standardly formatted numbers (i.e. '3,213.23').
      But no attempt has been made to handle any complex
      formats. Support for multiple variants of English are
      supported. Currently only "American" formatting is
supported.

      To use the class, an instance is generated. The instance
      is then loaded with a number. This can occur either during
construction of the instance or later, via a call to the
      parse method. The number is then analyzed and parsed into
the english text equivalent.

      The instance, now initialized, can be converted into a
      string, via the get_string method. This method takes the
      parsed data and converts it from a data structure into a
      formatted string. Elements of the string's formatting can
be tweaked between calls to the get_string function.
      While such changes are unlikely, this has been done simply
to provide maximum flexability.

METHODS
      Creation

      new Lingua::EN::Numbers $numberString
          Creates, optionally initializes, and returns a new
          instance.

      Initialization

      $number->parse $numberString
          Parses a number and (re)initializes an instance.

      Output

      $number->get_string
          Returns a formatted string based on the most recent
          parse.

CLASS VARIABLES
      $Lingua::EN::Numbers::VERSION
          The version of this class.

      $Lingua::EN::Numbers::MODE
          The current locale mode. Currently only American is
          supported.

      %Lingua::EN::Numbers::INPUT_GROUP_DELIMITER
          The delimiter which seperates number groups.
Example:           "1,321,323" uses the comma ',' as the group
delimiter.

      %Lingua::EN::Numbers::INPUT_DECIMAL_DELIMITER
          The delimiter which seperates the main number from
its           decimal part.  Example: "132.2" uses the period '.'
as           the decimal delimiter.

      %Lingua::EN::Numbers::OUTPUT_BLOCK_DELIMITER
          A character used at output time to convert the
number           into a string.  Example: One Thousand, Two-Hundred
and           Twenty-Two point Four.  Uses the space character ' '
          as the block delimiter.

      %Lingua::EN::Numbers::OUTPUT_GROUP_DELIMITER
          A character used at output time to convert the
number           into a string.  Example: One Thousand, Two-Hundred
and           Twenty-Two point Four.  Uses the comma ',' character
          as the group delimiter.

      %Lingua::EN::Numbers::OUTPUT_NUMBER_DELIMITER
          A character used at output time to convert the
number           into a string.  Example: One Thousand, Two-Hundred
and           Twenty-Two point Four.  Uses the dash '-' character
as           the number delimiter.

      %Lingua::EN::Numbers::OUTPUT_DECIMAL_DELIMITER
          A character used at output time to convert the
number           into a string.  Example: One Thousand, Two-Hundred
and           Twenty-Two point Four.  Uses the 'point' string as
the           decimal delimiter.

      %Lingua::EN::Numbers::NUMBER_NAMES
          A list of names for numbers.

      %Lingua::EN::Numbers::SIGN_NAMES
          A list of names for positive and negative signs.

      $Lingua::EN::Numbers::SIGN_POSITIVE
          A constant indicating the the current number is
          positive.


      $Lingua::EN::Numbers::SIGN_NEGATIVE
          A constant indicating the the current number is
          negative.

DIAGNOSTICS
      Error: Lingua::EN::Numbers does not support tag: '$tag'.
          (F) The module has been invoked with an invalid
          locale.

      Error: bad number format: '$number'.
          (F) The number specified is not in a valid numeric
          format.

      Error: bad number format: '.$number'.
          (F) The decimal portion of number specified is not
in           a valid numeric format.

AUTHOR
      Stephen Pandich, pandich@yahoo.com




-------------------------
Stephen Pandich
pandich@yahoo.com
www.pandich.com


Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.




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

Date: 17 Jun 1999 15:17:51 GMT
From: Stephen Pandich <pandich@yahoo.com>
Subject: ANNOUNCEMENT: NEW MODULE: Net::RMI
Message-Id: <7kb3iv$ctv$1@play.inetarena.com>

Available at:

      ftp://ftp.cpan.org/pub/perl/CPAN/authors/id/P/PA/PANDICH/


This module provides a basic form of Remote Method Invocation.

Method Serves can define methods (which are simply any normal
perl subroutine) and register them with itself.

Clients may then query servers to obtain a list of register
methods and then invoke those methods at any time.

Serialization of arbitrarily complex perl data structures is
supported.

I would love feedback on this.

Thanks!



-------------------------
Stephen Pandich
pandich@yahoo.com
www.pandich.com


Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.




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

Date: 17 Jun 1999 15:17:15 GMT
From: Sam Tregar <sam@tregar.com>
Subject: ANNOUNCEMENT: NEW VERSION: HTML::Template 0.03
Message-Id: <7kb3hr$ctg$1@play.inetarena.com>

ANNOUNCEMENT: NEW VERSION: HTML::Template 0.03

NAME

HTML::Template - a Perl module to use HTML Templates

CHANGES

0.03  Fri June 11 17:37:00 1999
      - fixed a few irritating "undefined variable" errors in -w
      - big speedup on large TMPL_LOOPs.  They are at least one order of
        magnitude faster now!
      - die_on_bad_params => 0 never really worked!  It does now.
      - removed unnecessary junk from the distribution

DESCRIPTION

This module attempts to make using HTML templates simple and natural.
It extends standard HTML with a few new tags - <TMPL_VAR> and
<TMPL_LOOP>.  The file written with HTML and these new tags is called
a template.  It is usually saved separate from your script - possibly
even created by someone else!  Using this module you fill in the
values for the variables and loops declared in the template.  This
allows you to seperate design - the HTML - from the data, which you
generate in the Perl script.

This module is licenced under the GPL.  See the LICENCE section of the
README.


AVAILABILITY

The module is available on CPAN.  You can get it using CPAN.pm or go
to:

http://www.cpan.org/authors/id/S/SA/SAMTREGAR/


MOTIVATION

It is true that there are a number of packages out there to do HTML
templates.  On the one hand you have things like HTML::Embperl which
allows you to freely mix Perl with HTML.  On the other hand lie
home-grown variable substitution solutions.  Hopefully the module can
find a place between the two.

One advantage of this module over a full HTML::Embperl-esque solution
is that it enforces an important divide - design and programming.  By
limiting the programmer to just using simple variables and loops in
the HTML, the template remains accessible to designers and other
non-perl people.  The use of HTML-esque syntax goes further to make
the format understandable to others.  In the future this similarity
could be used to extend existing HTML editors/analyzers to support
this syntax.

An advantage of this module over home-grown tag-replacement schemes is
the support for loops.  In my work I am often called on to produce
tables of data in html.  Producing them using simplistic HTML
templates results in CGIs containing lots of HTML since the HTML
itself could not represent loops.  The introduction of loop statements
in the HTML simplifies this situation considerably.  The designer can
layout a single row and the programmer can fill it in as many times as
necessary - all they must agree on is the parameter names.

For all that, I think the best thing about this module is that it does
just one thing and it does it quickly and carefully.  It doesn't try
to replace Perl and HTML, it just augments them to interact a little
better.  And it's pretty fast.


DOCUMENTATION

The documentation is in Template.pm in the form of POD format
perldocs.  Even the above text might be out of date, so be sure to
check the perldocs for the straight truth.


CONTACT INFO

This module was written by Sam Tregar (sam@tregar.com) for Vanguard
Media (http://www.vm.com).  I'll be out of email range (in Tunisia!)
from June 27th to July 20th of 1999.  During this period bugs and
suggestions can be sent to my boss here at Vanguard - Jesse
(jesse@belfry.com).


Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.




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

Date: 17 Jun 1999 14:42:58 GMT
From: Steffen Beyer <sb@sdm.de>
Subject: Anyone CPAN.pm w/ native Win32 Perl?
Message-Id: <7kb1hi$amp$2@solti3.sdm.de>

Has anyone succeeded in using CPAN.pm with a *native* build of Perl for
Win32? (I.e., *not* with ActivePerl?)

Whatever I do, I get errors.

If I use Compress::ZLib and Archive::Tar, unpacking distributions creates
empty directories. If I use the GNU tools from Cygnus (tar.exe, gzip.exe,
gunzip.exe) instead, tar throws an exception.

Unfortunately, CPAN.pm does not allow mixing of Perl modules and EXE tools
for these two functions (untarring and unzipping), which might work better.

I am using M$ Developer Studio 6.0.

I don't want to use ActivePerl anymore because there's too much proprietary
stuff in there which isn't free (freedom, not free beer) for my taste.

BTW, has anyone succeeded in compiling and linking in the libdes C library
in such an environment?

Thanks for any help, hints or pointers!

Regards,
-- 
    Steffen Beyer <sb@engelschall.com>
    http://www.engelschall.com/u/sb/whoami/
    http://www.engelschall.com/u/sb/download/
    http://www.perl.com/CPAN/authors/id/STBEY/
    http://www.oreilly.de/catalog/perlmodger/bnp/


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

Date: 17 Jun 1999 15:21:15 GMT
From: Randy Kobes <randy@theoryx5.uwinnipeg.ca>
Subject: Re: Anyone CPAN.pm w/ native Win32 Perl?
Message-Id: <7kb3pb$225$1@canopus.cc.umanitoba.ca>

In comp.lang.perl.misc Steffen Beyer <sb@sdm.de> wrote:
> Has anyone succeeded in using CPAN.pm with a *native* build of Perl for
> Win32? (I.e., *not* with ActivePerl?)

Hi,
    Yes, I have, on Windows 98 with perl 5.00503, VC++ 6, 
and the latest CPAN.pm, although earlier "recent" versions of 
perl and CPAN.pm were also OK.

> Whatever I do, I get errors.

> If I use Compress::ZLib and Archive::Tar, unpacking distributions creates
> empty directories. If I use the GNU tools from Cygnus (tar.exe, gzip.exe,
> gunzip.exe) instead, tar throws an exception.

Maybe it was some quirk of my configuration, but to get Compress::Zlib
to work I had to go through a few extra steps, described in the
cpan-testers report at
http://www.perl.org/cpan-testers/results.cgi?request=dist&dist=Compress-Zlib
I've had some difficulties with Archive::Tar though, especially
in concert with Compress::Zlib - it also creates empty directories.

However, with CPAN.pm I've used the cygwin tools successfully, at
least the latest versions; there were some problems with earlier
versions. What about using a different set of gzip/tar tools?
GNU archives have a DOS version of gzip, and if you go, for
example, to http://www.zdnet.com/, you can get (free and
otherwise) versions of tar and gzip/gunzip. I'm currently
using a tar/gzip combination I got from there.

> Unfortunately, CPAN.pm does not allow mixing of Perl modules and EXE tools
> for these two functions (untarring and unzipping), which might work better.

> I am using M$ Developer Studio 6.0.

> I don't want to use ActivePerl anymore because there's too much proprietary
> stuff in there which isn't free (freedom, not free beer) for my taste.

> BTW, has anyone succeeded in compiling and linking in the libdes C library
> in such an environment?

I didn't try that ....

> Thanks for any help, hints or pointers!

> Regards,
> -- 
>     Steffen Beyer <sb@engelschall.com>

		best regards,
		Randy Kobes
-- 


Physics Department		Phone: 	   (204) 786-9399
University of Winnipeg		Fax: 	   (204) 774-4134
Winnipeg, Manitoba R3B 2E9	e-mail:	   randy@theoryx5.uwinnipeg.ca
Canada				http://theory.uwinnipeg.ca/


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

Date: 17 Jun 1999 10:24:55 -0500
From: Dale Henderson <dhenders@cpsgroup.com>
Subject: Re: Asking for passwords and security (core dumps)
Message-Id: <87909in92w.fsf@camel.cpsgroup.com>

>>>>> "Andrew" == Andrew Allen <ada@fc.hp.com> writes:


    Andrew> And digging through a core file is easy? Probably no
    Andrew> easier than reading /dev/mem, and that can be done without
    Andrew> you even knowing it.  Probably the easiest would be for
    Andrew> root just to monitor the tty. Or the Xserver
    Andrew> keystrokes. Or the keyboard interrupt handler. Or the
    Andrew> telnet packets (if it's from a remote login). I think
    Andrew> there's utilities that do all of these.
     
     Like another poster stated. Just use strings to read the core
     file. Also some users leave their umask at 022. So any core files
     would be world readable. Thus any user on the machine could steal
     their password from it. (ofc It would take root or the owner to
     cause a core dump). And many users don't realize that core files
     exist and don't delete them.

     (This is from my experience with a university Unix system)

     a possible solution to the original problem is 
     ulimit -c 0 in /etc/profile
     or the equivilant in csh.

    Andrew> Andrew


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

Date: 17 Jun 1999 14:35:22 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: Bit Twiddling Troubles
Message-Id: <7kb13a$6d1$7@info2.uah.edu>

In article <37684A70.937EF529@amdahl.com>,
	Hal Mounce <whm10@amdahl.com> writes:
: It sure was easier to do this stuff in assembler.

You sick, sick boy. :-)

Greg
-- 
The circle algorithm was invented by mistake when I tried to save one
register in a display hack! 
    -- Minsky


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

Date: Thu, 17 Jun 1999 08:55:03 -0500
From: James Ludlow <ludlow@us.ibm.com>
Subject: Re: Getting the current directory path/name
Message-Id: <3768FE37.36605CD7@us.ibm.com>

libbe@my-deja.com wrote:

> How can I get the current working directory path and/or name, like "pwd"
> in Unix and "cd" without parameters in DOS? I know about chdir(),
> opendir() and all those, but I haven't found anything like "getdir()" or
> anything...

#!/usr/bin/perl -w
use strict;
use Cwd;

print cwd();

-- 
James Ludlow (ludlow@us.ibm.com)
(Any opinions expressed are my own, not necessarily those of IBM)


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

Date: Thu, 17 Jun 1999 13:28:48 GMT
From: Dick Latshaw <latsharj@my-deja.com>
Subject: Re: Getting the current directory path/name
Message-Id: <7kat64$is8$1@nnrp1.deja.com>

In article <7kabtb$dm4$1@nnrp1.deja.com>,
  libbe@my-deja.com wrote:

> How can I get the current working directory path and/or name,

Well, let's see what we can find:

userdc:rlatshaw /e/perl/html/lib/pod
$tcgrep -ni 'current working directory' *
perlmodlib.html:47024:get pathname of current working directory
perltoc.html:65133:		<LI><A
HREF="#Cwd_getcwd_get_pathname_of_cu">Cwd, getcwd - get pathname of
current working directory</A></LI>
perltoc.html:68078:<H2><A NAME="Cwd_getcwd_get_pathname_of_cu">Cwd,
getcwd - get pathname of current working directory</A></H2>
perlxstut.html:78190:directory exists in the current working directory.
Several files will be
perlxstut.html:78454:for ``build library'') in the current working
directory. This directory

Looks to me like you want getcwd.


> Well, thanks in advance

You're welcome.
--
Regards,
Dick


Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.


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

Date: 17 Jun 1999 15:26:07 GMT
From: Dan Sugalski <sugalskd@netserve.ous.edu>
Subject: Re: help using large memory from perl
Message-Id: <7kb42f$76f$1@news.NERO.NET>

perrin@primenet.com wrote:

: After digging into this some more, I think I've narrowed it down to a
: bug in sbrk() when used with the linux 2.2.x kernel.  I tried a simple C
: program that attempts to allocate RAM using sbrk().  It dies at ~560MB,
: just like my program.  I ran this on a machine with only 128MB of RAM
: and it died at 940MB (more than the machine actually had).

Ah, I see. OS issues are such fun... :-)

: Anyone know if it's possible for Perl to use malloc() instead of
: sbrk()?  Malloc() doesn't have this problem.

Perl uses sbrk if it allocates memory with the internal memory management
system. If you build with mymalloc set to N (or use system malloc, or
whatever the option is in configure) perl will use malloc instead.

Alternately, I suppose you could see about getting a fixed version of the
linux kernel, but that might take more work.

					Dan


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

Date: Thu, 17 Jun 1999 10:57:28 -0400
From: Christian Vo <chrisvo@on.bell.ca>
Subject: How to do binary number calculations?
Message-Id: <37690CD8.C45EC66E@on.bell.ca>

Can anyone point me to the appropriate module/documentation
on how to do binary calculations in PERL ?

All I want to do is take to integers, convert them to binary and do an
AND...

I can convert from decimal to binary, I don't know how to do the AND...


Thanks in advance,

Chris Vo
<chrisvo@on.bell.ca>



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

Date: 17 Jun 1999 15:13:56 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: How to do binary number calculations?
Message-Id: <7kb3bk$7dh$4@info2.uah.edu>

In article <37690CD8.C45EC66E@on.bell.ca>,
	Christian Vo <chrisvo@on.bell.ca> writes:
: Can anyone point me to the appropriate module/documentation
: on how to do binary calculations in PERL ?

No need.  The hardware's (probably) already doing arithmetic in
binary.

: All I want to do is take to integers, convert them to binary and do an
: AND...

By the time you've read in the integers, they've been converted to
binary for you.

: I can convert from decimal to binary,

You don't need to.

: I don't know how to do the AND...

Search for AND in the perlop manpage.

Greg
-- 
Sam:  What'd you like, Normie? 
Norm: A reason to live. Gimmie another beer. 


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

Date: Thu, 17 Jun 1999 15:53:01 GMT
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Inclusive Split
Message-Id: <7kb5jj$io4$1@monet.op.net>

In article <Pine.GSO.4.02A.9906161929210.26850-100000@user1.teleport.com>,
Tom Phoenix  <rootbeer@redcat.com> wrote:
>    while ($item_string =~ 
>	m{
>	    \G		# From where we left off, find...

\G is superfluous there; it will match starting at the place it left
off last time whether or not you put in \G.  \G is for when you have
two regexes and you want the *second* one to start looking at the
place where the *first* one left off.


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

Date: 17 Jun 1999 14:28:03 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: IO::Pipe question...
Message-Id: <7kb0lj$b0r$1@pegasus.csx.cam.ac.uk>

Ronald J Kimball <rjk@linguist.dartmouth.edu> wrote:
>Chris Ice <chris.ice@cisco.com> wrote:
>
>> 2) How can I tell that the piped command is STILL there?  Say for some
>> reason piped command dies (drops core, etc)...how can I test to ensure
>> it's still a valid handle to read from?
>
>If that happens, your code should get a SIGPIPE next time it tries to
>use the handle, so you could set up a handler for that signal.

That's what happens on *writing* to a pipe when the other end has gone.

But he was asking about reading.   Then you just get an EOF.   You'll
have to check the return from close() to see if the EOF was because of
an error.


Mike Guy


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

Date: 17 Jun 1999 08:38:56 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Is it better perl than awk ?
Message-Id: <37690880@cs.colorado.edu>

     [courtesy cc of this posting mailed to cited author]

In comp.lang.perl.misc, bart.lateur@skynet.be (Bart Lateur) writes:
:Rubbish. I use GNU Perl for MS-DOS, under Win3.1, all the time.

    % man perlfaq1
	.
	.
	.
      While the GNU project includes Perl in its distributions, there's
      no such thing as "GNU Perl".  Perl is not produced nor maintained
      by the Free Software Foundation.  Perl's licensing terms are also
      more open than GNU software's tend to be.

Don't get me started on why it's better for Perl to be free software
than for it to be GNU (= =non-free) software.

--tom
-- 
    "Since when did you hear people talk about writing LISP or BASIC *scripts*?
     JCL and shell make command *scripts*; perl and LISP make *programs*."  --me


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

Date: 17 Jun 1999 14:57:12 GMT
From: kasal@matsrv.math.cas.cz (Stepan Kasal)
Subject: Re: Is it better perl than awk ?
Message-Id: <slrn7mi368.dds.kasal@matsrv.math.cas.cz>

> > Stepan Kasal <kasal@matsrv.math.cas.cz> writes:
> >  I have to admit that I don't know perl.  Stepan

On 16 Jun 1999 15:12:26 -0400, Uri Guttman <uri@sysarch.com> wrote:
> that admission makes you unqualified to compare awk and perl.

That's why I mentioned it.  But I can program in traditional languages
(C, Pascal) and I also can "make pipes" in shell scripts.  I have a
hypothesis that the second is still useful, though I'd have to be a perl
wizard to prove it (and I'd also have to be wizard in awk & comp.).

> ... the concept of using awk or sed to preprocess data for perl is
> ludicrous. perl can do anything those 2 can inside perl.

   Well, in old times there were an advice to Unix newcomers, I think:
you may write something quickly and uneffectively using shell scripts
and the tools like awk, and then write it in C.
   In these days there is definitely no need to use C (or whatever
compiled language) just because "a real programmer language is needed".
You may _program_ it in perl.
   But I feel there are situations which desire (at least for my type
of thinking) using the Unix model of piping simple tools together.
Eg. when I have an amount of text data and I need to catch all the
exceptions in them as I write the script.  I usually process the data
by another sed/awk in the pipe, grep the result for unwanted things and
so on.  Such a script is completely unefficient but may be efficiently
developed.  I may imagine that I use 1-3 line program in perl in my pipe
(if I knew perl more).

   When you write a non-trivial program in a programming language (eg.
perl) the way of thinking mentioned above is impossible, you simply
_program_.  And in that case is sed/awk preprocessing ridiculous, as
perl has enough regex ability (even more then awk and sed together, I think).

Sorry for wasting the bandwidth.
						  Stepan


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

Date: Thu, 17 Jun 1999 10:13:22 -0400
From: dwilgaREMOVE@mtholyoke.edu (Dan Wilga)
Subject: Re: LD_LIBRARY_PATH setting within the perl program
Message-Id: <dwilgaREMOVE-1706991013220001@wilga.mtholyoke.edu>

In article <376810F0.106ED28E@usa.net>, murali <myparu@usa.net> wrote:

> Hello,
> I am trying to use Sybase::DBlib from a script. it works fine when I run
> it, gets data and shows, but when I run it as a cgi, it complains abt
> unable to load some library. I added /opt/sybase/lib to the
> LD_LIBRARY_PATH in the %ENV from the program but that didnt work.  what
> else can I do?
> tia,
> murali

Add this somewhere in your Perl code:

BEGIN {
        $ENV{LD_LIBRARY_PATH}='/opt/sybase/lib';
}

That way, the var gets set as the very first thing, before anything else
gets executed.

If that doesn't work, write a shell (csh, bash, or whatever you use)
script to set the variable first and then call your Perl script.

Dan Wilga          dwilgaREMOVE@mtholyoke.edu
** Remove the REMOVE in my address address to reply reply  **


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

Date: Thu, 17 Jun 1999 08:01:48 -0700
From: "Champneys" <mattc@terragon.com>
Subject: Opening files across the web?
Message-Id: <7kb2ao$rp9@enews3.newsguy.com>

I'm somewhat of a novice so I hope this doesn't sound too stupid.

I'm trying to write a small PERL program that will take a URL for input and
then open the html page at the URL across the web for some analysis.  I have
no clue how to access a web page in this way.  Is there a tutorial somewhere
how to do this sort of thing?  Some subroutines, or perhaps a book that
someone might recommend to learn how to do this?

Thanks!

Matt




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

Date: 17 Jun 1999 14:32:21 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: pattern matching question
Message-Id: <7kb0tl$6d1$6@info2.uah.edu>

In article <slrn7mgj4v.ejb.abigail@alexandra.delanet.com>,
	abigail@delanet.com (Abigail) writes:
: Of course, the regex only works for certain classes of URLs, and it might
: be hopelessly wrong for certain relative URLs.

That's why I said I'd use the module. :-)

Greg
-- 
Words are the most powerful drug used by mankind. 
    -- Rudyard Kipling


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

Date: Thu, 17 Jun 1999 10:33:12 -0400
From: Craig Ciquera <craig@mathworks.com>
Subject: Re: pattern matching question
Message-Id: <37690728.446B6042@mathworks.com>

Ditto.

Craig

Greg Bacon wrote:

> In article <slrn7mgj4v.ejb.abigail@alexandra.delanet.com>,
>         abigail@delanet.com (Abigail) writes:
> : Of course, the regex only works for certain classes of URLs, and it might
> : be hopelessly wrong for certain relative URLs.
>
> That's why I said I'd use the module. :-)
>
> Greg
> --
> Words are the most powerful drug used by mankind.
>     -- Rudyard Kipling



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

Date: Thu, 17 Jun 1999 10:18:18 -0400
From: Deamon George Scapin <dscapin@harris.com>
Subject: Re: pattern matching question
Message-Id: <376903AA.4E8CC2EF@harris.com>

Thanks for the info, that's easy enough.  That gave me what I wanted.

Craig Ciquera wrote:

> my $url = new URI::URL
> 'http://www.someplace.com/dir1/dir2/dir3/picture.jpg';
> my $path = $url->path;
>
> print $path . "\n";
>





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

Date: Thu, 17 Jun 1999 23:41:48 +0800
From: John Fung <microfhy@netvigator.com>
Subject: Perl Script Question
Message-Id: <3769173C.604E734D@netvigator.com>

Perl Script Question

Dear Sir,

        I would to have a perl script that when I input
        my name : JJ and age : 19, then
        click "Send", it will display in another page :
        Your Name is JJ
        Your age is 19

        Please help me and reply !!
        Thank you very much for your help !!
-- 
                                              Yours sincerely,

                                                         John Fung


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

Date: Thu, 17 Jun 1999 23:42:29 +0800
From: John Fung <microfhy@netvigator.com>
Subject: Perl Script Question
Message-Id: <37691765.768E64F9@netvigator.com>

Perl Script Question

Dear Sir,

        I would to have a perl script that when I input
        my name : JJ and age : 19, then
        click "Send", it will display in another page :
        Your Name is JJ
        Your age is 19

        Please help me and reply !!
        Thank you very much for your help !!
-- 
                                              Yours sincerely,

                                                         John Fung


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

Date: Thu, 17 Jun 1999 06:14:29 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Perl training on east coast
Message-Id: <5qhak7.0vi.ln@magna.metronet.com>

jkeys (jkeys@pobox.upenn.edu) wrote:

: Anyone familiar with traiing offered in the Philadelphia, New Jersey or
: New York area?


   Yet Another Perl Conference (YAPC) will be held in Pittsburgh
   next week.

   Very cheap...


      http://www.cs.cmu.edu/~lenzo/yapc/


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


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

Date: 17 Jun 1999 14:58:35 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: Rank HoH by sub-sub-key?
Message-Id: <7kb2er$7dh$1@info2.uah.edu>

In article <3768A1AB.59209239@geocities.com>,
	"Bjvrn Svensson" <bjornsvensson@geocities.com> writes:
: How do I add a ranking to each variable?  So that I end up with
: something more like:
: %stats = (
:     "01" => { variable_1  => "1000",    rank_1 => '1'
:               variable_2  => "44000",   rank_2 =>     '3'
:               variable_3  => "2",  },   rank_3 => '1'
:     "02" => { variable_1  => "2000",    rank_1 =>   '2'
:               variable_2  => "33000",   rank_2 =>   '2'
:               variable_3  => "2", },    rank_3 => '1'
:     "03" => { variable_1  => "2500",    rank_1 => '1'
:               variable_2  => "22000",   rank_2 => '1'
:               variable_3  => "10", },   rank_3 =>     '3' );

    sub varcmp { $stats{$a}{"variable_$_"} <=> $stats{$b}{"variable_$_"} }

    for (1 .. 3) { 
        my $i = 1;
        my @order = sort varcmp keys %stats;
        my $n = @order;

        my $key  = shift @order;
        my $last = $stats{$key}{"variable_$_"};

        $stats{$key}{"rank_$_"} = $i;

        while (@order) {
            $key = shift @order;

            # keep track of ties :-(
            if ($stats{$key}{"variable_$_"} == $last) {
                $stats{$key}{"rank_$_"} = $i;
                next;
            }

            $i = $n - @order;
            $stats{$key}{"rank_$_"} = $i++;
        }
    }

: Or is there any alternative way of later being able to say:
: 1) County "02" has a variable_2 value of 33000 which is ranked 2
: (second highest)?

    if ($stats{"02"}{rank_2} == 2) { ... }

: 2) Top 10 variable_1

    my @top10 = grep { $stats{$_}{rank_1} <= 10 } keys %stats;

Enjoy,
Greg
-- 
UNIX should be used as an adjective.
    -- AT&T


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

Date: Thu, 17 Jun 1999 07:50:38 -0700
From: moseley@best.com (Bill)
Subject: Re: Real perl Y2K bug!
Message-Id: <MPG.11d2ab14f5cb95698974a@206.184.139.132>

In article <slrn7mh3sg.ejb.abigail@alexandra.delanet.com>, 
abigail@delanet.com says...
> Bill (moseley@best.com) wrote on MMCXV September MCMXCIII in
> <URL:news:MPG.11d1d9144861ba5b989749@206.184.139.132>:
> == Ok, that subject is a dirty trick.
> 
> 
> *plonk*

Oh, finally.  And I thought it would be more work than that.



-- 
Bill Moseley mailto:moseley@best.com


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

Date: Thu, 17 Jun 1999 15:22:52 GMT
From: Gareth Rees <garethr@cre.canon.co.uk>
Subject: Re: Regular expresions as parameters
Message-Id: <siogie26nn.fsf@cre.canon.co.uk>

Derek Lavine <derek@realware.com.au> wrote:
> I would like to say this:
> 
> %data_hash = ( date_opened => $date_opened, ... );
> %reg_hash  = ( date_opened => "s/(\w*) (.*)/$1/g", ... );
> %new_data_hash  = myfunc( \%data_hash, \%reg_hash );

Don't represent your operation as a string, represent it as a sub (this
means you can use operations other than regexp search-and-replace):

    # apply_operations(\%operations, \%data) destructively modifies the
    # values in %data by applying the corresponding operation in
    # %operations to the value for each key.  If you want a copy of the
    # data, copy it before calling `apply_operations'.  It doesn't check
    # that an operation exists before trying to call it.

    sub apply_operations {
      my ($ops,$data) = @_;
      for my $key (keys %$data) {
        $ops->{$key}->() for $data->{$key};
      }
    }

    use Data::Dumper;
    %data =       ( date_opened => "1999-01-01 10:15:00", );
    %operations = ( date_opened => sub { s/(\w*) (.*)/$1/g }, );
    apply_operations(\%operations, \%data);
    print Dumper(\%data);

Some other points:

 1. The operation s/(\w*) (.*)/$1/g does the same thing as s/ .*//g,
    which is the same as s/ .*// if the string has no newlines in it.
    This may not be exactly what you meant.

 2. There's no need to put capturing parentheses () in a regular
    expression unless you intend to use the captured string later.
    Leave them out if you can or use non-capturing parentheses (?:) if
    you can't (see the perlre manpage).

 3. There's no need for the `_hash' in `%foo_hash'.  The type marker %
    is sufficient to tell your readers that it's a hash.

-- 
Gareth Rees


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

Date: Thu, 17 Jun 1999 11:28:28 -0400
From: kpreid@ibm.net (Kevin Reid)
Subject: Re: shortest self printing perl program
Message-Id: <1dt9aef.o4q11111fhan6N@[192.168.0.1]>

Abigail <abigail@delanet.com> wrote:

> Kiriakos Georgiou (kgnews@olympiakos.com) wrote on MMCX September
> MCMXCIII in <URL:news:87iu8vd1no.fsf@gate7.olympiakos.com>:
>
> {} OK, since I am in quiz mode today, can someone come up
> {} with a shorter program that prints itself without opening
> {} any files, spawning processes etc. than this one-liner:
>
> The empty program will. And you cannot beat 0 bytes.

Isn't that a rather degenerate case?

-- 
 Kevin Reid: |    Macintosh:      
  "I'm me."  | Think different.
    


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

Date: Thu, 17 Jun 1999 14:45:17 GMT
From: ijg@csc.liv.ac.uk (I.J. Garlick)
Subject: Signature removal regex?
Message-Id: <FDH7nH.CD0@csc.liv.ac.uk>

Hi, can anyone spot what I missed in the following?

I need to remove the signature from a mail message but only the last one.

Before I receive responses telling me it's impossible I am only trying to
remove signatures that are in the following form

-- \r?\n
Whoever\r?\n
etc....\r?\n

I have put the \r?\n in by hand to show what is potentially there, you
obviously don't see them normally just the effect they have.

I came up with this

	$q->param('sig',1) if ($msg =~ s/-- \r?\n.*?$//s);

but that would find the first occurence of any signature even one in the
replied part of a message not just the one at the very end (if there is
one at all). I even tried replacing .*? with $sig where $sig is the known
value of the signature I am looking to remove but I have a feeling that
there are \r in the mail message that are not in the $sig value. Scrub
that, I know there are \r values in the rest of the sig from the mail
message as I checked, when I tried to put \r in equivalent places in $sig,
I got into a hell of a mess and had to give up.

Anyway, to cut a long story short I eventually got to this

	my @xxx = split /-- \r?\n/, $msg;
	pop @xxx and $q->param('sig',1) if @xxx > 1;
	$msg = join "-- \n", @xxx;

Which does just about all I want, but it's not perfect as it can fail in
certain situations.

Still I can't help feeling it's possible with a regex, and I just don't
know enough.

Maybe the split, pop, join method is the best/fastest, I don't know and
since I don't have the regex anyway I can't benchmark them.

So any of you good hearted regex guru's care to lend a hand?

TIA.

-- 
Ian J. Garlick
ijg@csc.liv.ac.uk

The Roman Rule
        The one who says it cannot be done should never interrupt the
        one who is doing it.



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

Date: 17 Jun 1999 15:10:05 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: Signature removal regex?
Message-Id: <7kb34d$7dh$3@info2.uah.edu>

In article <FDH7nH.CD0@csc.liv.ac.uk>,
	ijg@csc.liv.ac.uk (I.J. Garlick) writes:
: I need to remove the signature from a mail message but only the last one.

I do this in News::Scan:

    ## signature (if present)
    my @body = @{ $self->body };
    my $sig_start = 0;
    my $found_sig = 0;
    foreach $line (reverse @body) {
        $sig_start--;

        if ($line =~ /^-- $/) {
            $found_sig++;
            last;
        }
    }

    if ($found_sig) {
        my @signature = splice @body, $sig_start;
        shift @signature;  # toss cutline
    }

Greg
-- 
Definition of a Jury: Twelve persons chosen to decide who has the better
lawyer. 
    -- Robert Frost 


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

Date: 17 Jun 1999 15:06:54 GMT
From: Eire Elliot <revjack@radix.net>
Subject: Re: this  charecter @ ruined my day!!
Message-Id: <7kb2ue$rjr$1@news1.Radix.Net>
Keywords: Hexapodia as the key insight

zenin@bawdycaste.org explains it all:
:Lucifer Bonaventure <revjack@radix.net> wrote:
:: Tom Christiansen explains it all:
:: 
:: :Give up now.   If you can't get at your own errors, there's really 
:: :very little hope.
:: 
:: Lack of access to logs (of any kind) is more widespread than one might
:: think, especially with the popularity of those quickie we-host-4-U web
:: hosting companies. Anticipate more and more of these pleas.

:	#!/usr/local/bin/perl -w
:	use strict;
:	use CGI::Carp qw(fatalsToBrowser);

Let's try that on one of my current clients:

  #!/usr/local/bin/perl -w
  use strict;
  use CGI::Carp qw(fatalsToBrowser);
  print "Content-type: text/plain\n\n";
  print "Success!";


Results:

  Internal Server Error
  etc etc

Hey, this works on *my* machine! Hmm, what could be the problem?

  #!/usr/local/bin/perl -w
  print "Content-type: text/plain\n\n";
  for(@INC){print "$_\n"};


Results:

  /usr/contrib/lib/perl
  .

And what's in /usr/contrib/lib/perl?

  #!/usr/local/bin/perl -w
  print "Content-type: text/plain\n\n";
  print `ls /usr/contrib/lib/perl`;     # Please let's not digress to
                                        # arguing about using backticks

Result:

  [Document contains no data]


There don't seem to be any modules available to perl on this server - at
least, not that the CGI user can see. Am I missing something? 

:: But they're there, and there are lots of them, and there are likely to be
:: more.

:	And no one here is required to support them and very few would
:	likely even be inclined too.

No one here is required to to anything at all. Ain't it great?

If you ever get any requests for this sort of thing, feel free to steer
them my way. :)

:	This:
:		Edit->FTP->Reload->Guess at reason for error->Edit->FTP...

:	Is no way for anyone to code, much less someone doing it for pay as
:	you're at least wasting your time and likely your client's as well.

Of course. I'm not suggesting otherwise. I'm suggesting that
sometimes you have to:

  Edit
   |
  FTP
   |
 Reload
   |
 Read the informative error code from the error-handling subroutine that
 you wrote
   |
 Repeat till it's right


Also:

Suppose the application talks to Oracle, or pipes
to sendmail. How to replicate that on my Win3.1 box?


PREBUTTAL:

I'm not arguing against local development! That is in fact how I do it,
when I can. 

I'm saying that sometimes you can't develop locally, but you *can* still
develop, debug, etc. remotely.


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

Date: Thu, 17 Jun 1999 13:32:25 GMT
From: sherifhanna@my-deja.com
Subject: URGENT--pppd and chat
Message-Id: <7katd9$iv0$1@nnrp1.deja.com>

I wrote a Perl script that brings up multiple ppp sessions
consequtively or at once. From the script, I issue a pppd command that
looks like this:
pppd /dev/ttyDx lock modem nodefaultip.....connect "chat -v -
f '/etc/ppp/ppp.chatscript'"

The problem is that this command is issued many many times...in a loop
basically (this is my intention...). Some calls are not successful and
that's fine, but numerous instances of pppd and chat continue to run,
even after the phones hang up. Also, before restarting the cycle of
issuing pppd commands, I use the ppp-off script to make sure that no
connections are up.

I'm wondering how this could be resolved. My memory gets eaten up
quickly, and the system eventually falls into segmentation fault, and
crashes. I need to be able to leave this script running, unattended,
over a weekend, if I wanted to!

Thanks,
Sherif


Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.


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

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

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