[13946] in Perl-Users-Digest
Perl-Users Digest, Issue: 1356 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Nov 12 00:10:33 1999
Date: Thu, 11 Nov 1999 21:10:17 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <942383417-v9-i1356@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Thu, 11 Nov 1999 Volume: 9 Number: 1356
Today's topics:
Re: Outputting to a printer from Perl? (Win32) (Kragen Sitaker)
Re: Parsing a simple script language <randys@NOSPAMamigo.net>
Re: Perl Interpreter in Java (Kragen Sitaker)
Perl man page translation <jlhuang@csie.nctu.edu.tw>
Re: Perl parseing <vincent.murphy@cybertrust.gte.com>
Re: Perl parseing <lr@hpl.hp.com>
Re: Perl Parsing <lr@hpl.hp.com>
Perl,MySQL,PHP,Servlets, and more <scotty@useractive.com>
Re: Please Perl, do what I ask !! (Tad McClellan)
printing a number with 3 digits <gs_ananth@ti.com>
Re: printing a number with 3 digits (Martien Verbruggen)
Re: printing a number with 3 digits (Maurice E. Jarrell)
Re: Problems using $^O and $Config{'archname'} (Kragen Sitaker)
Re: Problems using $^O and $Config{'archname'} (Martien Verbruggen)
Re: Senior Software Engineer (Perl)-Positions Available (Craig Berry)
Re: Senior Software Engineer (Perl)-Positions Available (Craig Berry)
Re: Senior Software Engineer (Perl)-Positions Available (Martien Verbruggen)
Re: Senior Software Engineer (Perl)-Positions Available (Tad McClellan)
Re: Senior Software Engineer (Perl)-Positions Available (Iain Chalmers)
Re: Senior Software Engineer (Perl)-Positions Available (Jerome V. Braun)
Re: Senior Software Engineer (Perl)-Positions Available (Martien Verbruggen)
Re: Senior Software Engineer (Perl)-Positions Available (Eric Bohlman)
Re: Some more questions on modules' usage (Kragen Sitaker)
Re: Some more questions on modules' usage <randys@NOSPAMamigo.net>
Re: Some more questions on modules' usage (Kragen Sitaker)
Style Sheets crash netscape <mryan@kc4.so-net.ne.jp>
Re: substitution: $& equals replaced text (Thunderdust (TomH))
Re: to write a BAT/PERL script to lock the windowsNT fi (Kragen Sitaker)
Why does print only prints to STDOUT when mirranda@my-deja.com
Re: Why does print only prints to STDOUT when (Kragen Sitaker)
Win32::ODBC trouble (eats memory) (remove)net (Chris V.)
Re: Win32::ODBC trouble (eats memory) <lr@hpl.hp.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 12 Nov 1999 03:59:29 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Outputting to a printer from Perl? (Win32)
Message-Id: <BgMW3.343$YI2.17728@typ11.nn.bcandid.com>
In article <R%FW3.7704$L5.88689@c01read02-admin.service.talkway.com>,
joneill <joneill@pgicompanies.com> wrote:
>I consider myself to be an advanced novice, and Perl has done many
>wonderful tasks for me in the past year. One of the things I've never
>figured out is how to output to a printer from a perl program -- even
>in line mode.
This depends on your OS. On MS-DOS or Unix, you can open the print
device (/dev/lp0, /dev/lp1, PRN:, LPT1:, or whatever) for write, just
like an ordinary file, and send bytes to it. Make sure you send a
carriage return *and* a line feed at the end of each line if you need
to.
>Question:
>1) Is there a simple way to redirect output to a printer device?
>* if so -- is there a module/package that will allow me to transcend
>the line mode of printing? (able to use TrueType fonts, all points
>addressable, etc.)
For transcending the line mode, you need a printer driver. The
traditional way to do this on Unix is to pipe stuff, in PostScript or
plain text, to lpr or lp; I don't know what the traditional way on
other systems is.
>* if no -- what is the usual method for people to print documents from
>Perl?
Me, I write PostScript.
>p.s. I'm getting to the skill level where I might be able to answer
>some of the easier questions posted(I feel like I should; so many
>people have helped me along the Perl Way). Are there any guidelines I
>need to follow? (I think I've heard the term Usenet [guidelines])
For guidelines: see news.announce.newusers.
Advice on answering questions:
- test your answer before sending it if possible.
- stop answering if you get too burned out.
- even if your answer works when testing, check the relevant docs,
especially the faq. They may remind you of something important you
should mention, point out that your answer is poor, or point out that
your answer is wrong.
- refer people to the relevant docs even if providing your own answer,
if they exist, so they can learn more.
- try to have a net positive effect. if people spend more time
correcting you than they save by not having to answer questions you
do, you may not be having a net positive effect.
If it sounds like posting like this takes a while, well, it does. I
try to do it, but sometimes I skimp, and then people get irritated.
Perhaps we should have this in the Perl FAQ?
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Thu, 11 Nov 1999 20:19:52 -0700
From: "Randy Smith" <randys@NOSPAMamigo.net>
Subject: Re: Parsing a simple script language
Message-Id: <382b342a@news.amigo.net>
PHP3 does most of that stuff already. You could use that to do the control
things (assuming your server supports PHP3) and just modify PHP3 templates.
You might try using something like HTML:embperl to embend perl right into
your html. You could also try generating the pages dynamically in your perl
but that may be a little much.
Randy
Thomas Åhlen <thomas2@dalnet.se> wrote in message
news:80d7bo$1hq$1@gordon.dalnet.se...
: Howdy!
:
: I have made a perl package that parse an html template and inserts data
from
: an MySql database.
: To make things a bit dynamic i have made a little script language which i
: insert in the templates.
: Well it might look something like this:
:
: <html>
: @@product_group@@
: <table>
: <!--products_LOOP_START-->
: <tr>
: <!--A_IF product_price > 100 -->
: <td>@@product_name@@</td><td>@@product_description@@</td>
: <!--A_IF_END-->
: <!--A_ELSE-->
: <td
: color="ff0000">@@product_name@@</td><td>@@product_description@@</td>
: <!--A_ELSE_END-->
: </tr>
: <!--products_LOOP_STOP-->
: </table>
: </html>
:
: Currently i use regular expressions to match the blocks and do the
: insertion.
: But i don't like it. If i want to insert some new functionality there will
: be
: some regs. to change an it doesn't feel good or dynamic.
:
: Someone with experience with this kind of problem.
: What is the best way to make a simple parser that handles nested
: if, elsif och elses and some other homebrewed tokens.
: Bison, yacc?
:
: We used yacc in school a couple of years ago, I hardly remeber it now.
: Is it worth relearning for the problem described above?
:
: Well all you perl experts how do you do it..:)
:
: Over and out.
: Thomas Åhlen
:
:
------------------------------
Date: Fri, 12 Nov 1999 04:45:32 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Perl Interpreter in Java
Message-Id: <MXMW3.497$YI2.23681@typ11.nn.bcandid.com>
In article <80em0d$bth$1@news.netvision.net.il>,
Nimrod Shaulski <nimi@sd.co.il> wrote:
>I'm looking for a perl interpreter written on Java (so I can activate
>scripts from inside my Java application).
>Does anyone know something about it?
JPL will let your Java application interact with the regular
written-in-C Perl interpreter. bkuhn@ebb.org is working on a compiler
backend that will let you run your Perl scripts on Java, but it won't
be usable for months at least.
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: 12 Nov 1999 03:23:08 GMT
From: Jiun-Long Huang <jlhuang@csie.nctu.edu.tw>
Subject: Perl man page translation
Message-Id: <80g16s$ho1$1@netnews2.csie.nctu.edu.tw>
Hello all:
I am planning to translate perl man pages into chinese. I wonder that
whom should I inform before translation. Thanks in advanced.
Jiun-Long Huang
------------------------------
Date: Fri, 12 Nov 1999 02:37:23 GMT
From: Vincent Murphy <vincent.murphy@cybertrust.gte.com>
Subject: Re: Perl parseing
Message-Id: <xjg3duce8pp.fsf@gamora.ndhm.gtegsc.com>
>>>>> "teknik2000" == teknik2000 <teknik2000@my-deja.com> writes:
teknik2000> I am trying to split up the following string -
teknik2000> &time=1999.11.03.13.03.12&X_PREF=_tst1&CT_AMID=34&
teknik2000> DB_DATA=Alphabet|3_5
teknik2000> I information I require is between the "=" and
teknik2000> the follwing "&". For example in the above I am
teknik2000> after 4 components:
teknik2000> 1999.11.03.13.03.12
teknik2000> _tst1
teknik2000> 34
teknik2000> Alphabet|3_5
$str='&time=1999.11.03.13.03.12&X_PREF=_tst1&CT_AMID=34&DB_DATA=Alphabet|3_5';
($a,$b,$c,$d ) = ($1, $2, $3, $4)
if $str =~ /=(.*)&.*=(.*)&.*=(.*)&(.*)/;
print qq(a=$a\nb=$b\nc=$c\nd=$d\n);
a=1999.11.03.13.03.12
b=_tst1
c=34
d=DB_DATA=Alphabet|3_5
HTH.
------------------------------
Date: Thu, 11 Nov 1999 19:24:18 -0800
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Perl parseing
Message-Id: <MPG.12952836697d04b098a1e4@nntp.hpl.hp.com>
In article <80fqm9$p26$1@nnrp1.deja.com> on Fri, 12 Nov 1999 01:31:53
GMT, teknik2000@my-deja.com <teknik2000@my-deja.com> says...
> I am trying to split up the following string -
>
> &time=1999.11.03.13.03.12&X_PREF=_tst1&CT_AMID=34&
> DB_DATA=Alphabet|3_5
>
> I information I require is between the "=" and
> the follwing "&". For example in the above I am
> after 4 components:
> 1999.11.03.13.03.12
> _tst1
> 34
> Alphabet|3_5
my @components = /=(.*?)(?:&|$)/g;
Alternately, split on /&/ and then on /=/.
Alternately, use CGI.pm to split up the parameters.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Thu, 11 Nov 1999 19:26:30 -0800
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Perl Parsing
Message-Id: <MPG.129528c1a73f1d9798a1e5@nntp.hpl.hp.com>
In article <80fr0r$p53$1@nnrp1.deja.com> on Fri, 12 Nov 1999 01:37:31
GMT, teknik2000@my-deja.com <teknik2000@my-deja.com> says...
Does Deja.com let one cancel an article after it has been posted? If
so, you should have canceled one of your two posts. This one has
'Parsing' spelled correctly.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Thu, 11 Nov 1999 20:45:39 -0600
From: Scott Gray <scotty@useractive.com>
Subject: Perl,MySQL,PHP,Servlets, and more
Message-Id: <382B7F53.109F5A8@useractive.com>
The ultimate...http://www.useractive.com
------------------------------
Date: Thu, 11 Nov 1999 15:50:30 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Please Perl, do what I ask !!
Message-Id: <slrn82mb0m.va5.tadmc@magna.metronet.com>
On Fri, 5 Nov 1999 09:31:36 -0800, Larry Rosler <lr@hpl.hp.com> wrote:
>[Posted and a courtesy copy mailed.]
>
>In article <3823035b_2@newsread3.dircon.co.uk> on 5 Nov 1999 16:18:35
>GMT, Jonathan Stowe <gellyfish@gellyfish.com> says...
>> Mohammad Akram Ali Mehkri <mehkri@yahoo.com> wrote:
>> >>$ftp = Net::FTP->new($_[0], Timeout => 10, Port => $_[1]);
>> >
>> > I think there should be no spaces arround " => " and the values should be iin
>> > quotes:
>>
>> No thats not it. The '=>' operator implicitly quotes its RH operand and
>> the white space is irrelevant.
>
>That may be so in the UK. But around here the '=>' operator implicitly
>quotes its LH operand. That is why I have never had the courage to
>drive in any of the Commonwealth countries -- people don't know their RH
>from their LH. :-)
So then, what is the difference between Right Have A Nice Day and
Left Have A Nice Day?
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 12 Nov 1999 10:08:14 +0530
From: "G.Ananth Somayaji" <gs_ananth@ti.com>
Subject: printing a number with 3 digits
Message-Id: <rf5yac41g09.fsf@ti.com>
Hi,
I am trying to print a number so that it should always
have only 3 digits. For example 7 should be printed as 007. Looks
sort of a simple task but the solution has evaded me for a couple
of days now.
Thanks in advance
Ananth
--
_ _____________________________________ _
/ )| G. Ananth Somayaji |( \
/ / | Texas Instruments (India) | \ \
_( (_ | Ph : 5099126 email:gs_ananth@ti.com | _) )_
(((\ \>|_/ )_____________________________( \_|</ /)))
(\\\\ \_/ /Intelligence is like underwear,\ \_/ ////)
\ / everyone should have it, \ /
\ _/ but we shouldn't show it off. \_ /
/ / \ \
------------------------------
Date: Fri, 12 Nov 1999 04:47:26 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: printing a number with 3 digits
Message-Id: <yZMW3.211$GC6.7947@nsw.nnrp.telstra.net>
[Please consider shortening your signature to less than the customary
maximum of four lines. Thank you]
On 12 Nov 1999 10:08:14 +0530,
G.Ananth Somayaji <gs_ananth@ti.com> wrote:
> Hi,
> I am trying to print a number so that it should always
> have only 3 digits. For example 7 should be printed as 007. Looks
> sort of a simple task but the solution has evaded me for a couple
> of days now.
Did you know that every installation of Perl comes with an enormous
amount of documentation? And that you can access that documentation
with man on Unix, and your HTML browser on Windows? And that there is
a perldoc command installed as well, which is a bit more
cross platform? That I seem to be stuck asking questions instead of
stating things?
# perldoc -f sprintf
# perldoc -f printf
my $Bond_James_Bond = sprintf "%03d", 7;
And for some more general information:
# perldoc perl
# perldoc perltoc
# perldoc perlfaq
# perldoc perldoc
And it works for modules too:
# perldoc James::Bond
Martien
--
Martien Verbruggen |
Interactive Media Division | If it isn't broken, it doesn't have
Commercial Dynamics Pty. Ltd. | enough features yet.
NSW, Australia |
------------------------------
Date: 11 Nov 1999 22:54:00 -0600
From: mejarrell@worldnet.att.net (Maurice E. Jarrell)
Subject: Re: printing a number with 3 digits
Message-Id: <g0ycb992.fsf@localhost.localdomain>
"G.Ananth Somayaji" <gs_ananth@ti.com> writes:
> I am trying to print a number so that it should always
> have only 3 digits. For example 7 should be printed as 007. Looks
try 'perldoc -f sprintf' at the command line. 'perldoc perl' will
get you a lot of other things to try. Even more are listed in the
FAQ for this group. ( Posted here twice weekly. )
HTH.
--Mo
------------------------------
Date: Fri, 12 Nov 1999 04:09:17 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Problems using $^O and $Config{'archname'}
Message-Id: <NpMW3.376$YI2.20423@typ11.nn.bcandid.com>
In article <80fc2n$82g$1@isrv1.hbocvan.com>,
Tony White <whian03@bellsouth.net> wrote:
>I've tried using $^O and $Config('archname'} on an HP/UX machine and on an
>NT machine. The $^O works on the NT machine, but not on the HP/UX machine.
>$Config{'archname'} doesn't work on either machine. Does anybody know why?
"doesn't work"?
>BTW, I'm using ActiveState Perl 5.005_02 build 507 on NT and various
>versions of Perl on HP/UX machines (one is 4.0.1.8 and the other is 5.003).
There is no 4.0.1.8. Perhaps you mean 4.018. I think $^O is younger
than that.
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Fri, 12 Nov 1999 04:29:36 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Problems using $^O and $Config{'archname'}
Message-Id: <QIMW3.206$GC6.7810@nsw.nnrp.telstra.net>
On Thu, 11 Nov 1999 16:20:12 -0500,
Tony White <whian03@bellsouth.net> wrote:
> I've tried using $^O and $Config('archname'} on an HP/UX machine and on an
> NT machine. The $^O works on the NT machine, but not on the HP/UX machine.
> $Config{'archname'} doesn't work on either machine. Does anybody know why?
Of course it works. $Config{'archname'} is just an entry in the hash
%Config. What exactly do you mean with doesn't work? There is no
value?
For ActiveState 519 (perl 5.005_03) [*]
C:\DOS\MENU\NT> perl -MConfig -wle "print $Config{archname}"
MSWin32-x86-object
C:\DOS\MENU\NT> perl -wle "print $^O"
MSWin32
On Solaris (5.005_03, and 5.004_04):
$ perl -wle 'print $^O'
solaris
$ perl -MConfig -wle 'print $Config{archname}'
sun4-solaris
I don't have a HP-UX box here to demonstrate it on that, but I'm sure
you can type that in yourself.
If it doesn't work for you, then your installations are broken.
Especially if the $^O doesn't work.
> As I understand it, $^O is simply the equivalent of 'uname -s' on UNIX
> boxes - it's very strange that it works on an NT box, but not on a UNIX box.
Not exactly equivalent. uname -s on Solaris returns SunOS, and that's
what it should return.
> BTW, I'm using ActiveState Perl 5.005_02 build 507 on NT and various
> versions of Perl on HP/UX machines (one is 4.0.1.8 and the other is 5.003).
All out of date versions. Especially the 4.018 (which, btw, doesn't
even have $^O, unless I'm mistaken). You should really upgrade all of
them, especially if they are broken, as your post seems to suggest.
4.018 has been dead so long, there is no more left than some dust and
memories.
5.003 still has a few flaps of rotting meat on it.
5.005_02 is just cold, but still dead.
# man perlhist
[snip]
4.011..18 1991-Nov-05
4.019 1991-Nov-11 Stable.
^^^^!!!!
[snip]
5.003 1996-Jun-25 Security release.
What other software of 8 years old are you running?
Martien
[*] And before anyone points out that that is a dead version as well:
not my machine, it's not used for production, and it's NT, so I don't
care :)
--
Martien Verbruggen |
Interactive Media Division | The gene pool could use a little
Commercial Dynamics Pty. Ltd. | chlorine.
NSW, Australia |
------------------------------
Date: Fri, 12 Nov 1999 02:26:07 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Senior Software Engineer (Perl)-Positions Available
Message-Id: <s2mulvashsq52@corp.supernews.com>
David Winsen (david@hotjobs2000.com) wrote:
: Technical-Qualifications-and-Skills:
..Must be able to run tr/-/ / over output from resume db.
--
| Craig Berry - cberry@cinenet.net
--*-- http://www.cinenet.net/users/cberry/home.html
| "They do not preach that their God will rouse them
a little before the nuts work loose." - Kipling
------------------------------
Date: Fri, 12 Nov 1999 02:33:03 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Senior Software Engineer (Perl)-Positions Available
Message-Id: <s2mv2vi1hsq93@corp.supernews.com>
Eric The Read (emschwar@rmi.net) wrote:
: Since when did
:
: Newsgroups: comp.lang.perl.misc
:
: have a resume, or credentials of any kind?
Actually, I found myself picturing an attempt to hire, as a group, every
reader of clpm. Solve all your staffing problems in one simple step!
And picture our composite resmue..."Approximately 50,000 years of Perl
experience, in every conceivable industry and application."
: > HTES is an established national Executive
: > Search and Consulting Firm who has been serving the High Tech Industries for
: > over 25 years.
:
: That's nice, dear.
Suggested slogan rewrite: "Serving high tech since it was low tech."
--
| Craig Berry - cberry@cinenet.net
--*-- http://www.cinenet.net/users/cberry/home.html
| "They do not preach that their God will rouse them
a little before the nuts work loose." - Kipling
------------------------------
Date: Fri, 12 Nov 1999 03:26:27 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Senior Software Engineer (Perl)-Positions Available
Message-Id: <DNLW3.171$GC6.7199@nsw.nnrp.telstra.net>
On 11 Nov 1999 14:27:31 -0700,
Eric The Read <emschwar@rmi.net> wrote:
> "David Winsen" <david@hotjobs2000.com> writes:
> > Senior Software Engineer (Perl)-Positions Available
> > URGENT MESSAGE!
>
> To you, maybe. The vast majority of us could care less.
No, actually, I couldn't :)
Martien
--
Martien Verbruggen |
Interactive Media Division | Hi, John here, what's the root
Commercial Dynamics Pty. Ltd. | password?
NSW, Australia |
------------------------------
Date: Thu, 11 Nov 1999 16:18:13 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Senior Software Engineer (Perl)-Positions Available
Message-Id: <slrn82mckl.va5.tadmc@magna.metronet.com>
[ posted, and emailed (as most spammers do not actually read the
newsgroups that they spew to...)
]
On Thu, 11 Nov 1999 12:57:06 -0800, David Winsen <david@hotjobs2000.com> wrote:
>Senior Software Engineer (Perl)-Positions Available
>
>URGENT MESSAGE!
^^^^^^^^^^^^^^
Thanks for the clue.
You could have just said:
"I don't know what I'm doing here on Usenet."
which is how all of the usenauts will read "urgent".
Because propogation of Usenet articles can take hours or even
days.
If it is truly urgent, then you will likely already be dead
before the message even arrives.
No sense answering a dead guy.
If it is not truly urgent, then you are a liar, and are
subject to ignoration (or worse).
>From: David Winsen - Senior Consultant - High Technology Executive Search
>(HTES)
>
>We have an out-dated copy of your resume in our database or have viewed your
>credentials on the internet.
You have seen resumes/credentials for all of the
*tens of thousands* of people that you sent this to?
And you still cannot fill the positions?
Remarkable!
>We are confidentially pre-screening top candidates for the following
^^^^^^^^^^^^^^
Oh. You are not going to find them here in clpmisc, as they
have (nearly?) all been driven away from participating here
because of the flood of off-topic posts here.
Like yours.
clpmisc is for the discussion of the Perl programming language.
newsgroups with "jobs" in their names are for job postings.
Displaying to tens of thousands of potential candidates that
you are an Internet Abuser seems counter-productive to
recruitment...
>...Experience-with-application-and-database-servers.
>...A-proven-track-record-in-software-development.
>...Knowledge-and-experience-with-Unix-and-Windows-NT.
>...Sound-knowledge-of-product-development-cycle.
>...Experience and appreciation of international software development and an
>understanding-of-the-issues-is-a-major-plus.
Boy,-you-sure-do-type-funny.
>If you are interested,
Good one!
> please E-mail me in MS Word 95-98 a recent copy of
>your resume
Oh, so you don't want any Unix programmers then?
I thought it was "Windows 95/98" ("Operating" systems),
and "Word 95/97" (Word Processors).
I dunno what "Word 95-98" might represent...
>We
>are looking forward to working with you now and in the future.
Many folks don't want to work with people who abuse usenet,
which is going to leave you out. Oh well.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Fri, 12 Nov 1999 14:52:53 +1100
From: bigiain@mightymedia.com.au (Iain Chalmers)
Subject: Re: Senior Software Engineer (Perl)-Positions Available
Message-Id: <bigiain-1211991452530001@bigman.mighty.aust.com>
Tad wrote:
> I thought it was "Windows 95/98" ("Operating" systems),
> and "Word 95/97" (Word Processors).
>
> I dunno what "Word 95-98" might represent...
Well, that'd be Word -3, which (obviously) means Word 1897 :-)
big
(who can't remember if that version came with the lead smelter & moveable
type, or the hammer & chisel)
------------------------------
Date: 11 Nov 1999 20:33:41 +0000
From: jerome.braun@kmri.com (Jerome V. Braun)
Subject: Re: Senior Software Engineer (Perl)-Positions Available
Message-Id: <wk1z9w22fu.fsf@kmri.com>
Hi!
My abject apologies for adding to the wasted bandwidth,
for those who will see my canceled post.
I had thought I was forwarding the message to someone who
was wondering why people get so exercised about spam.
--
Jerome V. Braun
------------------------------
Date: Fri, 12 Nov 1999 04:38:11 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Senior Software Engineer (Perl)-Positions Available
Message-Id: <TQMW3.209$GC6.7939@nsw.nnrp.telstra.net>
On 11 Nov 1999 20:05:58 +0000,
Jerome V. Braun <jerome.braun@kmri.com> wrote:
> I got a chuckle out of this Usenet reply to an
> inappropriate recruitment post...
[snip of complete quote of post that made poster chuckle]
Euhmm.. So, you post a followup without attribution, quoted in
jeopardy style, and with the complete quoted post, including
signature, contained in it?
I sure hope that you were trying to email this to someone else, and
you accidentally posted, because otherwise it's off to
news.announce.newusers with you to read the FAQ :)
The irony of chuckling over a flame on Usenet abuse this way is a
bit... well... ironic.
Martien
--
Martien Verbruggen |
Interactive Media Division | Useful Statistic: 75% of the people
Commercial Dynamics Pty. Ltd. | make up 3/4 of the population.
NSW, Australia |
------------------------------
Date: 12 Nov 1999 04:39:13 GMT
From: ebohlman@netcom.com (Eric Bohlman)
Subject: Re: Senior Software Engineer (Perl)-Positions Available
Message-Id: <80g5lh$paa$2@nntp1.atl.mindspring.net>
Iain Chalmers (bigiain@mightymedia.com.au) wrote:
: Tad wrote:
: > I dunno what "Word 95-98" might represent...
:
: Well, that'd be Word -3, which (obviously) means Word 1897 :-)
:
: big
:
: (who can't remember if that version came with the lead smelter & moveable
: type, or the hammer & chisel)
Why would it have come with either? Neither was a proprietary Microsoft
technology.
------------------------------
Date: Fri, 12 Nov 1999 03:49:43 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Some more questions on modules' usage
Message-Id: <r7MW3.305$YI2.15672@typ11.nn.bcandid.com>
In article <80f7f6$rsq$1@nntp5.atl.mindspring.net>,
Eric Dew <edew@netcom.com> wrote:
>#----Top of file, list.pl----
>$CO = "/usr/local/bin/co";
>$CI = "/usr/local/bin/ci";
>...
>So, one might imagine doing this in the SomeModule.pm file:
>
>package SomeModule;
>require Exporter;
>[. . .]
>require("list.pl");
>[. . .]
>
>Well, what happens is that the module knows the value of $CO and $CI, but
>the main script loses that information.
require happens once only per script. Some suggestions:
- make list.pl a module and use Exporter to export $CO, $CI, and family;
- make it a module and don't bother to use Exporter -- just refer to
$Ourstuff::CO, $Ourstuff::CI, etc.;
- use do "list.pl" instead of require "list.pl" (see perldoc -f do for
caveats about error-handling);
- use $::CO, $::CI, etc., instead of $CO, $CI, etc., so they end up in
the namespace of package 'main' instead of the namespace of whatever
module first requires them.
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Thu, 11 Nov 1999 20:43:57 -0700
From: "Randy Smith" <randys@NOSPAMamigo.net>
Subject: Re: Some more questions on modules' usage
Message-Id: <382b39cd@news.amigo.net>
[problem description and sample code]
: So the question is, how do I do it right so that both the main script and
: module share the list of variable definitions without one un-doing the
: other?
Try defining the vars you want in a seperate config file and including it.
For example:
mything.conf:
$CO = '/path/to/co';
$CI = '/path/to/ci';
list.pl
require 'mything.conf';
...
SomeModule.pm
require 'mything.conf';
...
There may be better ways to do it but this should bet you started.
Randy
------------------------------
Date: Fri, 12 Nov 1999 04:19:38 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Some more questions on modules' usage
Message-Id: <uzMW3.413$YI2.22149@typ11.nn.bcandid.com>
In article <382b39cd@news.amigo.net>,
Randy Smith <randys@NOSPAMamigo.net> wrote:
>[problem description and sample code]
>: So the question is, how do I do it right so that both the main script and
>: module share the list of variable definitions without one un-doing the
>: other?
>Try defining the vars you want in a seperate config file and including it.
>For example:
>mything.conf:
>$CO = '/path/to/co';
>$CI = '/path/to/ci';
>
>list.pl
>require 'mything.conf';
>...
>
>SomeModule.pm
>require 'mything.conf';
>...
>
>There may be better ways to do it but this should bet you started.
How is this different from the original poster's problem?
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Fri, 12 Nov 1999 13:38:55 +0900
From: Mike Ryan <mryan@kc4.so-net.ne.jp>
Subject: Style Sheets crash netscape
Message-Id: <382B99DF.DE81F06@kc4.so-net.ne.jp>
I am trying to include style sheets in my script but when I call the
script from netscape (4.7) netscape crashes.
Im running Apache 1.3.6 on NT with the latest version of perl.
The file style1.css has the contents
<!--
BLOCKQUOTE {
border: 4px outset;
background: #CC3300;
white-space: pre;
padding: 0.5em;
border-color: #000000 #000000 #000000 #FFFFFF;
border-width: 4px
}
-->
and in my script I have
print $query->start_html(-title=>"Survey",
-meta=>{'keywords'=>'1,2,3,4,5'},
-style=>{-src=>'/style/style1.css'},
-bgcolor=>"#FF9933");
I have tried
-style=>{'src'=>'/style/style1.css'},
and various other combinations but to no avail.
If I comment out this line then my script runs fine.
If save the html output of the script and manualy include the above
style it also works fine.
I have looked through all the faq's and cant find my problem. any help
would be appreciated.
Thanks,
Mike.,
------------------------------
Date: Fri, 12 Nov 1999 02:05:23 GMT
From: beans@bedford.net (Thunderdust (TomH))
Subject: Re: substitution: $& equals replaced text
Message-Id: <382b75a1.10991706@news.bedford.net>
Ignore my stupid response, I obviously misread the question.
On Fri, 12 Nov 1999 01:45:08 GMT, beans@bedford.net (Thunderdust
(TomH)) wrote:
>
>The s operator returns the number of substitutions. Of course if the
...
Schnoodlewinks-constantly leveling up warrior
Fluffy_the_Fly-lvl.7 warrior (x2-don't ask!)
Flame-QFG5 Paladin
------------------------------
Date: Fri, 12 Nov 1999 00:47:56 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: to write a BAT/PERL script to lock the windowsNT file structure
Message-Id: <0tJW3.67390$23.2765651@typ11.nn.bcandid.com>
In article <382B1086.2C262850@cse.unl.edu>,
<##defaultuser##@cse.unl.edu> wrote:
>I am new to perl. Could anyone help me writing a PERL/BAT script to lock
>windows NT file structure. I will be thankful to you.
>Terlapu
>email id: terlapu@hotmail.com
perldoc -f flock
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Fri, 12 Nov 1999 02:25:56 GMT
From: mirranda@my-deja.com
Subject: Why does print only prints to STDOUT when
Message-Id: <80ftri$r4k$1@nnrp1.deja.com>
I am running a perl script inside another perl script.
My program runs the test like
system ( "perl $my_other_perl $logfile);
in $my_other_perl I have a bunch of "print" statements but none of them
get printed in the $logfile.
Any idea?
Thanks,
M.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Fri, 12 Nov 1999 04:37:59 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Why does print only prints to STDOUT when
Message-Id: <HQMW3.451$YI2.24895@typ11.nn.bcandid.com>
In article <80ftri$r4k$1@nnrp1.deja.com>, <mirranda@my-deja.com> wrote:
>I am running a perl script inside another perl script.
>My program runs the test like
>system ( "perl $my_other_perl $logfile);
>in $my_other_perl I have a bunch of "print" statements but none of them
>get printed in the $logfile.
>
>Any idea?
Presumably $my_other_perl isn't opening the logfile and printing to
it. (Are you sure it's running at all?)
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Fri, 12 Nov 1999 02:26:33 GMT
From: zoot@brilliant.(remove)net (Chris V.)
Subject: Win32::ODBC trouble (eats memory)
Message-Id: <38307ac1.9923339@news.alt.net>
I'm using ActivePerl and I'm having a problem with the Win32::ODBC
module, that is: if for example I make an infinte loop and open an
odbc connection within that loop whenever a certain condition occurs,
the module eats away memory every time a connection is being made. a
close doesn't help, only the script terminating frees the used memory.
eg:
use Win32::ODBC;
$fatalerror = 0;
while ($fatalerror ne 1) {
if (mycondition) {
$db = new Win32::ODBC("dsn=mydsn;UID=myuid;PWD=mypw") || last;
$db->Sql("SELECT * FROM whatever");
# snip -- doing some other stuff here
$db->Close;
}
sleep $interval;
}
Is this a bug or am I missing something?
Thanks,
Chris.
------------------------------
Date: Thu, 11 Nov 1999 19:31:38 -0800
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Win32::ODBC trouble (eats memory)
Message-Id: <MPG.129529f0ac43ae2298a1e6@nntp.hpl.hp.com>
In article <38307ac1.9923339@news.alt.net> on Fri, 12 Nov 1999 02:26:33
GMT, remove <zoot@brilliant.> says...
...
> Is this a bug or am I missing something?
You are missing how to use your newsreader to cross-post, instead of
posting the same article twice in two newsgroups.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
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 1356
**************************************