[7169] in Perl-Users-Digest
Perl-Users Digest, Issue: 794 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jul 30 12:21:36 1997
Date: Wed, 30 Jul 97 09:00:27 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Wed, 30 Jul 1997 Volume: 8 Number: 794
Today's topics:
Re: ++ Not Working?? <mattrope@mdhost.cse.tek.com>
Re: cgi bbs or guestbook <eckje@rhodes.edu>
Re: CGI Perl script launches a C++ program <eckje@rhodes.edu>
Re: comment <sfairey@adc.metrica.co.uk>
Re: Executing Shell commands in Perl (Will Morse)
Re: Gnuwin32 build fails on Fcntl (Pete Jordan)
Re: I'm looking for a perl logo... (Steffen Beyer)
LWP Traverse <matts@webpromote.com>
Mighty Malcolm Beattie! Get the compiler running, pleas <mschilli@mission.base.com>
Re: Mighty Malcolm Beattie! Get the compiler running, p (Malcolm Beattie)
Re: Modules on Win32? (Jamie O'Shaughnessy)
Re: Need source example: fetch HTML from a URL <merlyn@stonehenge.com>
Re: Need Win32 Perl guru phone help - will pay cash (Jamie O'Shaughnessy)
NetBSD-current pmax bug with perl5.00401 <davidson@zk3.dec.com>
Re: Newbie: How do you call gzip from perl? (Greg Bacon)
Re: Nifty hash initialization, but why? <jhi@alpha.hut.fi>
Re: optionally using packages <tibbs@hpc.uh.edu>
Re: Perl behavior on Win32 vs Unix <pittelli@ehsct7.envmed.rochester.edu>
Re: Poetry questions (Michael Shields)
Re: regexp problems:( <sfairey@adc.metrica.co.uk>
Re: regexp problems:( (Paul Vermette [NiD/BiM])
Run PERL Programs in Win95? (Cyber Wolf)
Seeking more fonts for use with GD, or ...? (Felix Morley Finch)
Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
SybPerl memory leak? <wchong@worldnet.att.net>
Re: SybPerl memory leak? mpeppler@mbay.net
Re: Too many people in this group are arrogant #*(@# (R (Faust Gertz)
Re: Too many people in this group are arrogant #*(@# (R <flavell@mail.cern.ch>
Re: Too many people in this group are arrogant #*(@# (R (Parillo)
Re: Unix time, local time, year 2000 question. (Neil Briscoe)
US-NC Web Developer with PERL exp (Kgikaren)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 29 Jul 1997 16:15:24 -0700
From: Matt Roper <mattrope@mdhost.cse.tek.com>
Subject: Re: ++ Not Working??
Message-Id: <Pine.SUN.3.95q.970729161315.18896T-100000@tekgp4.cse.tek.com>
Just a guess, but is it possible that the name that CGI scripts get run
under has changed (for example changed from "nobody" to "webmaster"). It
may be that the old name still has write permission on the file, but the
new name does not. Hope this helps.
On Tue, 29 Jul 1997, Bryan Shea wrote:
> In article <m390yp3b7u.fsf@lorien.ajs.com>, ajs@lorien.ajs.com says...
> > Vik Rubenfeld <VikR@aol.com> writes:
> >
> > > My PERL script keeps track of the number of times it has run, by incrementing
> > > a value in a COUNTER file. It's always run fine, but today I was running it on
> > > a new server, and no matter how many times I run it, the value in the COUNTER
> > > file remains 1. The code is shown below. What am I missing here? Is there
> > > another way to increment the value of $counter ?
> I had this problem when moving onto another server too. Make sure you
> have write permission set correctly for the owner of the file.
> --
> Bryan Shea
>
>
==============
Matt Roper
mattrope@mdhost.cse.tek.com
------------------------------
Date: Tue, 29 Jul 1997 13:15:19 -0500
From: Jay Eckles <eckje@rhodes.edu>
Subject: Re: cgi bbs or guestbook
Message-Id: <33DE3323.6F4D@rhodes.edu>
If you have a version of Perl for Windows NT, I have a script that I
just finished that should work with it. I don't know how it
wouldn't...it's just straight Perl and doesn't open any pipes or
anything. If you want it, tell me and I'll email it to you.
Warning about it though, it's not pretty and I haven't even done any
serious testing of it, so it may or may not work for you. Don't come
suing if it destroys your computer. You shouldn't have any problems
with it, though.
Jay
------------------------------
Date: Tue, 29 Jul 1997 13:21:19 -0500
From: Jay Eckles <eckje@rhodes.edu>
Subject: Re: CGI Perl script launches a C++ program
Message-Id: <33DE348A.6126@rhodes.edu>
Christopher Green wrote:
> Does the user under which the server is running have permission to execute the
> C++ program?
Doesn't the world have to have execute permission as well (a+x) ?
Jay
------------------------------
Date: Tue, 29 Jul 1997 21:41:49 +0100
From: Simon Fairey <sfairey@adc.metrica.co.uk>
To: John Liao <johnliao@cs.buffalo.edu>
Subject: Re: comment
Message-Id: <33DE558C.C19A5D78@adc.metrica.co.uk>
John Liao wrote:
> Is there a equivalent /* */ for comments in perl?
> Thanks
> --
> _/ _/ _/ _/
> _/_/ _/_/_/ _/_/_/ _/ _/_/_/ _/_/
> _/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/
> _/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/
Exactly the same as other shell scripts, use a hash to denote a
comment.
Simon
------------------------------
Date: 29 Jul 1997 16:56:39 -0500
From: will@Starbase.NeoSoft.COM (Will Morse)
Subject: Re: Executing Shell commands in Perl
Message-Id: <5rloun$jua$1@Starbase.NeoSoft.COM>
open (IN,"isisdoc FROMPDF=test.pdf|") ;
while (<IN>)
{
...
}
Will
In article <870110598.30566@dejanews.com>,
<wchrist@flagmail.wr.usgs.gov> wrote:
>I am trying to execute shell commands in Perl with no success. The
>shell version of what I am trying to do is as follows:
>
>#!/bin/sh
>
>taetm << done
>isisdoc FROMPDF=test.pdf
>exit
>done
>
>
>How do I translate this to perl? Taetm is an application, and isisdoc
>is a program run under this application. The FROMPDF=test.pdf is an
>argument passed to isisdoc, with the exit call terminating the taetm
>application after isisdoc is finished running.
>
>I have tried to execute this in perl with both the system() call and
>the Shell module. Any help in this matter would be greatly appreciated!
>
--
# Copyright 1997 Will Morse. Internet repost/archive freely permitted.
# Hardcopy newspaper, magazine, etc. quoting requires permission.
#
# Gravity, # Will Morse
# not just a good idea, # Houston, Texas
# it's the law. # will@starbase.neosoft.com
#
# These are my views and do not necessarly reflect anyone else/
------------------------------
Date: Tue, 29 Jul 1997 23:44:24 GMT
From: pete@horus.cix.vapethis.co.uk (Pete Jordan)
Subject: Re: Gnuwin32 build fails on Fcntl
Message-Id: <memo.19970730004434.45313E@horus.cix.co.uk>
In article <5rlb60$pqa$1@lennon.postino.com>, danny@lennon.postino.com
(Danny Aldham) wrote:
> I am trying to build perl5.004_01 using gnuwin32/b18 . To fix
> earlier failures I added a ccflag -DCYGWIN32 , and I am getting
> much further along. (miniperl actually builds!) It is now failing
> making Fcntl with syntax errors from op.h at line 132 & 134 .
> ../../op.h:132: syntax error before '{' .
I got this same problem. Installing Chris Faylor's patches before
configuring and building Perl fixed things for me. You'll find them at
http://www.tiac.net/users/cgf but note that you may need to split the
patchfile up into individual diffs before running it (I did) as the patch
that comes with cygwin32 b18 seems seriously broken.
If you still have problems, you're welcome to mail me directly (don't
forget to extract the spam blocker from my mail address first :) as this
isn't really directly relevant to this newsgroup.
Pete Jordan
= = = = = = = = = = = = = = = = = = = = = = =
Horus Communications
http://www.horus.cix.co.uk/
= = = = = = = = = = = = = = = = = = = = = = =
"Is a polar bear a rectangular bear after
a coordinate transform?"
------------------------------
Date: 29 Jul 1997 19:39:33 GMT
From: sb@en.muc.de (Steffen Beyer)
Subject: Re: I'm looking for a perl logo...
Message-Id: <5rlgtl$pmi$2@en1.engelschall.com>
Larry D'Anna <ldanna@hotmail.com> wrote:
> M. Mustun wrote:
> > I'm looking for a perl logo?
> > Where can I get Perl logos/pictures?
> > Many thanks!
> The Perl home page has a picture of a camel.
> http://www.perl.com/perl/
There's another one on my Perl Software Download page at
http://www.engelschall.com/u/sb/download/
Note however that the use of a camel with Perl and Perl-related topics
is a trademark of O'Reilly & Associates, Inc. ( http://www.ora.com/ ).
You should contact them and ask permission to use their trademark first.
Yours,
--
Steffen Beyer <sb@sdm.de> http://www.engelschall.com/u/sb/
"There is enough for the need of everyone in this world,
but not for the greed of everyone." - Mahatma Gandhi
>> Unsolicited commercial email goes directly to /dev/null <<
------------------------------
Date: Tue, 29 Jul 1997 15:09:53 -0500
From: Matt Spaid <matts@webpromote.com>
Subject: LWP Traverse
Message-Id: <33DE4E11.7EEB273B@webpromote.com>
The sample that they give you on the LWP Library files for Traverse does
not work. I tried it probably about 5 times with 3 different software
engineers. If anyone out there got it to work, or knows how to get
Traverse to work with the new LWP Library please drop me a line. My
email address is : matts@webpromote.com. Any/All help is appreciated.
Thanks,
Matt Spaid
.............................................................
. Matthew Spaid WebPromote(tm) .
. Software Engineer 1580 S. Milwaukee Ave, #320.
. matts@webpromote.com Libertyville, IL. 60048 .
. http://www.WebPromote.com Phone #847.918.9292 .
. Intelligent Internet Marketing Fax #847.918.9296 .
.............................................................
------------------------------
Date: Tue, 29 Jul 1997 13:20:42 -0700
From: Michael Schilli <mschilli@mission.base.com>
Subject: Mighty Malcolm Beattie! Get the compiler running, please!
Message-Id: <33DE509A.19210724@mission.base.com>
Oh mighty Malcom, hi folks,
is the Perl Compiler still worked on? I mean, I can compile
print "howdy, world!\n";
that's not bad, but something like
use CGI;
$q = new CGI;
while working as regular Perl script, fails, if compiled, with:
Can't locate object method "new" via package "CGI"
at hello.pl line 4.
So, is there a chance to get this running?
Any help apprechiated!
-- Michael
----------------------------------------------------------
Michael Schilli http://mission.base.com/mschilli
----------------------------------------------------------
------------------------------
Date: 30 Jul 1997 11:13:55 GMT
From: mbeattie@sable.ox.ac.uk (Malcolm Beattie)
Subject: Re: Mighty Malcolm Beattie! Get the compiler running, please!
Message-Id: <5rn7lj$gqp@news.ox.ac.uk>
In article <33DE509A.19210724@mission.base.com>,
Michael Schilli <mschilli@mission.base.com> wrote:
>Oh mighty Malcom, hi folks,
At least you spelt my name right in the subject line :-)
>is the Perl Compiler still worked on? I mean, I can compile
>
> print "howdy, world!\n";
>
>that's not bad, but something like
>
> use CGI;
> $q = new CGI;
>
>while working as regular Perl script, fails, if compiled, with:
>
> Can't locate object method "new" via package "CGI"
> at hello.pl line 4.
>
>So, is there a chance to get this running?
Reading the README file is a good starting point, especially the part
where it says:
If your program uses classes which define methods (or other subs which
are not exported and not apparently used until runtime) then you'll
need to use -u compile-time options (see the NOTES file) to force the
subs to be compiled. Future releases will probably default the other
way, do more auto-detection and provide more fine-grained control.
So for alpha3, use something like
perl -MO=C,-uCGI,...
As promised, the current version is better at discovering such classes
and you don't need the -uCGI. Unfortunately, I'm still having to spend
some time on getting it to work with 5.004 which had some unexpected
core changes that are causing me some problems.
I've only tested a minimal CGI example, though. If the CGI module
does anything too complicated (especially if it doesn't like the idea
of things changing from underneath it between when it initialises and
when it's eventually run) then things still may not work. Additions
that will appear in perl 5.005 will provide hooks for writers of such
modules to support the compiler but it will still be partially up
to the module author if they do anything too fancy.
--Malcolm
--
Malcolm Beattie <mbeattie@sable.ox.ac.uk>
Oxford University Computing Services
"I permitted that as a demonstration of futility" --Grey Roger
------------------------------
Date: Wed, 30 Jul 1997 10:51:33 GMT
From: joshaugh@uk.oracle.com (Jamie O'Shaughnessy)
Subject: Re: Modules on Win32?
Message-Id: <33e01beb.502509218@newshost.us.oracle.com>
On Tue, 29 Jul 1997 12:12:35 -0600, Jason Pociask <pociask@maricopa.edu> wrote:
>Will modules from CPAN such as libwww-perl, and it's required
>libnet*, MD5*, MIME-Base64*, and IO-1-1* modules install and
>run properly under the Activeware Win32 port of perl (on WIn95)?
>
>The base64 module, for example, is using .XS to interface to
>a C routine for performance. What kind of C support do I need
>on the Win95 box so that the "make"s will run OK? I have MS VC++
>5.0, is that enough?
>
>Thanks for pointers to any helpful docs also,
>
>-JP
(See my other mail/posting to your other libwww request)
Yes you need a compiler to build some of the modules. MSVC++ 5 should do fine
(it has nmake rather than unix style make).
If you get the official perl 5.004_01 port (from www.perl.com) the readme.win32
should give you plenty of information on how to build perl. Once you've done
that you should get the modules you require to build/(n)make, test and install
without too mant issues. A few of the tests may fail, but generally it should
be OK.
Jamie
___________________________________________________________________________
Jamie O'Shaughnessy Work: joshaugh@uk.oracle.com
Oracle C++ Object Layer Generator Team Home: jamie@thanatar.demon.co.uk
______________________________________________________ __ __ _ __ . __
Opinions expressed here are my own and not those of... (__)|-</-\(__ |__ -_
------------------------------
Date: 29 Jul 1997 12:15:37 -0700
From: Randal Schwartz <merlyn@stonehenge.com>
To: Jason Pociask <pociask@maricopa.edu>
Subject: Re: Need source example: fetch HTML from a URL
Message-Id: <8c204h4qli.fsf@gadget.cscaper.com>
>>>>> "Jason" == Jason Pociask <pociask@maricopa.edu> writes:
Jason> Surely someone has a PERL program that is non-proprietary
Jason> enough to email it to me: just need a simple program or sub
Jason> that takes a URL, opens up a web connection, and fetches
Jason> the HTML page back for parsing. I know enough perl, but
Jason> pulling together all the right _use_ modules is proving
Jason> a little tough. If I just had a working example, I'd be
Jason> off and running on an important project.
Jason> Many thanks in advance, no explanations or support needed,
Jason> just a little bit of code, maybe something that was done
Jason> for fun or as part of a publicly funded project.
OK, here's something that I was paid handsomely to write for a client,
but I'll give to you for free:
use LWP::Simple;
$content = get "http://www.stonehenge.com/merlyn/WebTechniques/";
There.
I hope I don't get in trouble by having typed it again. :-)
And LWP::Simple comes from the LWP pacakge, found in the CPAN.
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@ora.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------------------------------
Date: Wed, 30 Jul 1997 10:47:02 GMT
From: joshaugh@uk.oracle.com (Jamie O'Shaughnessy)
Subject: Re: Need Win32 Perl guru phone help - will pay cash
Message-Id: <33df1ade.502240359@newshost.us.oracle.com>
On Tue, 29 Jul 1997 16:45:41 -0600, Jason Pociask <pociask@maricopa.edu> wrote:
makemaker doesn't work in the Activeware port, so you can't install modules
like that.
I suggest getting the official perl 5.004_01 port (from www.perl.com) as it's
makemaker works and I've built and installed all the modules you list (MD5,
MIME-Base64, libwww, etc.) without many issues.
If you need the Win32 extensions, you can get libwin32 from CPAN and install
that for perl 5.004_01 and it works fine (in fact there are a few bugs fixed).
You can have that one from free :)
Jamie
>I'm trying to install Perl5.003 (Activeware build 307) on a Win95 PC
>(P166).
>PERL itself installs fine -- I have a couple Perl programs that I
>developed
>on Unix that run fine on the Win95 PC also.
>
>But what I really want to do is add the LIBWWW-PERL-5.10 modules so I
>can do some web stuff (Mostly getting URL's to parse the returned
>pages).
>The docs for LIBWWW-PERL5.10 say that there are 4 other modules that
>must
>be installed first:
>
>" We recommend that you have
> the following packages installed before you install libwww-perl:
> MIME-Base64-#.##
> IO-#.## (bundled with perl5.004 and better)
> libnet-#.##
> MD5-#.## "
>
>OK, so I pulled those off CPAN, and after GZIP/TAR'ing them out, I try
>to follow the directions in the first one, the Base64 module:
>
> VVVVVV... (I typed this stuff)
>C:\perl\Modules\MIME-Base64-2.01>perl makefile.pl > save.errs
>substr outside of string at C:\perl\lib/ExtUtils/MM_Win32.pm line 138.
>Warning: PERL_LIB () seems not to be a perl library directory
> (Exporter.pm not found) at (eval 3) line 298.
>substr outside of string at C:\perl\lib/ExtUtils/MM_Win32.pm line 138.
>Can't open perl script "\ExtUtils\xsubpp": No such file or directory
>
>And...
>Here's the contents that were written to "save.errs" in addition to the
>above:
>C:\perl\Modules\MIME-Base64-2.01>type save.errs
>CONFIG key 'ar' does not exist in Config.pm
>CONFIG key 'lib_ext' does not exist in Config.pm
>CONFIG key 'obj_ext' does not exist in Config.pm
>CONFIG key 'sitearchexp' does not exist in Config.pm
>CONFIG key 'exe_ext' does not exist in Config.pm
>Have C:\perl\lib\Config.pm expected \Config.pm
>Your perl and your Config.pm seem to have different ideas about the
>architecture they are running on.
>Perl thinks: [lib]
>Config says: [i386-win32]
>This may or may not cause problems. Please check your installation
>of perl if you
>have problems building this extension.
>Writing Makefile for MIME::Base64
>C:\perl\Modules\MIME-Base64-2.01>
>
>
>What the hell is going on here? I have pulled and installed both the
>PW32I307.EXE file and the PW32S307.ZIP source code files from the
>activeware site (God bless then, there's no directions anywhere on
>how exactly to install the two of them).
>
>The README.TXT file in /perl/docs/PERL-WIN refers to a file called
>"install.txt"... so I do a DIR/S INSTAL*.* and there's no such file
>anywhere (just an install.log and a couple install.pm files).
>
>I'd pay cash money to anyone willing to spend 120 seconds on the phone
>with me to explain how you can get libwww-perl-5 installed and working
>with Activeware perl 5.003/307 on Win95. Seriously. I need it working,
>"stat", for a project and if it means shelling out for 3 minutes of a
>Win32 Perl guru's time, so be it.
>
>For example, there are references to a "make" command or utility, is
>this really used on the Win32 platforms?
>
>-Jason Pociask
___________________________________________________________________________
Jamie O'Shaughnessy Work: joshaugh@uk.oracle.com
Oracle C++ Object Layer Generator Team Home: jamie@thanatar.demon.co.uk
______________________________________________________ __ __ _ __ . __
Opinions expressed here are my own and not those of... (__)|-</-\(__ |__ -_
------------------------------
Date: Wed, 30 Jul 1997 09:22:56 -0400
From: "D. Sean Davidson" <davidson@zk3.dec.com>
Subject: NetBSD-current pmax bug with perl5.00401
Message-Id: <33DF4030.2F70B7A7@zk3.dec.com>
I'm trying to track down a interaction bug between perl and
NetBSD-current pmax.
The problem is that the t/base/lex.t test 7 fails
eval '$foo = 123+123.4+123e4+123.4E5+123.4e+5+.12;';
$foo = int($foo * 100 + .5);
if ($foo eq 2591024652) {print "ok 7\n";} else {print "not ok 7 :$foo:\n";}
and returns 2591024652.5 instead of the expected results.
This happens when perl is linked with shared libraries and
works fine when linked with static libraries.
Can anyone tell me what section of perl5 *.c code is run to
perform the int($foo * 100 + .5) operation so I can track
down this problem?
Thank,
Sean
------------------------------
Date: 29 Jul 1997 23:00:25 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: Newbie: How do you call gzip from perl?
Message-Id: <5rlsm9$k6l$2@info.uah.edu>
In article <8c67txgxxu.fsf@gadget.cscaper.com>,
Randal Schwartz <merlyn@stonehenge.com> writes:
:
: system "gzip", "myfile.txt";
Or even... :-)
--
open(G,"|gzip -dc");$_=<<EOF;s/[0-9a-f]+/print G pack("h*",$&)/eg
f1b88000b620f22320303fa2d2e21584ccbcf29c84d2258084
d2ac158c84c4ece4d22d1000118a8d5491000000
EOF
------------------------------
Date: 30 Jul 1997 13:16:42 +0300
From: Jarkko Hietaniemi <jhi@alpha.hut.fi>
Subject: Re: Nifty hash initialization, but why?
Message-Id: <oeeyb6ohmk5.fsf@alpha.hut.fi>
Personally I find the following the clearest:
@h{qw(1 2 3)} = qw(a b c);
--
$jhi++; # http://www.iki.fi/~jhi/
# There is this special biologist word we use for 'stable'.
# It is 'dead'. -- Jack Cohen
------------------------------
Date: 29 Jul 1997 15:53:48 -0500
From: Jason L Tibbitts III <tibbs@hpc.uh.edu>
Subject: Re: optionally using packages
Message-Id: <ufazpr5wper.fsf@sina.hpc.uh.edu>
>>>>> "EtB" == Eli the Bearded <usenet-tag@qz.little-neck.ny.us> writes:
EtB> I want a script to use a package for enhanced functionality as an
EtB> option. I do not want the script to require the package.
There's always the require and import pair given in the documentation for
the use function (perldoc -f use); if you don't put it in a begin bock, it
acts like a use but doesn't happen until runtime. Or you could look at how
AnyDBM_File handles things; it loads modules until it finds one that it can
use.
My preferred method is to just use the Autoloader; if you put the use just
before the functions that need the module but after the __END__ block, the
use doesn't happen until the function is actually called. This
unfortunately is limited to modules and you need to do the MakeMaker bit to
get it all split and installed correctly for the user, but lately I've
found that I end up making modules out of everything more than a hundred
lines long anyway. It's a nice way to keep compilation times reasonable
for long program that doesn't always need to use some huge module.
--
Jason L. Tibbitts III - tibbs@uh.edu - 713/743-3486 - 622PGH
System Manager: University of Houston Department of Mathematics
1994 PC800 "Kuroneko" DoD# 1723
------------------------------
Date: Tue, 29 Jul 1997 19:51:17 -0600
From: Randal Pittelli <pittelli@ehsct7.envmed.rochester.edu>
To: hjy2@cornell.edu
Subject: Re: Perl behavior on Win32 vs Unix
Message-Id: <870223546.32424@dejanews.com>
Scott, what are you talking about?
system ("copy...") works FINE on 95/NT!
The problem is: replace '/' with '\' !
That should make it work fine, but try '*.*' instead of '*' for
shits-and-giggles.
In article <5rkpcb$r5n$2@mainsrv.main.nc.us>,
scott@lighthouse.softbase.com (Scott McMahan) wrote:
>
> John Yang (hjy2@cornell.edu) wrote:
>
> : system ("cp $PATH_TO_MASTER/cgi/* $PATH_TO_COURSE_CGI/");
> : # system ("copy c:/inetpub/wwwroot/master/cgi/*
> : c:/inetpub/scripts/courses/nttest/");
>
> : The first line is the one we used for the unix machine, the bottom line
> : is what I think it should be for the WinNT machine. It does not seem to
> : work.
>
> Remember copy is built into the command interpreter. system doesn't
> use the command interpreter. Either use xcopy, a real program, or
> cmd /c in front of copy.
>
> Scott
-------------------==== Posted via Deja News ====-----------------------
http://www.dejanews.com/ Search, Read, Post to Usenet
------------------------------
Date: 29 Jul 1997 21:43:37 +0000
From: shields@crosslink.net (Michael Shields)
Subject: Re: Poetry questions
Message-Id: <g6u3hdzg9f.fsf@daedalus.crosslink.net>
toutatis@remove.this.toutatis.net (Toutatis) writes:
> Another one:
> $var = $long->{'variable'}->{'name'} ? $long->{'variable'}->{'name'} : "nope";
> Is there a way so I don't have to write that long variable name twice?
$var = $long->{'variable'}->{'name'} || "nope";
--
Shields, CrossLink.
------------------------------
Date: Wed, 30 Jul 1997 12:37:16 +0100
From: Simon Fairey <sfairey@adc.metrica.co.uk>
Subject: Re: regexp problems:(
Message-Id: <33DF276B.85631DEE@adc.metrica.co.uk>
Paul Vermette [NiD/BiM] wrote:
> Jeff Eidsness (jeidsnes@tekchek.com) wrote:
> : I'm having much difficulty and think i'm retarded, cause i've not
> been
> : able to find anything in the camel book regarding this. I can't be
> the
> : only person with this problem.
>
> : I'm working with HTML files, and i'll do a s/// like:
>
> : $foo=~s/\<(some wierd tag)\>/$1/g;
>
> I know that perl can also parse files by words, you can changed the
> variable which defaults on reading input to \n, you could change this
> to
> space, I cannot remember the name of the variable off hand.
Its $/ for the input record seperator and $\ for the output record
seperator ( in case anyone wants to know ). Also be careful to reset it
afterwards in case you read files later in the script and want the
normal line by line input.
> You also have
> to be sure when your trying to remove tags that they do not go off to
> the
> next line,
You could always read the file into one string and then process it as a
multi-line string, can't remember the exact syntax ( s///m ) but its all
there in the perlop manpage and there are undoubtedly examples in the
FAQ at http://www.perl.com/FAQ.
Simon
------------------------------
Date: 30 Jul 1997 11:09:57 GMT
From: e5ir@jupiter.sun.csd.unb.ca (Paul Vermette [NiD/BiM])
Subject: Re: regexp problems:(
Message-Id: <5rn7e5$3hs@sol.sun.csd.unb.ca>
Jeff Eidsness (jeidsnes@tekchek.com) wrote:
: I'm having much difficulty and think i'm retarded, cause i've not been
: able to find anything in the camel book regarding this. I can't be the
: only person with this problem.
: I'm working with HTML files, and i'll do a s/// like:
: $foo=~s/\<(some wierd tag)\>/$1/g;
I know that perl can also parse files by words, you can changed the
variable which defaults on reading input to \n, you could change this to
space, I cannot remember the name of the variable off hand. You also have
to be sure when your trying to remove tags that they do not go off to the
next line, what you may want to do is
change the variable to default to spaces when reading in
while !eof(HTMLFILE)
if < found then
while (> not found)
end while
else
print stuff
end if-else
end while
This is just a basic psedo code idea.. but you can get the idea.
When writing code always think of all possibilities which you can run
into.
'''
(o o)
.---------oOOO---(_)------------------.
| Paul Vermette [NiD/BiM] |
| e5ir@unb.ca |
| B O D i E S i N M o T i O N |
`----------------------oOOO-----------'
|__|__|
|| ||
ooO Ooo
------------------------------
Date: Wed, 30 Jul 1997 00:44:38 GMT
From: hyg@cpcw.com (Cyber Wolf)
Subject: Run PERL Programs in Win95?
Message-Id: <33de8de8.2708290@qns3.qns.net>
Please tell me , How to run PERL programs in win95? I have "Win Perl
4.0",but how to run CGI in it? Thanks a lot !!!
CyberWolf
------------------------------
Date: 29 Jul 1997 18:47:54 GMT
From: felix@crowfix.com (Felix Morley Finch)
Subject: Seeking more fonts for use with GD, or ...?
Message-Id: <slrn5tsems.rpe.felix@crowfix.com>
I've used GD before and like it, but it hasn't got many fonts. I need
to create GIFs with lots of text in different fonts. Has anyone
suggestions on other packages, or on how to add fonts to GD?
--
... _._. ._ ._. . _._. ._. ___ .__ ._. . .__. ._ .. ._.
Felix Finch, scarecrow repairer, rocket surgeon / felix@crowfix.com
PGP = 91 B3 94 7C E9 E8 76 2D E1 63 51 AA A0 48 89 2F
I've found a solution to Fermat's Last Theorem but I see I've run out of room o
------------------------------
Date: 29 Jul 1997 22:59:06 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <5rlsjq$k6l$1@info.uah.edu>
Following is a summary of articles spanning a 7 day period,
beginning at 19 Jul 1997 09:12:58 GMT and ending at
26 Jul 1997 06:48:17 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^\s{0,3}(?:>|:|\S+>|\+\+)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" e-mail address and name.
- Original Content Rating is the ratio of the original content volume
to the total body volume.
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
- Find the NewsScan junkyard at http://www.cs.uah.edu/~gbacon/clpm/
Excluded Posters
================
perlfaq-suggestions@mox.perl.com
Totals
======
Total number of posters: 452
Total number of articles: 1007 (378 with cutlined signatures)
Total number of threads: 417
Total volume generated: 1655.7 kb
- headers: 683.2 kb (13,833 lines)
- bodies: 895.3 kb (28,693 lines)
- original: 634.3 kb (20,853 lines)
- signatures: 74.7 kb (1,696 lines)
Original Content Rating: 0.7085
Averages
========
Number of posts per poster: 2.2
Number of posts per thread: 2.4
Message size: 1683.6 bytes
- header: 694.8 bytes (13.7 lines)
- body: 910.4 bytes (28.5 lines)
- original: 645.0 bytes (20.7 lines)
- signature: 75.9 bytes (1.7 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
132 218.2 (112.1/ 83.4/ 55.7) Tom Phoenix <rootbeer@teleport.com>
42 78.6 ( 30.5/ 48.0/ 15.7) Simon Fairey <sfairey@adc.metrica.co.uk>
23 45.1 ( 14.8/ 30.3/ 18.9) Tad McClellan <tadmc@flash.net>
20 38.4 ( 10.7/ 21.4/ 13.3) Mike Stok <mike@stok.co.uk>
16 22.3 ( 9.4/ 12.9/ 8.8) M.J.T. Guy <mjtg@cus.cam.ac.uk>
13 21.5 ( 7.7/ 13.8/ 11.7) Nathan V. Patwardhan <nvp@shore.net>
11 21.6 ( 7.3/ 14.3/ 10.1) Ronald L. Parker <ron@farmworks.com>
11 19.3 ( 7.7/ 11.5/ 5.1) Larry D'Anna <ldanna@hotmail.com>
8 11.8 ( 4.7/ 7.1/ 4.4) Aaron Sherman <ajs@lorien.ajs.com>
8 12.8 ( 4.4/ 7.7/ 4.9) Even Holen <evenh@ra.pvv.ntnu.no>
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
218.2 (112.1/ 83.4/ 55.7) 132 Tom Phoenix <rootbeer@teleport.com>
78.6 ( 30.5/ 48.0/ 15.7) 42 Simon Fairey <sfairey@adc.metrica.co.uk>
45.1 ( 14.8/ 30.3/ 18.9) 23 Tad McClellan <tadmc@flash.net>
38.4 ( 10.7/ 21.4/ 13.3) 20 Mike Stok <mike@stok.co.uk>
22.3 ( 9.4/ 12.9/ 8.8) 16 M.J.T. Guy <mjtg@cus.cam.ac.uk>
21.6 ( 7.3/ 14.3/ 10.1) 11 Ronald L. Parker <ron@farmworks.com>
21.5 ( 7.7/ 13.8/ 11.7) 13 Nathan V. Patwardhan <nvp@shore.net>
19.3 ( 7.7/ 11.5/ 5.1) 11 Larry D'Anna <ldanna@hotmail.com>
16.3 ( 3.5/ 11.7/ 4.3) 5 "John Bokma" <jbokma@caiw.nl>
13.0 ( 0.9/ 12.1/ 10.4) 1 Jeffrey Kegler <cybersalem@algorists.com>
Top 10 Posters by OCR (minimum of three posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
------ -------------- ----- -------
1.0000 3.2 / 3.2 3 chris@ixlabs.com
1.0000 0.3 / 0.3 3 silvern@vetrol.com
1.0000 1.2 / 1.2 3 Per Kistler <kistler@erdw.ethz.ch>
1.0000 1.9 / 1.9 3 Klaus Foerster <klausf@mucsun.sps.mot.com>
0.9956 0.4 / 0.4 4 "Noone Special" <jpm@iti-oh.comNOSPAM>
0.9893 2.6 / 2.7 3 Chris Nandor <pudge@pobox.com>
0.9854 1.7 / 1.7 3 "Chris Lawless" <chrisl@worktechnology.com>
0.9786 2.9 / 2.9 3 Marius Kjeldahl <marius@funcom.com>
0.9709 0.7 / 0.7 4 Mick Farmer <mick@picus.dcs.bbk.ac.uk>
0.9432 4.1 / 4.4 3 dcd@k12-dev.arc.nasa.gov
Bottom 10 Posters by OCR (minimum of three posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
------ -------------- ----- -------
0.4262 1.3 / 3.1 6 Scott Blanksteen <sibsib@hotmail.com>
0.4166 1.3 / 3.1 3 David Efflandt <efflandt@xnet.com>
0.4036 2.0 / 5.1 7 bkyan@mindcast.com
0.3946 1.0 / 2.5 3 Sean Dougherty <sean@cortex.ama.ttuhsc.edu>
0.3685 4.3 / 11.7 5 "John Bokma" <jbokma@caiw.nl>
0.3584 1.4 / 4.0 7 Bob Wilkinson <b.wilkinson@pindar.co.uk>
0.3581 1.2 / 3.3 3 Charles DeRykus <ced@bcstec.ca.boeing.com>
0.3500 0.8 / 2.2 3 James LewisMoss <dres@dimensional.com>
0.3467 1.2 / 3.5 3 Doug MacEachern <dougm@osf.org>
0.3266 15.7 / 48.0 42 Simon Fairey <sfairey@adc.metrica.co.uk>
Top 10 Threads by Number of Posts
=================================
Posts Subject
----- -------
18 Too many people in this group are arrogant #*(@# (Re: Checking for valid Email...)
14 Checking for valid Email...
13 how to reverse substitution order ?
10 Newbie: Backtracking with regexp
8 Please Help: Pattern Matching
8 Regex: Email format
8 National Medal of Technology: Let's nominate Larry!
8 process handling
7 Q: empty elements in arrays
7 How to call a subroutine from a variable?
Top 10 Threads by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Subject
-------------------------- ----- -------
54.9 ( 15.8/ 35.6/ 19.1) 18 Too many people in this group are arrogant #*(@# (Re: Checking for valid Email...)
32.0 ( 11.1/ 20.0/ 12.6) 14 Checking for valid Email...
24.2 ( 7.8/ 15.9/ 9.8) 10 Newbie: Backtracking with regexp
21.5 ( 9.2/ 10.7/ 6.4) 13 how to reverse substitution order ?
20.3 ( 4.4/ 15.2/ 13.2) 6 Regex: Email address format
13.0 ( 0.9/ 12.1/ 10.4) 1 Shortcut to Expertise [Intel v. Randal Schwartz]
12.8 ( 5.2/ 6.3/ 3.5) 8 National Medal of Technology: Let's nominate Larry!
12.8 ( 6.0/ 6.0/ 4.2) 8 Regex: Email format
12.7 ( 5.0/ 7.3/ 5.6) 7 python envy ?
12.4 ( 5.9/ 6.0/ 3.9) 8 Please Help: Pattern Matching
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
31 comp.lang.perl.modules
11 comp.lang.perl
5 comp.databases.oracle.misc
4 comp.mail.list-admin.software
4 comp.lang.c
4 alt.fan.e-t-b
4 comp.os.linux.misc
3 comp.lang.python
3 de.comp.lang.perl
3 no.perl
Top 10 Crossposters
===================
Articles Address
-------- -------
10 chris@ixlabs.com
7 Jeffrey Kegler <cybersalem@algorists.com>
6 "Dan Connolly" <connolly@w3.org>
4 Michael Fuhr <mfuhr@dimensional.com>
4 JavaFan <javafan@poboxes.com>
4 eatonn@metronet.com
3 Eli the Bearded <usenet-tag@qz.little-neck.ny.us>
3 John D Groenveld <groenvel@cse.psu.edu>
3 Tom Phoenix <rootbeer@teleport.com>
3 Fritz Wittwer <Fritz.Wittwer@tech.ascom.ch>
------------------------------
Date: 30 Jul 1997 04:47:18 GMT
From: "William W Chong" <wchong@worldnet.att.net>
Subject: SybPerl memory leak?
Message-Id: <01bc9ca4$019a72c0$3e2274cf@wchong>
I have a perl daemon that uses SybPerl running
on a Sun Sparc 20. I keep the DB connection open and
noticed on "top" that my daemon gets bigger with
each transaction. I tracked it down to $db->dbnextrow
and believe it's holding references internally.
Has anyone else noticed this? And is there a way
that I can free that memory inside Sybperl?
Thanks.
Will
wchong@svip.com
------------------------------
Date: Wed, 30 Jul 1997 10:06:35 -0600
From: mpeppler@mbay.net
To: wchong@worldnet.att.net
Subject: Re: SybPerl memory leak?
Message-Id: <870271090.31285@dejanews.com>
In article <01bc9ca4$019a72c0$3e2274cf@wchong>,
"William W Chong" <wchong@worldnet.att.net> wrote:
>
>
> I have a perl daemon that uses SybPerl running
> on a Sun Sparc 20. I keep the DB connection open and
> noticed on "top" that my daemon gets bigger with
> each transaction. I tracked it down to $db->dbnextrow
> and believe it's holding references internally.
> Has anyone else noticed this? And is there a way
> that I can free that memory inside Sybperl?
Which version of sybperl? There is a known memory leak in 2.05 when
compiled with the -DO_TIE option, but I am not aware of any leaks in
later versions (except for running a connect/disconnect loop).
Michael
-------------------==== Posted via Deja News ====-----------------------
http://www.dejanews.com/ Search, Read, Post to Usenet
------------------------------
Date: Tue, 29 Jul 1997 18:04:33 GMT
From: faust@wwa.com (Faust Gertz)
Subject: Re: Too many people in this group are arrogant #*(@# (Re: Checking for valid Email...)
Message-Id: <33de2c90.1571074@news.wwa.com>
On Tue, 29 Jul 1997 01:13:24 GMT, abigail@fnx.com (Abigail) wrote:
>++ Providers don't teach people
>++ to go to news.answers before starting to use USENET.
>
>Because that isn't a providers task.
Maybe it should be a provider's task or perhaps a provider should say
only people who are qualified to use the technology will be allowed to
use our services. For the rare exception, I can usually killfile
anyone from aol.com and ix.netcom.com. If more providers fired their
users and drove them to AOL and Netcom, we could just put those
addresses in our killfiles. Of course, I know the economics of the
situation will not allow for this. :-)
>Does you shoe sales man teach you how to walk?
You don't need to walk to purchase or have a use for shoes.
>Does your car dealer give you driving lessons?
You need a license to drive a car. Granted, this has not solved the
problem of bad drivers, but I imagine it would be worse without
requiring a license to drive.
>Does your grocery store give cooking classes?
My grocery store has a section where the food is pre-made so all I
have to do is take it home, but if I want to be a cook at a
respectable place, I will have to get some sort of certification.
Even beer slinging bartenders need a license.
>Can learn how to read at the post office?
No, but if I can't address it, they won't deliver it. Also, all that
is sent through the post office is not necessarily for reading.
Most people are terminal fools, myself included, and do not deserve
the privilege of posting to Usenet.
Streben nach Wahrheit
Faust
BTW... This message is off-topic and in violation of the posting
guidelines specified in the FAQ. :-)
------------------------------
Date: Tue, 29 Jul 1997 22:27:32 GMT
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: Too many people in this group are arrogant #*(@# (Re: Checking for valid Email...)
Message-Id: <Pine.A41.3.95a.970730002411.20134D-100000@sp049>
On 29 Jul 1997, John Bokma wrote:
> What I ment, referring to the FAQ because someone thinks it is in the
> FAQ (see previous posting,
> where I stated that someone referred to the FAQ whilst the original
> poster stated clearly that his
> problem was different from the one in the FAQ...)
You said as much before, and that point was noted and the discussion
moved on.
If you want to take us back to that point and debate whether that
one mistake makes the whole FAQ concept invalid, then you can, if
you want. I don't think you'll find too many worthwhile supporters.
------------------------------
Date: 30 Jul 1997 12:05:26 GMT
From: lparillo@newshost.li.net (Parillo)
Subject: Re: Too many people in this group are arrogant #*(@# (Re: Checking for valid Email...)
Message-Id: <5rnam6$q8r$1@news01.li.net>
I did not find the FAQ in the WIN32 distribution (though I have found it
on the net). Also on the subject of documentation, the HTML man pages do
not have as many links as an older version did. Last, on this thread,
another common response is to grep the man pages. That response is
difficult to understand if the user has no unix experience.
BTW, my release is:
C:\WINDOWS>perl -v
This is perl, version 5.003_07
Copyright 1987-1996, Larry Wall
+ suidperl security patch
Win32 port Copyright (c) 1995-1996 Microsoft Corporation.
All rights reserved.
Developed by ActiveWare Internet Corp., http://www.ActiveWare.com
Perl for Win32 Build 306 - Built 17:50:28 Apr 10 1997
Perl may be copied only under the terms of either the Artistic License or
the
GNU General Public License, which may be found in the Perl 5.0 source kit.
Clay Irving (clay@panix.com) wrote:
: In <EDwIJI.Hto@nonexistent.com> abigail@fnx.com (Abigail) writes:
: >You forgot to mention that the perl faq comes with the perl distribution.
: I always forget to look under my nose...
: --
: Clay Irving <clay@panix.com> http://www.panix.com/~clay/
------------------------------
Date: 29 Jul 1997 19:02:48 GMT
From: neilb@zetnet.co.uk (Neil Briscoe)
Subject: Re: Unix time, local time, year 2000 question.
Message-Id: <memo.19970729200247.5403B@skep.compulink.co.uk.cix.co.uk>
In article <EE23qL.6rL@nonexistent.com>, abigail@fnx.com (Abigail) wrote:
> Well, if it isn't already keeling over and dying, I suspect
> you will be save in 2000.
>
> What makes you think $year += 100; and $year = "19$year";
> are anywhere near equivalent?
>
>
I don't.
> If you want to be correct, now and in the year 2000, use $year += 1900.
>
That is indeed what I used. I merely made a typo in my posting on Sunday
- oh, and thanks, Abigail, for the test you posted on Sunday. No, it
wasn't hard.
[snip]
Don't any of you experts ever make typos?
Regards
Neil
------------------------------
Date: 29 Jul 1997 21:38:47 GMT
From: kgikaren@aol.com (Kgikaren)
Subject: US-NC Web Developer with PERL exp
Message-Id: <19970729213800.RAA26592@ladder02.news.aol.com>
I am looking for people with functional and technical experience at all
levels for the following positions: (this is a partial listing of the
positions I have open)
Scientific Applications Programmer/Analyst - Requires exp with IBM
mainframe
and PC's. FOCUS, SAS, AND JCL.
Database Administrator (Oracle) - Provide second level support to local
and
regional Oracle database administrators.
Consultant - Database Design - Requires exp. with PC's, Powerbuilder,
Windows
3.1, DOS and Oracle.
Sr. Database Designer (ADABAS) - exp. with PC's, ADABAS, Natural, SAL,
RDBMS,
and MVS.
Sr. Operating Systems Programmer - 5 yrs exp. Working knowledge of UNIX
(DEC), Intel based PC's, PERL, Unix Scripting, CGI, HTML, Digital Unix,
DOS,
Windows, Netscape Enterprise Server.
Business Applications Consultant (Powerbuilder) - Develop, test, install
and
document enhancements and provide user support for imaging systems. 5+ yrs
exp.
Sr. Systems Analysis (UNIX) - Responsible for central UNIX data center
planning activities for varied UNIX-based computer platforms, including
strategy development for intranet/internet deployment and mgmt.
Web Page Developer - Develop and maintain Internet web pages. Must have
HTML, CGI, PERL in PC and UNIX environments.
SAS Programmer - 5+ yrs SAS (AF, FSP, SCL, GRAPH) and CGI, PERL and UNIX.
Will integrate SAS and web technologies.
Lead Network Engineer - Develop, monitor and manage Novell. Assist
evaluation/implementation of fuctional interface between NerveCenter &
Remedy. 8-10 yrs related experience.
Consultant Operating Systems - Research software installation requirements
and develop testing and implementation plan. Requires 7-8 yrs exp with
IBM
mainframe, MVS, JCL, Clist, REXX, SMPE, O/S, MVS/ESA and JES
For immediate consideration forward a copy of your resume to:
Karen Servance, Corporate Recruiter
The Kelton Group
www.keltongroup.com
919-851-4064 phone 919-859-3561 fax
kgikaren@aol.com
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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.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 794
*************************************
