[16073] in Perl-Users-Digest
Perl-Users Digest, Issue: 3485 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jun 26 18:15:46 2000
Date: Mon, 26 Jun 2000 15:15:33 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <962057732-v9-i3485@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 26 Jun 2000 Volume: 9 Number: 3485
Today's topics:
Re: Powerfull Regex <Jonathan.L.Ericson@jpl.nasa.gov>
question about stat <terrchen@americasm01.nt.com>
Re: question about stat newsposter@cthulhu.demon.nl
Re: question about stat <alager@csuchico.edu>
Read file after writing it? mwarne@my-deja.com
Re: Read file after writing it? <tina@streetmail.com>
regex - slurp file and extract email addresses <csorensen@uptimeresources.net>
Re: regex - slurp file and extract email addresses <thommy-p@bigfoot.com>
Re: regex - slurp file and extract email addresses (Abigail)
Re: regex - slurp file and extract email addresses <rootbeer@redcat.com>
Re: regex - slurp file and extract email addresses <csorensen@uptimeresources.net>
San Diego Perl Mongers and MP3.com (Garrett Casey)
Scheduled script <sinewave@lineone.net>
Re: Scheduled script <alager@csuchico.edu>
Re: Server push problem <gellyfish@gellyfish.com>
Re: single quote string question <tina@streetmail.com>
Re: single quote string question (Malcolm Dew-Jones)
Re: single quote string question <abe@ztreet.demon.nl>
Re: single quote string question (Tad McClellan)
Re: single quote string question (Abigail)
Re: split question (Clinton A. Pierce)
Re: Unable to access an array from within a class <scott.christensen@dot.state.wi.us>
Re: Unable to access an array from within a class (Randal L. Schwartz)
Re: unlink on NT (Arek P)
Web Hosting <sinewave@lineone.net>
What's the email string limit? yong321@yahoo.com
Re: What's the email string limit? (Randal L. Schwartz)
Re: Zlib.pm and perl2exe <gellyfish@gellyfish.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 26 Jun 2000 12:31:49 -0700
From: Jon Ericson <Jonathan.L.Ericson@jpl.nasa.gov>
Subject: Re: Powerfull Regex
Message-Id: <3957AFA5.56A76E07@jpl.nasa.gov>
Gabriel Euzet wrote:
>
> Keith Maggert <keith@biomail.ucsd.edu> a écrit dans le message :
> keith-2206000924090001@alexthinkpad.salk.edu...
> > In article <8itdm7$o5r$1@reader1.fr.uu.net>, "Gabriel Euzet"
> > <g.euzet@gti-info.com> wrote:
> > > I've tried to use a regex which contain
> > > "[[.foo.]]*guy"
> > > This should match strings like :
> > > fooguy
> > > foofooguy
> > > foo...fooguy
> >
> > I may be misunderstanding your question,but
> > why not use somthing like:
> > /(?:foo)*guy/
> > Cameron
>
> You have understood but, sorry, I've forgoten the ^
> "[^[.foo.]]*guy"
This still gives you a warning about your character class syntax.
Adding the ^ changes nothing as both of your attempts match 'fooguy',
'foofooguy', 'foo...fooguy' (using literal "."s or "foo"s), and
'some-other-guy'. If this is what you want, use /guy/ and be done with
it. If you want to match one or more "foo"s followed by "guy", use
/(?:foo)+guy/. (The (?:) syntax does grouping without capturing the
substring.) If you want to capture the prefix to 'guy', use /(.*)guy/
(being sure to test the success of the regex before using $1). If you
want to capture the prefix to 'guy' which must be one or more "foo"s,
use /((?:foo)+)guy/. I don't think you've understood the answers you
got.
Jon
--
Knowledge is that which remains when what is
learned is forgotten. - Mr. King
------------------------------
Date: Mon, 26 Jun 2000 16:45:39 -0400
From: "Chen, Terrence" <terrchen@americasm01.nt.com>
Subject: question about stat
Message-Id: <3957C0F3.A2BD9BCA@americasm01.nt.com>
Hi,
I have a question about the stat function in Perl 5 when
it comes to symbolic links.
example:
make -> /opt/mce/tools/hppa/mctools/ae01/public/gnumake
I want to get the stat information for make.
This is what I'm doing,
my @temp = stat 'make';
It returns the stat information for
/opt/mce/tools/hppa/mctools/ae01/public/gnumake
but I want the stat information for make.
Thanks,
Terrence.
------------------------------
Date: 26 Jun 2000 21:10:49 GMT
From: newsposter@cthulhu.demon.nl
Subject: Re: question about stat
Message-Id: <8j8gsp$3lo$1@internal-news.uu.net>
Chen, Terrence <terrchen@americasm01.nt.com> wrote:
> I have a question about the stat function in Perl 5 when
> it comes to symbolic links.
> example:
> make -> /opt/mce/tools/hppa/mctools/ae01/public/gnumake
> It returns the stat information for
> /opt/mce/tools/hppa/mctools/ae01/public/gnumake
> but I want the stat information for make.
perldoc -f lstat
Erik
------------------------------
Date: Mon, 26 Jun 2000 14:19:22 -0700
From: Aaron <alager@csuchico.edu>
Subject: Re: question about stat
Message-Id: <3957C8DA.7E6082EE@csuchico.edu>
"Chen, Terrence" wrote:
> Hi,
>
> I have a question about the stat function in Perl 5 when
> it comes to symbolic links.
>
> example:
> make -> /opt/mce/tools/hppa/mctools/ae01/public/gnumake
>
> I want to get the stat information for make.
>
> This is what I'm doing,
> my @temp = stat 'make';
>
> It returns the stat information for
> /opt/mce/tools/hppa/mctools/ae01/public/gnumake
> but I want the stat information for make.
>
> Thanks,
> Terrence.
The information that is being returned *is* the information for "make".
According to your example:
make -> /opt/mce/tools/hppa/mctools/ae01/public/gnumake
make is just a symbolic link to gnumake. There is no "make" per say,
"make" is just a pointer to "gnumake". If you want the information on
the symbolic link, we'll both have to wait for one of the gurus to
answer your post.
Aaron
------------------------------
Date: Mon, 26 Jun 2000 20:31:41 GMT
From: mwarne@my-deja.com
Subject: Read file after writing it?
Message-Id: <8j8ejd$tf6$1@nnrp1.deja.com>
Hi,
I am writing a perl cgi script that writes a file to a directory, and
immediately (within the same script) opens and reads files that are in
the same directory.
I close the file after writing it, But when I try to read the file
later in the script, the open fails.
However after the script ends, the file can be opened without errors.
I tried putting a sleep() after closing the newly written file, but I
still can not open it later in the script.
I'm using ActivePerl with Apache.
Any Ideas?
Thanks in advance.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 26 Jun 2000 20:51:54 GMT
From: Tina Mueller <tina@streetmail.com>
Subject: Re: Read file after writing it?
Message-Id: <8j8fpa$13s$13@ID-24002.news.cis.dfn.de>
hi,
mwarne@my-deja.com wrote:
> I am writing a perl cgi script that writes a file to a directory, and
> immediately (within the same script) opens and reads files that are in
> the same directory.
> I close the file after writing it, But when I try to read the file
> later in the script, the open fails.
well, some code would be helpful.
do you open the file with
open FILE, "file" or die "cannot open file: $!";
and maybe
close FILE or die "cannot close file: $!";
tina
--
http://tinita.de \ enter__| |__the___ _ _ ___
tina's moviedatabase \ / _` / _ \/ _ \ '_(_-< of
search & add comments \ \ _,_\ __/\ __/_| /__/ perception
"The Software required Win98 or better, so I installed Linux."
------------------------------
Date: 26 Jun 2000 14:43:24 EDT
From: Chris Sorensen <csorensen@uptimeresources.net>
Subject: regex - slurp file and extract email addresses
Message-Id: <3957A43C.377C4E4E@uptimeresources.net>
I've been given a file with company profiles (name, phone, address,
email etc). I need to extract the email addresses from this file and
save them to another file. I'm not very familiar with the syntax for
regular expressions. Would someone check my expression and tell me if I
am on the right track?
$address =~ /^\s+/\Q@\E/\s+$/
This seems wrong since it could start at the first whitespace in the
file and continue to the first whitespace after the first email address.
Then do the same thing to every email address after that.
How do I tell perl to start checking at the whitespace closest to the
front of "@" and stop at the whitespace closest to the back of "@"?
------------------------------
Date: Mon, 26 Jun 2000 21:34:15 +0200
From: "Thomas Plehn" <thommy-p@bigfoot.com>
Subject: Re: regex - slurp file and extract email addresses
Message-Id: <8j8bau$fv2$12$1@news.t-online.com>
I hope this helps you:
if( $address =~ /([^\s\@]{1,}\@[^\s\@]{1,})/ ){
$e_mail = $1;
}
Chris Sorensen <csorensen@uptimeresources.net> wrote:
> I've been given a file with company profiles (name, phone, address,
> email etc). I need to extract the email addresses from this file and
> save them to another file. I'm not very familiar with the syntax for
> regular expressions. Would someone check my expression and tell me if I
> am on the right track?
>
>
> $address =~ /^\s+/\Q@\E/\s+$/
>
> This seems wrong since it could start at the first whitespace in the
> file and continue to the first whitespace after the first email address.
> Then do the same thing to every email address after that.
>
> How do I tell perl to start checking at the whitespace closest to the
> front of "@" and stop at the whitespace closest to the back of "@"?
------------------------------
Date: 26 Jun 2000 16:09:23 EDT
From: abigail@delanet.com (Abigail)
Subject: Re: regex - slurp file and extract email addresses
Message-Id: <slrn8lff5h.ka1.abigail@alexandra.delanet.com>
Chris Sorensen (csorensen@uptimeresources.net) wrote on MMCDXCI September
MCMXCIII in <URL:news:3957A43C.377C4E4E@uptimeresources.net>:
][ I've been given a file with company profiles (name, phone, address,
][ email etc). I need to extract the email addresses from this file and
][ save them to another file. I'm not very familiar with the syntax for
][ regular expressions. Would someone check my expression and tell me if I
][ am on the right track?
If there file is in free format, there isn't much you can do, as you
will have no idea where an email address might start, and where it
will end. Even newlines can be part of an email address.
If there is a specific format of said file, use the format to parse
the file and extract the information.
][ $address =~ /^\s+/\Q@\E/\s+$/
][
][ This seems wrong since it could start at the first whitespace in the
You didn't even *try* this, did you? The above doesn't even compile.
][ file and continue to the first whitespace after the first email address.
][ Then do the same thing to every email address after that.
][
][ How do I tell perl to start checking at the whitespace closest to the
][ front of "@" and stop at the whitespace closest to the back of "@"?
You'd use \S, but what does "closest whitespace in front and at the back
of @" have to do with email addresses? Addresses can contain whitespace,
and can be delimited by other things than whitespace.
Abigail
--
perl -we '$@="\145\143\150\157\040\042\112\165\163\164\040\141\156\157\164".
"\150\145\162\040\120\145\162\154\040\110\141\143\153\145\162".
"\042\040\076\040\057\144\145\166\057\164\164\171";`$@`'
------------------------------
Date: Mon, 26 Jun 2000 13:54:05 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: regex - slurp file and extract email addresses
Message-Id: <Pine.GSO.4.10.10006261351290.23149-100000@user2.teleport.com>
On Mon, 26 Jun 2000, Thomas Plehn wrote:
> if( $address =~ /([^\s\@]{1,}\@[^\s\@]{1,})/ ){
What address does that find for my friends, fred and barney? This line
_is_ their address; write to them if you don't believe me!
<fred&barney (president@whitehouse.gov) @redcat.com>
Don't make up your own wrong rules for e-mail addresses; use the specs.
Thanks.
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 26 Jun 2000 17:06:30 EDT
From: Chris Sorensen <csorensen@uptimeresources.net>
Subject: Re: regex - slurp file and extract email addresses
Message-Id: <3957C5C7.BC8F228C@uptimeresources.net>
Abigail wrote:
> If there file is in free format, there isn't much you can do, as you
> will have no idea where an email address might start, and where it
> will end. Even newlines can be part of an email address.
>
the email addresses are all in the middle of a line - none are at the
beginning or end (fortunately)
> ][ $address =~ /^\s+/\Q@\E/\s+$/
> ][ This seems wrong since it could start at the first whitespace in the
>
> You didn't even *try* this, did you? The above doesn't even compile.
>
i did try it .. and no .. it doesn't compile .. that's why I am asking
for help .. I'm totally unsure of the syntax .. I'm trying to build an
expression using the pocket reference as my guide .. I see that \s =
whitespace and \S = non-whitespace ..
I need to figure out how to say .. count forward and backward from @ to
the closest whitespace on either side ..
> You'd use \S, but what does "closest whitespace in front and at the back
> of @" have to do with email addresses? Addresses can contain whitespace,
> and can be delimited by other things than whitespace.
>
I haven't run across email addresses that contain whitespace .. that
doesn't mean they can't .. it just means it's not usual.
whitespace/something/@/something/whitespace is the best I could come up
with ..
------------------------------
Date: Mon, 26 Jun 2000 20:21:04 GMT
From: remove_this_prefix_adms1@cts.com (Garrett Casey)
Subject: San Diego Perl Mongers and MP3.com
Message-Id: <3957bac4.12300447@nntp.cts.com>
Open Invitation:
MP3.com http://www.mp3.com will be hosting the San Diego Perl Mongers
meeting being held on JUNE 28, 2000 at 7:00pm. Any Perl programmer in
the San Diego area is welcome to attend.
MP3.com is nearly a billion-dollar online corporation that uses Perl
as it's primary programming language. Their site has hundreds of
thousands of unique visitors a day. They use Intel based hardware
systems with duel 500mhz (or better) processors, 512 megs of RAM,
running Linux and Solaris.
MySQL is their primary database for all the live sites. They use
Oracle and MS SQL in certain specific business applications.
MP3.com uses Apache exclusively for serving all pages on their site.
Again, Perl is their primary programming language and C is used for
very specialize purposes. Mod_perl is used for most CGI's.
At the meeting, MP3.com engineers will be speaking and answering
questions about how they use Perl, Mod_perl, Apache and MySQL in such
a robust environment. It should be very enlightening. Food and
drinks will be provided along with cool MP3.com prizes.
If you would like to attend the meeting, please RSVP Garrett Casey at
canetguy@home.com or adms1@cts.com
The San Diego Perl Mongers http://SanDiego.pm.org is going strong with
60+ members. All Perl programmers in San Diego are welcome to join
us. All members get free shell account on our server and have access
to our FRIENDLY mailing list.
-Garrett Casey
canetguy@home.com
adms1@cts.com
------------------------------
Date: Mon, 26 Jun 2000 22:03:44 +0100
From: sinewave <sinewave@lineone.net>
Subject: Scheduled script
Message-Id: <3957C530.ABBE49A1@lineone.net>
Hi
I want to somehow run a script on a daily basis that will automatically
generate and send e-mails where someone has posted their email details.
What is the best way of doing this. It is Apache/UNIX. I don't suppose I
want to have a program running all the time, so what is the best way of
doing this. Is there a UNIX/Apache process that I can put my script
into????
Thanks in advance
S
------------------------------
Date: Mon, 26 Jun 2000 14:14:11 -0700
From: Aaron <alager@csuchico.edu>
To: sinewave <sinewave@lineone.net>
Subject: Re: Scheduled script
Message-Id: <3957C7A3.37D2A822@csuchico.edu>
This would be most easily done via cron from UNIX. Check out the man pages
for cron and crontab:
man cron
man crontab
A not so eleagant solution could also be done by having the script sleep()
for a long time (24 hours?) and then have it do its thing and go back to
sleep.
Aaron
sinewave wrote:
> Hi
>
> I want to somehow run a script on a daily basis that will automatically
> generate and send e-mails where someone has posted their email details.
> What is the best way of doing this. It is Apache/UNIX. I don't suppose I
> want to have a program running all the time, so what is the best way of
> doing this. Is there a UNIX/Apache process that I can put my script
> into????
>
> Thanks in advance
>
> S
------------------------------
Date: 26 Jun 2000 22:12:45 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Server push problem
Message-Id: <8j8h0d$7o6$1@orpheus.gellyfish.com>
On Mon, 26 Jun 2000 14:31:27 GMT Sami Maki wrote:
> Hi,
>
> I have this "push" related problem that server will execute entire Perl
> script before printing anything to web browser. Are there some
> configurations what need to be set on server side before it works? Here is
> the script what I'm using (it works on Apache at least but not on
> iPlanet-WebServer-Enterprise/4.1). Thanks.
>
Then it is an issue with the web server that would arise whatever language
you wrote your program in - I would ask in the appropriate group in the
comp.infosystems.www.servers hierarchy ( you dont say what platform you
are on ).
/J\
--
** This space reserved for venue sponsor for yapc::Europe **
<http://www.yapc.org/Europe/>
------------------------------
Date: 26 Jun 2000 18:19:56 GMT
From: Tina Mueller <tina@streetmail.com>
Subject: Re: single quote string question
Message-Id: <8j86sc$13s$6@ID-24002.news.cis.dfn.de>
hi,
Ron Hill <hillr@ugsolutions.com> wrote:
> I have a question about single quoted string. Using the following
> example
> print '"Three \\\'s: \\\\\"';
> this returns "Three \'s: \\\"
> my question is how can therre be \\\ at the end?
well, let's go through it:
print '"Three \\\'s: \\\\\"';
^^
this print's a \
print '"Three \\\'s: \\\\\"';
^^
this print's a '
print '"Three \\\'s: \\\\\"';
^^^^
here two \ are printed.
print '"Three \\\'s: \\\\\"';
^^
this prints \" because in ' \" is
not interpolated.
(disclaimer: i'm guessing)
can i ask what are you trying to do?
tina
--
http://tinita.de \ enter__| |__the___ _ _ ___
tina's moviedatabase \ / _` / _ \/ _ \ '_(_-< of
search & add comments \ \ _,_\ __/\ __/_| /__/ perception
"The Software required Win98 or better, so I installed Linux."
------------------------------
Date: 26 Jun 2000 11:23:24 -0800
From: yf110@vtn1.victoria.tc.ca (Malcolm Dew-Jones)
Subject: Re: single quote string question
Message-Id: <39579f9c@news.victoria.tc.ca>
Ron Hill (hillr@ugsolutions.com) wrote:
: Hello All,
: I have a question about single quoted string. Using the following
: example
: print '"Three \\\'s: \\\\\"';
: this returns "Three \'s: \\\"
: my question is how can therre be \\\ at the end?
: the way I see it is \\ will produce \ this accounts for four of the \
: now the fifth \ is paired with the " so it will print "
The " quote does not need to be escaped with \ since it's already inside '
quotes. When a \ is unambiguous then it prints as itself, which can be
confusing at times.
e.g. print '\ ';
print '\\ ';
both print a slash and a space.
: So where is the extra \ comming from?
: Thanks
--
------------------------------
Date: Mon, 26 Jun 2000 20:53:04 +0200
From: Abe Timmerman <abe@ztreet.demon.nl>
Subject: Re: single quote string question
Message-Id: <3a9fls8vh9jg7nh1rve6il7i006uahni5k@4ax.com>
On 26 Jun 2000 18:19:56 GMT, Tina Mueller <tina@streetmail.com> wrote:
> hi,
> Ron Hill <hillr@ugsolutions.com> wrote:
>
> > I have a question about single quoted string. Using the following
> > example
> > print '"Three \\\'s: \\\\\"';
>
> > this returns "Three \'s: \\\"
>
> > my question is how can therre be \\\ at the end?
...
> this prints \" because in ' \" is
> not interpolated.
> (disclaimer: i'm guessing)
No need to guess, the answer has been given in another thread:
Subject: Uninterpolated quoting and \
--
Good luck,
Abe
------------------------------
Date: Mon, 26 Jun 2000 14:26:03 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: single quote string question
Message-Id: <slrn8lf81r.7r5.tadmc@magna.metronet.com>
On Mon, 26 Jun 2000 10:30:19 -0700, Ron Hill <hillr@ugsolutions.com> wrote:
>
>I have a question about single quoted string. Using the following
>example
>print '"Three \\\'s: \\\\\"';
>
>this returns "Three \'s: \\\"
>
>my question is how can therre be \\\ at the end?
the 2-char sequence \\ yields a single \ char
the 2-char sequence \\ yields another single \ char
the 2-char sequence \" yields the two character sequence \"
In a single quoted string, backslashes are only special when
the come before a backslash or a single quote.
They are not special (they stand for themselves) when
followed by any other character.
That is, they are only "consumed" by the quoting operator
when they precede one of those two chars.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 26 Jun 2000 16:10:27 EDT
From: abigail@delanet.com (Abigail)
Subject: Re: single quote string question
Message-Id: <slrn8lff7h.ka1.abigail@alexandra.delanet.com>
Ron Hill (hillr@ugsolutions.com) wrote on MMCDXCI September MCMXCIII in
<URL:news:3957932B.6F31FC59@ugsolutions.com>:
@@ Hello All,
@@
@@ I have a question about single quoted string. Using the following
@@ example
@@ print '"Three \\\'s: \\\\\"';
@@
@@ this returns "Three \'s: \\\"
@@
@@ my question is how can therre be \\\ at the end?
@@ the way I see it is \\ will produce \ this accounts for four of the \
@@ now the fifth \ is paired with the " so it will print "
@@ So where is the extra \ comming from?
You're using single quotes. Look up what perlop has to say about
interpolation and escaping.
Abigail
--
package Z;use overload'""'=>sub{$b++?Hacker:Another};
sub TIESCALAR{bless\my$y=>Z}sub FETCH{$a++?Perl:Just}
$,=$";my$x=tie+my$y=>Z;print$y,$x,$y,$x,"\n";#Abigail
------------------------------
Date: Mon, 26 Jun 2000 19:45:38 GMT
From: clintp@geeksalad.org (Clinton A. Pierce)
Subject: Re: split question
Message-Id: <CpO55.11275$fR2.134013@news1.rdc1.mi.home.com>
[Posted and mailed]
In article <395795d9$0$1991@wodc7nh1.news.uu.net>,
"spurcell" <skpurcell@hotmail.com> writes:
> my $testString = "hello SSPPLLIITT goodbye";
> my ($ans1, $ans2) = split /SSPPLLIITT/, $testString;
>
> After running that and I print $ans1 or $ans2, they are empty, but of course
> if I assign to an array, I am OK.
Worked fine for me. In fact, I cut-and-pasted your code right in with
no problems. This was Perl 5.005_03, but I imagine it would work just
fine almost anywhere.
--
Clinton A. Pierce Teach Yourself Perl in 24 Hours!
clintp@geeksalad.org for details see http://www.geeksalad.org
"If you rush a Miracle Man,
you get rotten Miracles." --Miracle Max, The Princess Bride
------------------------------
Date: Mon, 26 Jun 2000 20:07:18 GMT
From: Scott Christensen <scott.christensen@dot.state.wi.us>
Subject: Re: Unable to access an array from within a class
Message-Id: <8j8d57$sde$1@nnrp1.deja.com>
Thanks to everyone's help and explanations, I have solved the problem I
was having. Don't you just love teaching newbies?
Thanks again,
Scott
In article <8j0cdt$eut$1@nnrp1.deja.com>,
Scott Christensen <scott.christensen@dot.state.wi.us> wrote:
> I am a fairly new PERL programmer and am trying to create a class. If
> I have a reference variable array in the hash for the class, how do I
> access and set the sub elements in the array. For example, I have
>
> sub new {
> ... some code ...
>
> bless {
> "arrayRef" => @array
> ... etc ...
> }, $class
> }
>
> I would assume that I should be able to get access to the array by
> doing something like:
>
> $self->{"arrayRef"}[x]
>
> but this isn't working. So, I realize this is probably a very simple
> question, but I can't find the answer to save my life. How can I
> access the array from inside my class.
>
> Thanks for your help,
> Scott Christensen
>
> Sent via Deja.com http://www.deja.com/
> Before you buy.
>
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 26 Jun 2000 13:26:50 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: Unable to access an array from within a class
Message-Id: <m1snu089yt.fsf@halfdome.holdit.com>
>>>>> "Scott" == Scott Christensen <scott.christensen@dot.state.wi.us> writes:
Scott> Thanks to everyone's help and explanations, I have solved the
Scott> problem I was having. Don't you just love teaching newbies?
Actually, I've made a career of it.
:-)
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Mon, 26 Jun 2000 15:42:25 EDT
From: Arek@nospam.pietruszewski.com (Arek P)
Subject: Re: unlink on NT
Message-Id: <8j8bn1$1g2j$1@earth.superlink.net>
On Fri, 23 Jun 2000 13:51:14 -0500, "SlyDur" <Sly_Dur@hotmail.com>
wrote:
>Hello,
>
> I have a script that did work fine but qui all of a sudden and for the life
>of me I can't figure why? I think this is a permissions issue.
>
> Here is the deal.. I have a formmail type script that runs on NT using
>ActiveState Perl (The latest). It creates a temporary file, emails that file
>out and then unlinks that temp file. Problem is the unlinking or deleting of
>these temporary files just quit working. SO I am geeting a directory full of
>temp files. The directory these temp files live in have read, write, delete
>access fro the IUSR account. Problem is when the temp fiels are created by
>my script they are created with only read execute permissions. I figured
>this is why I can't unlink them because they are created with only read x
>permissions.. Is this true? Is there a way to create the temp files and
>specify what permissions they should have when they are created?
>
> Thanks,
> Todd
>
>
>
Just like the previous msg suggested; check the return value from
unlink and see what is the reason it fails; if it is permissions, You
can try Win32::File::SetAttributes() so see if You can set them to be
able to unlink. Hope this helps.
------------------------------
Date: Mon, 26 Jun 2000 22:00:17 +0100
From: sinewave <sinewave@lineone.net>
Subject: Web Hosting
Message-Id: <3957C461.77D0669C@lineone.net>
Hi
Does anybody know where I can find a free ISP who will allow me to run C
& Perl scripts as well as have access to the server command line.
Thanks
S
------------------------------
Date: Mon, 26 Jun 2000 19:57:03 GMT
From: yong321@yahoo.com
Subject: What's the email string limit?
Message-Id: <8j8ci4$ru3$1@nnrp1.deja.com>
I send email either by using NET::SMTP or by piping
to /usr/lib/sendmail. The goal is to send email to as many people at
one shot as possible since I have about 700 users.
Let's say I use the SMTP module. What's the limit to the number of
elements in @email:
$smtp->to(@email);
Or if I pipe to sendmail. What's the string length for $email:
open MAIL, "| /usr/lib/sendmail $email" or die "$!";
I'm using Perl 5.004_04 on Solaris 2.6 for Sparc. Thanks for any advice.
--
Yong Huang
(yong321@yahoo.com)
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 26 Jun 2000 13:14:56 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: What's the email string limit?
Message-Id: <m1d7l49p33.fsf@halfdome.holdit.com>
>>>>> "yong321" == yong321 <yong321@yahoo.com> writes:
yong321> I send email either by using NET::SMTP or by piping
yong321> to /usr/lib/sendmail. The goal is to send email to as many people at
yong321> one shot as possible since I have about 700 users.
I feel unclean saying this, just like I did right after installing
the module, but you may want to look at Mail::BulkMail in the CPAN.
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: 26 Jun 2000 22:10:33 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Zlib.pm and perl2exe
Message-Id: <8j8gs9$7o3$1@orpheus.gellyfish.com>
On Mon, 26 Jun 2000 18:38:30 +0200 Thomas Plehn wrote:
> Hello,
>
> I have written a script which uses Zlib for Data compression. This script
> works fine if I use the interpreter but if I try to compile it with
> perl2exe, I get the following error:
> (only the relevant part)
>
> Can't locate auto/Compress/Zlib/autosplit.ix in @INC (@INC contains: [...])
> at PERL2EXE_STORAGE/AutoLoader.pm line 83.
> at PERL2EXE_STORAGE/Compress/Zlib.pm line 8
>
> Is there anything I can do against this problem?
> What is "autosplit.ix" ?
autosplit.ix is created by AutoSplit - you can read about it in detail
in the manpage for that module and its purpose is described in the
AutoLoader manpage. Essentially the file contains forward declarations
of the packages subroutines that will be loaded on demand by AutoLoader
and is necessary for the operation of that module. If the documentation
for perl2exe does not describe how you might remedy this problem then
you might report it as a bug to the vendors of perl2exe.
/J\
--
** This space reserved for venue sponsor for yapc::Europe **
<http://www.yapc.org/Europe/>
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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 V9 Issue 3485
**************************************