[22939] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 5159 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jul 1 00:05:34 2003

Date: Mon, 30 Jun 2003 21:05:07 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Mon, 30 Jun 2003     Volume: 10 Number: 5159

Today's topics:
    Re: detect non-existent hash entries w/function? <jkeen@concentric.net>
        doing 'ref' on blessed reference <woland99@earthlink.net>
    Re: doing 'ref' on blessed reference <bwalton@rochester.rr.com>
    Re: doing 'ref' on blessed reference (Jay Tilton)
    Re: file name of file that reference to type glob point (Tad McClellan)
    Re: file name of file that reference to type glob point <coo_t2-NO-LIKE-SPAM@yahoo.com>
    Re: file name of file that reference to type glob point <coo_t2-NO-LIKE-SPAM@yahoo.com>
        File::Find Problems with ntfs compressed folders <john.armsby@mindspring.com>
    Re: How would you mail yourself from XP <wsegrave@mindspring.com>
    Re: letters in a scalar to array (Tad McClellan)
    Re: letters in a scalar to array <mgjv@tradingpost.com.au>
        multiline thingy in hash makes it single line item ? (Asim Suter)
    Re: multiline thingy in hash makes it single line item  <mgjv@tradingpost.com.au>
        need a cheap JOIN on 3 large tables under Win32 <woland99@earthlink.net>
    Re: need a cheap JOIN on 3 large tables under Win32 <ben.goldberg@hotpop.com>
    Re: need a cheap JOIN on 3 large tables under Win32 <woland99@earthlink.net>
    Re: newbie needs to globally edit his site (Tad McClellan)
    Re: searching or running message (Tad McClellan)
    Re: searching or running message <asu1@c-o-r-n-e-l-l.edu>
    Re: select and vec <ben.goldberg@hotpop.com>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

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

Date: 01 Jul 2003 02:35:26 GMT
From: "James E Keenan" <jkeen@concentric.net>
Subject: Re: detect non-existent hash entries w/function?
Message-Id: <bdqs1e$2cj@dispatch.concentric.net>


"Daniel Friedman" <danielf@erols.com> wrote in message
news:68cdce23.0306301703.24297b24@posting.google.com...
> I'm trying to figure out how to to detect non-existent hash entries
> via a function, something of this general nature:
>
>
> function hashexists($$) {

Can you tell us why you are prototyping this function ...

> # first arg might have to be non-scalar to get this to work,
> # that would be OK, too

 ... and then undermining your argument in the next line?

> my var1 = $_[0]; # maybe a scalar, maybe not
> my $err_hint = $_[1];
>
> if (exists <something here related to var1>) {
>   # If I can get this function to work, maybe I'll redefine
>   # it to provide the value of the specified hash,
>   # or die otherwise; for now, let's just...
>   return(1);
> } else {
>   die "<something [else?] related to var1> doesn't exist; (hint:
> $err_hint)"
>   return(0);
> }
> I haven't been able to do this sort of thing
> with "use strict", which I regard as a must;
> Any thoughts on how to achieve this?

use strict;
use warnings;
use Data::Dumper;

my @testing = qw|alpha gomez helter icicle|;
my %data = (alpha => 'beta', helter => 'skelter');
my $nonexist = testentry(\@testing, \%data);

print Dumper($nonexist);

sub testentry {
 my ($aref, $href) = @_;
 my (@nonex);
 foreach (@{$aref}) {
  push @nonex, $_ unless exists ${$href}{$_};
 }
 return \@nonex;
}





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

Date: Tue, 01 Jul 2003 02:01:48 GMT
From: JT <woland99@earthlink.net>
Subject: doing 'ref' on blessed reference
Message-Id: <3F019435.50308@earthlink.net>

If we do 'ref' on blessed reference it return string that is the name of 
the class
but how can I know if this was a hash, array or sth else? Is there a way to
return ARRAY, HASH or SCALAR for blessed reference?

Thanks,

JT



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

Date: Tue, 01 Jul 2003 03:21:22 GMT
From: Bob Walton <bwalton@rochester.rr.com>
Subject: Re: doing 'ref' on blessed reference
Message-Id: <3F00FE2D.9030600@rochester.rr.com>

JT wrote:

> If we do 'ref' on blessed reference it return string that is the name of 
> the class
> but how can I know if this was a hash, array or sth else? Is there a way to
> return ARRAY, HASH or SCALAR for blessed reference?
 ...
> JT
> 

You should use UNIVERSAL::isa on your reference.  See:

    perldoc -f ref

and

    perldoc UNIVERSAL

for additional information.

-- 
Bob Walton



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

Date: Tue, 01 Jul 2003 03:48:14 GMT
From: tiltonj@erols.com (Jay Tilton)
Subject: Re: doing 'ref' on blessed reference
Message-Id: <3f010284.790177351@news.erols.com>

JT <woland99@earthlink.net> wrote:

: If we do 'ref' on blessed reference it return string that is the name of 
: the class

You may find Scalar::Util::blessed() more useful for that.

: but how can I know if this was a hash, array or sth else? Is there a way to
: return ARRAY, HASH or SCALAR for blessed reference?

Scalar::Util::reftype() is just the thing.

    use Scalar::Util qw(reftype);
    print "object is a ", reftype($obj), " reference";



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

Date: Mon, 30 Jun 2003 19:45:10 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: file name of file that reference to type glob points to
Message-Id: <slrnbg1mcm.4hb.tadmc@magna.augustmail.com>

ed <coo_t2-NO-LIKE-SPAM@yahoo.com> wrote:

> I want to get the full path to a file that is pointed to from a
> reference to a type glob.  


Why do you want to get the full path to a file that is pointed to from a
reference to a type glob?


> open(FH, '<', './testees/noname4.html')


> sub doSomething
> {   my $FH = shift;
>     # I need the name of the file that 
>     # $FH points to, to do something!


What "name" should it use when the FH is not associated with any file?

eg:   

   open FH, 'ls|' ...
      
What "name" should it use when there is MORE than one name associated
with the file?

There is not a one-to-one relationship between filehandle and filename,
there may not even _be_ any filename.


> But now I'm just curious of how this could be done.


I'm just curious of why you think that this would be useful.


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


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

Date: Tue, 01 Jul 2003 03:42:52 GMT
From: ed <coo_t2-NO-LIKE-SPAM@yahoo.com>
Subject: Re: file name of file that reference to type glob points to
Message-Id: <a902gvcqpc94lqlcgkapm9oel3b9bff88q@4ax.com>

On Tue, 01 Jul 2003 00:40:15 GMT, "John W. Krahn" <krahnj@acm.org>
wrote:

>
>Why not just pass the file name to the sub and open it in the sub?
>

Well I'm creating a class where one of the arguments to the
constructor 
can either be the path to the file to open, or an open filehandle.
Since more than one object is likely to work with the file I thought 
it would be more efficient to have the option of passing the
filehandle 
around instead of having each object manually open/close the file.

The reason I need the path is not just to open the file, I need to use
the path to make some modifications to it, then do something with it.

I could make it so the first parameter is either undef or a
filehandle, then they could pass the path in the second argument.

I could offer two ways of creating the object:

method 1:

#this would open the file using $path
$obj = new Obj(undef, $path, 'param3');

method 2:

#this doesn't need to open the file, but it still gets the 
#path to the file it's working on from $path supplied in 
#the second argument
$obj = new Obj(\*FH, $path, 'param3');

So if the first argument is undefined I'll open the file using the
value 
supplied in the second argument, and then I also have the path to the 
stuff I need to do with it.

If the file's already opened they can send the filehandle instead of
an undefined 
value.

--ed


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

Date: Tue, 01 Jul 2003 03:56:43 GMT
From: ed <coo_t2-NO-LIKE-SPAM@yahoo.com>
Subject: Re: file name of file that reference to type glob points to
Message-Id: <mb02gvsvru6jreo9jqkrb7l88ij2jhhkja@4ax.com>

On Mon, 30 Jun 2003 19:45:10 -0500, tadmc@augustmail.com (Tad
McClellan) wrote:

>
>Why do you want to get the full path to a file that is pointed to from a
>reference to a type glob?
>

I just posted trying to explain it. 


>
>What "name" should it use when the FH is not associated with any file?
>
>eg:   
>
>   open FH, 'ls|' ...
>      
In the context of my object the files will always be text/* type
files. Primarily Html.  So the person using the object should only 
pass a filehandle that points to an appropriate type of file.  

But I get your point that filehandles can point to things that aren't
really files.  So I guess because of that it probably wouldn't make
much sense for the language to provide a way to get the file name when
there doesn't necessarily have to be a name associated with it.

I think I should be ok though using the method I described in my last
post.  
If you see any flaws in the method I described in my last post, please
let me know. 

thanks,
--ed




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

Date: Mon, 30 Jun 2003 21:43:53 +0100
From: "John Armsby" <john.armsby@mindspring.com>
Subject: File::Find Problems with ntfs compressed folders
Message-Id: <bdqonu$70d$1@slb9.atl.mindspring.net>

My apologies if this has already been posted....  Just point where...

I am using the following script to get file path, filename, and
timestamp.  Worked fine until the NT guys started compressing folders.
I can point the script explicitly at a compressed folder and it will
recurse down.  Unfortunately it does not seem to "see" compressed
folders by default and then recurse down.

Is there an update to this somewhere??

#!c:\perl\bin\perl -w

# power.pl uses the arc server name and returns the full path and file
name
# along with the timestamp of the file......

use File::Find;

# find \&Getit , 'develop/';
# find \&Getit , 'j:/depts/wspproje/projectd/library/';
# find \&Getit , '\\\HDQ_Doc1/Vol1/depts/wsp projects/project
documents/library';
find \&Getit , '\\\myServer.domain.com/PowerServer/';

sub Getit
{
if ( -f && (@FileStat = stat) )
  {
   $FileName =$File::Find::name;
   $FileTime = $FileStat[9];
   $LocalFileTime =localtime($FileTime);
   $FileName =~s|/|\\|g; # added to replace foreward slashes with
back slashes... 4/26/00
$FileName =~s|\\\\10\.228\.128\.11||g;
$FileName =~s|\\PowerServer|PowerServer|g;
   print("\n$FileName|$LocalFileTime");

  }
}

John




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

Date: Mon, 30 Jun 2003 22:44:54 -0500
From: "William Alexander Segraves" <wsegrave@mindspring.com>
Subject: Re: How would you mail yourself from XP
Message-Id: <bdr0bo$ii7$1@slb3.atl.mindspring.net>

"zoo" <mee@home.com> wrote in message
news:bdqas2$845$1@sun-news.laserlink.net...
> I use this piece of code to mail myself but my operating system can't find
> the mail command.
> How would I make this command work with windows XP ?
>

You can't. WNU (Win's Not Unix) doesn't have a mail command, as you
discovered. Of course, you could (possibly someday) write your own mail
client, but ... Why reinvent the wheel?

> open MAIL, "|mail zoo@/hotmail.com";
>  print MAIL "bad news: $somename guessed $someguess\n";
>  close MAIL;
>
>
> 'mail' is not recognized as an internal or external command,
> operable program or batch file.

Hmm. You appear to be stuck on page 21 of _Learning Perl, 2nd edition_. Did
you by any chance note (see cover) that LP2e is for UNIX Programming?

Others have told you your problem is not a Perl problem. Please heed their
advice.

Now, let's make your problem a Perl problem. It appears you are using MS
Windows, perhaps XP. If so, you may be using ActiveState Perl or IndigoPerl.
If so, good!

Look at the documentation for the Perl module Mime::Lite. By following the
documentation,
you should be able to easily craft a Perl script that will work on your
Win32 system.

If your curiosity overwhelms you, look inside of Mime::Lite to see how it
sends mail for non-UNIX systems. Hint: Perl module Net::SMTP.

When you have a Perl problem, please read the posting guidelines, help
yourself as much as you can first, and return with a Perl question that's
not already answered in the documentation and other easily searchable
sources.

Cheers.

Bill Segraves




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

Date: Mon, 30 Jun 2003 19:37:51 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: letters in a scalar to array
Message-Id: <slrnbg1luv.4hb.tadmc@magna.augustmail.com>

Martien Verbruggen <mgjv@tradingpost.com.au> wrote:
> On Mon, 30 Jun 2003 23:27:37 GMT,
> 	John E <sheltonNOSPAM@onr.com> wrote:

>> $filename =~ s/.pl//;
> 
> What if the filename is "results.plot.pl"? It's probably safer to anchor
> the expression.
> 
> $filename = s/.pl$//;


What if the filename is "results.apl"? It's probably safer to
backslash the dot:

   $filename = s/\.pl$//;

<grin>


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


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

Date: 01 Jul 2003 02:51:16 GMT
From: Martien Verbruggen <mgjv@tradingpost.com.au>
Subject: Re: letters in a scalar to array
Message-Id: <slrnbg1tp6.3er.mgjv@verbruggen.comdyn.com.au>

On Mon, 30 Jun 2003 19:37:51 -0500,
	Tad McClellan <tadmc@augustmail.com> wrote:
> Martien Verbruggen <mgjv@tradingpost.com.au> wrote:
>> On Mon, 30 Jun 2003 23:27:37 GMT,
>> 	John E <sheltonNOSPAM@onr.com> wrote:
> 
>>> $filename =~ s/.pl//;
>> 
>> What if the filename is "results.plot.pl"? It's probably safer to anchor
>> the expression.
>> 
>> $filename = s/.pl$//;
> 
> 
> What if the filename is "results.apl"? It's probably safer to
> backslash the dot:
> 
>    $filename = s/\.pl$//;
> 
><grin>

Yeah.. :}

Also see my followup to myself.

I should just not quickly post before picking up the phone. Or
alternatively, I should learn to ignore ringing phones.


Martien
-- 
                        | 
Martien Verbruggen      | 
Trading Post Australia  | Hi, Dave here, what's the root password?
                        | 


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

Date: 30 Jun 2003 18:58:27 -0700
From: asimsuter@hotmail.com (Asim Suter)
Subject: multiline thingy in hash makes it single line item ?
Message-Id: <c26475c0.0306301758.622325fa@posting.google.com>

Greetings!

I read in a multiline variable from a file
setting $/ . I store the multiline variable in a hash.

I do a split on newline on the multiline thingy stored in hash 
and.......


The whole multiline thingy is one-line thingy now.. :(


Does storing a multiline thing in a hash make it one line ?

Can anyone syggest a workaround ?

Kindly Cc asimsuter@hotmail.com in your replies.

Thanks,
Asim

asimsuter@hotmail.com

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


Snippet of stuff I am doing:

$/ = "__END__" ;

my @lines = split /\n/ , $hash{$variable} ;


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

Date: 01 Jul 2003 03:13:57 GMT
From: Martien Verbruggen <mgjv@tradingpost.com.au>
Subject: Re: multiline thingy in hash makes it single line item ?
Message-Id: <slrnbg1v3n.3er.mgjv@verbruggen.comdyn.com.au>

On 30 Jun 2003 18:58:27 -0700,
	Asim Suter <asimsuter@hotmail.com> wrote:
> Greetings!
> 
> I read in a multiline variable from a file
> setting $/ . I store the multiline variable in a hash.
> 
> I do a split on newline on the multiline thingy stored in hash 
> and.......

Why? Why join it first and then split it?

> The whole multiline thingy is one-line thingy now.. :(
> 
> 
> Does storing a multiline thing in a hash make it one line ?
> 
> Can anyone syggest a workaround ?

I have no idea what you're asking, or what you're trying to achieve.

open(FH, "somefile") or die $!;

To read the contents of a file in an array, with each record (by
default each line) in an element:

my @lines = <FH>;

If you want to get rid of the line (record) endings at the same time:

chomp(my @lines = <FH>);

To read the content of a file into a single scalar

my $lines;
{
    local $/;
    $lines = <FH>;
}

> Kindly Cc asimsuter@hotmail.com in your replies.

Post here, read here.

> Snippet of stuff I am doing:
> 
> $/ = "__END__" ;
> 
> my @lines = split /\n/ , $hash{$variable} ;

Ok.... Now... Where is $hash{$variable} set? Where is $variable set?

If I liberally interpret that code (hard to tell what exactly you're
trying to do), I would probably guess that you're trying to do this:

open(FH, "somefile") or die $!;
my @lines;
while (<FH>)
{
    last if /^__END__$/;
    push @lines, $_;
}


Martien

PS. Please, for next time, try to organise your thoughts. 90% of good
programming is being able to express your problem and goal.
-- 
                        | 
Martien Verbruggen      | I'm just very selective about what I accept
Trading Post Australia  | as reality - Calvin
                        | 


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

Date: Tue, 01 Jul 2003 01:58:19 GMT
From: JT <woland99@earthlink.net>
Subject: need a cheap JOIN on 3 large tables under Win32
Message-Id: <3F019370.3020204@earthlink.net>

Howdy - I have three tab-delimited files that represent tables of
records with 3 to 20 fields in them. Files have between 3K and 30K lines.
I need to do JOIN operation on them with with all three tables.
The easiest solution would be not to import the data into any database.
I tried DBD::CSV driver but it is not able to handle the size of the data.
Is SQLite capable of doing such task?
If I have to involve database then the database of choice would be Lotus 
Approach. Can anybody point me to some examples how to connect to Approach,
(using Win32::OLE or sth else) create and manipulate data?

Thanks,

Tom

PS. 
now I know that it is easy to just create 4 hashes etc but for maintenence
purposeses my boss wants this thing to be capable to respond to SQL.



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

Date: Mon, 30 Jun 2003 23:17:09 -0400
From: Benjamin Goldberg <ben.goldberg@hotpop.com>
Subject: Re: need a cheap JOIN on 3 large tables under Win32
Message-Id: <3F00FD35.BC81DE9E@hotpop.com>



JT wrote:
> 
> Howdy - I have three tab-delimited files that represent tables of
> records with 3 to 20 fields in them. Files have between 3K and 30K
> lines. I need to do JOIN operation on them with with all three tables.
> The easiest solution would be not to import the data into any
> database.

Indeed -- the easiest solution would be to slurp the entire contents of
these files into memory, putting them in one big hash.  Assuming, of
course, that you've got enough memory for this.

> I tried DBD::CSV driver but it is not able to handle the size of the
> data.
> Is SQLite capable of doing such task?

Maybe, maybe not.  That's not a perl question, though.

Certainly, though, if SQLite is capable of doing it, then the perl
interface to the SQLite database library will be capable of doing it.

> If I have to involve database then the database of choice would be
> Lotus Approach. Can anybody point me to some examples how to connect
> to Approach, (using Win32::OLE or sth else) create and manipulate
> data?
> 
> Thanks,
> 
> Tom
> 
> PS.
> now I know that it is easy to just create 4 hashes etc but for
> maintenence purposeses my boss wants this thing to be capable to
> respond to SQL.

I would suggest you learn about the DBI.pm module.

-- 
$a=24;split//,240513;s/\B/ => /for@@=qw(ac ab bc ba cb ca
);{push(@b,$a),($a-=6)^=1 for 2..$a/6x--$|;print "$@[$a%6
]\n";((6<=($a-=6))?$a+=$_[$a%6]-$a%6:($a=pop @b))&&redo;}


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

Date: Tue, 01 Jul 2003 04:04:36 GMT
From: JT <woland99@earthlink.net>
Subject: Re: need a cheap JOIN on 3 large tables under Win32
Message-Id: <3F01B107.7020004@earthlink.net>



Benjamin Goldberg wrote:

>I would suggest you learn about the DBI.pm module.
>
>  
>
Well I was actually using it with DBD::CSV.

Cheers,

JT



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

Date: Mon, 30 Jun 2003 20:20:21 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: newbie needs to globally edit his site
Message-Id: <slrnbg1oel.4hb.tadmc@magna.augustmail.com>

leegold <leegold@mailandnews.com> wrote:

> But I really don't know the basics of
> running a PERL script on a host. 


You know how to run, but you don't know how to walk?

That's backwards. You should learn the command line _first_
and CGI second...

The name of the language is Perl, not PERL.


> Could someone link
> me to some real basic intro sites that might apply?


No, because it depends on what kind of access your particular
host makes available.

Ask them how you can get access to a command line on their machine.


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


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

Date: Mon, 30 Jun 2003 19:40:58 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: searching or running message
Message-Id: <slrnbg1m4q.4hb.tadmc@magna.augustmail.com>

Vikas <vvikas@cse.buffalo.edu> wrote:

> I was wondering as to how can I display some image or display some message
> on the page after form submission and then when the perl/cgi program runs


or a python/cgi program.

or a java/cgi program.

or...


> to completion, I refresh the page to display the output of that program,
> just like most flight search sites do?


You do not have a Perl question.

You have a question about WWW stuff.

There are newsgroups about WWW stuff, you will have better luck
getting answers to WWW questions there.


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


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

Date: 1 Jul 2003 01:29:18 GMT
From: "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
Subject: Re: searching or running message
Message-Id: <Xns93AADA983C202asu1cornelledu@132.236.56.8>

Vikas <vvikas@cse.buffalo.edu> wrote in
news:Pine.SOL.4.30.0306301920410.3027-100000@hadar.cse.Buffalo.EDU: 

> hi,
> 
> I was wondering as to how can I display some image or display some
> message on the page after form submission and then when the perl/cgi
> program runs to completion, I refresh the page to display the output
> of that program, just like most flight search sites do?

See

http://www.stonehenge.com/merlyn/LinuxMag/col39.html

and

http://www.stonehenge.com/merlyn/WebTechniques/col20.html

Sinan.

-- 
A. Sinan Unur
asu1@c-o-r-n-e-l-l.edu
Remove dashes for address
Spam bait: mailto:uce@ftc.gov


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

Date: Mon, 30 Jun 2003 22:23:31 -0400
From: Benjamin Goldberg <ben.goldberg@hotpop.com>
Subject: Re: select and vec
Message-Id: <3F00F0A3.BF6F6BBC@hotpop.com>



neptuna wrote:
> 
> I am  was reading through some docs on socket IO. It mentions using
> select() to test the readability of the socket. here is the code:
> -------------------
> $rin = '';  # initialize bitmask
> vec($rin, fileno(SOCKET), 1) = 1; # mark SOCKET in $rin
> # repeat calls to vec() for each socket to check
> $timeout = 10;
> $nfound = select($rout = $rin, undef, undef, $timeout);
> if (vec($rout, fileno(SOCKET),1)){
> # data to be read on SOCKET....
> -----------------------
> 
> I could not understand the Author's explanation and was hoping someone
> here could explain the vec() and select() in this code

Vec is used for constructing bit-vectors, and select takes three bit
vectors and a timeout as arguments.

The vec() stuff is equivilant to the C-level FD_SET macros that operate
on fd_set structs, which can then be passed into the C select() function

If you don't understand a word I just said :) then use the IO::Select
module, and don't worry about it, since it takes care of everything for
you.

-- 
$a=24;split//,240513;s/\B/ => /for@@=qw(ac ab bc ba cb ca
);{push(@b,$a),($a-=6)^=1 for 2..$a/6x--$|;print "$@[$a%6
]\n";((6<=($a-=6))?$a+=$_[$a%6]-$a%6:($a=pop @b))&&redo;}


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

Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>


Administrivia:

The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc.  For subscription or unsubscription requests, send
the single line:

	subscribe perl-users
or:
	unsubscribe perl-users

to almanac@ruby.oce.orst.edu.  

To submit articles to comp.lang.perl.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.

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 V10 Issue 5159
***************************************


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