[10019] in Perl-Users-Digest
Perl-Users Digest, Issue: 3612 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Sep 1 23:04:52 1998
Date: Tue, 1 Sep 98 20:00:18 -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 Tue, 1 Sep 1998 Volume: 8 Number: 3612
Today's topics:
Re: [Perl] How to find the Perl FAQ (Martien Verbruggen)
Re: Best way to "reset" $1? (Tad McClellan)
Re: COBOL and Perl (Mark-Jason Dominus)
Re: Currency Formatting in Perl (s//) jmauney@my-dejanews.com
elf version of dld-3.3.tar.gz for Perl5.005_002 (Alan E. Derhaag)
Re: FMTEYEWTK on Switch Statements in Perl (was: No swi <mpersico@erols.com>
Re: Funny, that: $#myarray <uri@sysarch.com>
Re: Help - Perl security problem! (Mark-Jason Dominus)
Re: Help on running perl scripts on MS-DOS (Win NT4 act (Eric Dew)
Re: Help on running perl scripts on MS-DOS (Win NT4 act (Eric Dew)
Re: Help with fork() and pipe() (Mark-Jason Dominus)
Re: Newbie RE Question (Mark-Jason Dominus)
Re: Parsing XML and HTML (was: Re: Better Regular Expre <cberry@cinenet.net>
Re: Parsing XML and HTML (was: Re: Better Regular Expre <rootbeer@teleport.com>
Perl scripts running as NT services <spasnikowski@symantec.com>
Re: Perl scripts running as NT services <nguyend7@msu.edu>
Perl scripts running like NT Service <spasnikowski@symantec.com>
Re: Playing with file handles (Mark-Jason Dominus)
Re: Please help XS newbie with object creation (Tye McQueen)
Problems building threaded perl 5.005 on OSF 4.0d <jure.simsic@uni-lj.si>
Running perl scripts like NT services <spasnikowski@symantec.com>
Re: Source in multiple files [Newbie] <david.corcoran@pss.boeing.com>
Re: Tom Phoenix: ANSWERS WANTED! therobot@vegtabl.com
Re: Tom Phoenix: ANSWERS WANTED! (Norman UNsoliciteds)
Re: Tom Phoenix: ANSWERS WANTED! <mpersico@erols.com>
Re: Tom Phoenix: ANSWERS WANTED! (Andre L.)
Re: US-NY-LI 516 PERL Programmer/Analyst <mpersico@erols.com>
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 02 Sep 1998 01:51:30 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: [Perl] How to find the Perl FAQ
Message-Id: <Cw1H1.13$QN1.4631@nsw.nnrp.telstra.net>
In article <6shp1f$9nh$1@news.ml.com>,
mwang@tech.cicg.ml.com (Michael Wang) writes:
> There is a newer version posted by someone called tchrist dated
Someone called tchrist?
How funny.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | "In a world without fences,
Commercial Dynamics Pty. Ltd. | who needs Gates?"
NSW, Australia |
------------------------------
Date: Tue, 1 Sep 1998 17:41:00 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Best way to "reset" $1?
Message-Id: <s5ths6.9be.ln@metronet.com>
yong (yong@shell.com) wrote:
: Suppose I have m/(string)/ and $1 is set to "string". I can't reset $1
: to "" (which generates an error) or undef it (which is ignored
: silently). There're two awkard ways to "do" this: use another variable
: $tmp=$1 and forget about $1; make a useless match "" =~ m/()/; so $1 is
: "reset" to "". What's the best way?
: BTW, the reason I want to reset $1 is that the match is in a loop, and
: the second time around if there's no match, $1 keeps its original value.
^^^^^^^^^^^^^^^^^^^
^^^^^^^^^^^^^^^^^^^
: I don't want that.
: Any advice is appreciated. Thanks.
And there is your answer.
Check to see if the match succeeded before using $1:
if ( /second match/ ) {
# do something with $1
}
else {
# don't do anything with $1
}
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 1 Sep 1998 22:03:03 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: COBOL and Perl
Message-Id: <6si90n$aju$1@monet.op.net>
In article <6rr7l5$g8q$1@justus.ecc.lu>,
Stefaan A Eeckels <Stefaan.Eeckels@ecc.lu> wrote:
>> COBOL was together with FORTRAN one of the first high level languages.
>> It dates from the late 40's/early 50's. Perl was developped 40 years
>Late fifties, Abigail.
Right. Let's take a moment to remember a brief chapter from the
history of computers.
ENIAC, the world's first large-scale general-purpose electronic
digital computer, was commissioned by the U.S. Navy to solve
ballistics problems for the war that was in progress. It was
delivered in 1946. Whoops.
You programmed the ENIAC with patch cables, by hooking together
various units so that they would sends the numbers to the right other
units. No programming language.
For some reason I find it hard to forget that ENIAC was programmed
with cables, and impossible to forget that it was delivered late for
the war, so I don't forget that there were no programming languages in
1946.
Stored-program computers, such as EDSAC and UNIVAC, were not even in
the planning stages until 1946, and none was completed before 1949.
Programming languages followed. Fortran appeared first; design began
in 1954 and the Fortran I compiler was finished around 1957; Fortran
IV, the language later standardized as Fortran '66, was complete in
1961. Lisp was slightly later; McCarthy began to think about Lisp in
1956, with the first compiler appearing around 1958 or 1959.
COBOL followed soon after, around 1959-1961.
------------------------------
Date: Wed, 02 Sep 1998 01:58:06 GMT
From: jmauney@my-dejanews.com
Subject: Re: Currency Formatting in Perl (s//)
Message-Id: <6si8ne$1ao$1@nnrp1.dejanews.com>
In article <35EC24F2.90DDD0D3@epidigm.geg.mot.com>,
Jeff Davey <jdavey@epidigm.geg.mot.com> wrote:
> S. Kuip wrote:
> > 1 while $amount =~ s/(.*\d)(\d\d\d)/$1,$2/;
> >
> > 1204846335 => 1,204,846,335
> >
>
> Not quite - this only puts the thousands comma delineator in. Anyone
> else?
>From perlfaq5:
=head2 How can I output my numbers with commas added?
This one will do it for you:
sub commify {
local $_ = shift;
1 while s/^(-?\d+)(\d{3})/$1,$2/;
return $_;
}
$n = 23659019423.2331;
print "GOT: ", commify($n), "\n";
GOT: 23,659,019,423.2331
You can't just:
s/^(-?\d+)(\d{3})/$1,$2/g;
because you have to put the comma in and then recalculate your
position.
Alternatively, this commifies all numbers in a line regardless of
whether they have decimal portions, are preceded by + or -, or
whatever:
# from Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
sub commify {
my $input = shift;
$input = reverse $input;
$input =~ s<(\d\d\d)(?=\d)(?!\d*\.)><$1,>g;
return reverse $input;
}
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 01 Sep 1998 20:48:18 -0400
From: aedmis@rsf.dankaind.com (Alan E. Derhaag)
Subject: elf version of dld-3.3.tar.gz for Perl5.005_002
Message-Id: <tzhfyr49wt.fsf@rsf.dankaind.com>
After installing dld-3.3.tar.gz, revising the library list to use
-ldld instead of -ldl and building Perl5.005_002 the DynamLoader
builds properly but the linked modules give a load error when running:
./perl t/harness
in the compile directory. When examining the ldl-3.3 documentation it
refers to library as an a-out link editor. Where is the elf version
that would give the proper dld.h include file? When using the -ldl
flag a number of functions were not resolved (dld_init for one) from
/lib/libld.a ..
------------------------------
Date: Tue, 01 Sep 1998 20:19:28 -0400
From: "Matthew O. Persico" <mpersico@erols.com>
Subject: Re: FMTEYEWTK on Switch Statements in Perl (was: No switch statement in Perl??)
Message-Id: <35EC8F10.D250073F@erols.com>
I guess one purpose of this was to get every possible hit for switches
into Deja News?
:-)
--
#!/usr/bin/perl -- Matthew O. Persico
print "Just Another Perl Neophyte\n";
## Simplicity is a blessing when you're
## supporting the program at 2AM
------------------------------
Date: 01 Sep 1998 22:43:11 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Funny, that: $#myarray
Message-Id: <x71zpv2q0w.fsf@sysarch.com>
>>>>> "TP" == Tom Phoenix <rootbeer@teleport.com> writes:
TP> When you turn on 'use integer', many of Perl's operations are changed to
TP> use different routines. These implement the "same" operation, but use your
TP> system's int type. I put "same" in quotes because these may not be the
TP> integers you expect! Furthermore, some operations are arguably buggy under
TP> 'use integer', such as putting a leading dash on a bareword.
TP> no integer;
TP> %hash = ( -key => 'value' ); # just what you expected
TP> use integer;
TP> %hash = ( -key => 'value' ); # not the same!
i take this as an argument not to use barewords!! i don't like that
style and i consistantly use '' around them.
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
Perl Hacker for Hire ---------------------- Perl, Internet, UNIX Consulting
uri@sysarch.com ------------------------------------ http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
------------------------------
Date: 1 Sep 1998 21:27:33 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Help - Perl security problem!
Message-Id: <6si6u5$aat$1@monet.op.net>
In article <slrn6udp0t.h53.dmr@doug.fc.hp.com>,
Doug <dmr@doug.fc.hp.com> wrote:
>That isn't a warning, is it? I think it's an error.
I use `warning' in its generic sense. It is an admonition, a
prediction of danger, a caution, a red flag, whatever. Whether it
happens to abort the program is irrelevant.
In particular, it is a warning about a potential security hole whose
consequences might be much, much worse than the abortion of the program.
To suppress it without understanding it is imprudent at best.
------------------------------
Date: Wed, 2 Sep 1998 01:38:25 GMT
From: edew@netcom.com (Eric Dew)
Subject: Re: Help on running perl scripts on MS-DOS (Win NT4 actually)
Message-Id: <edewEyMv81.IwL@netcom.com>
In article <35EC00F4.B66AC61E@micron.net> evhendrs@micron.net writes:
>
>
>Eric Dew wrote:
>
>> Hello folks,
>>
>> I've written a perl script for UNIX and need to port it to MS-DOS/Win NT4.0.
>> I've got perl up and running on the NT machine, but I don't know how exactly
>> to get my script to work (as well as some file system questions).
>>
>> On UNIX, the script is run as such:
>> % perlscript -d <date> -r <name>
>>
>> Will I be able to do that straight away on NT, or do I have to say:
>> C:\perl5>perl perlscript -d <date> -r <name>
>> (do I have to rename the script to have a proper suffix, like perlscript.pl?)
>>
>> I understand that I have to run the perl script as a batch file and so I
>> included the following lines to the top of the file:
>>
>> @echo off
>> goto endofperl
>> @rem';
>>
>> and to the end of the file:
>>
>> __END__
>> :endofperl
>
>Ugly!! Forget all this junk. You are no WinNT 4.0, so you can set an ftype and
>assoc.
>
>assoc .pl perl
>ftype perl=c:/perl/bin/perl.exe %0 %0 %*
>
>This will associtate .pl files (you need to rename your script to have .pl
>extenstion) with
>the 'type' perl. And it will declare the action for 'perl' files to run the perl
>interpreter and pass
>is the specified options.
>
>I have found for some strange reason (I'm not sure I'm not making a mistake here)
>that the %0
>argument needs to be specified twice to get the @ARGV array inside perl to be what
>I expect,
>but hey, play with it to make sure on your system.
>
Thanks. Does that mean I remove the top lines (which apparently makes it
a batch process)?
>as far as the rest is concerned, in perl, the "chdir" command understanads drive
>letters,
>even though the dos cd command doesn't. So you can legitimately put:
>
>chdir "f:/foo/bar/bletch";
>
I'll try that.
>and perl will do the right thing. Also, use forward slashes, as backslashes are
>escape characters,
>and have been since about 1960 or so.. Why DOS ever used \ is beyond me!!
>
Thanks for the info.
EDEW
------------------------------
Date: Wed, 2 Sep 1998 01:41:21 GMT
From: edew@netcom.com (Eric Dew)
Subject: Re: Help on running perl scripts on MS-DOS (Win NT4 actually)
Message-Id: <edewEyMvCy.J8B@netcom.com>
In article <35ec6a9a.7762055@news.btinternet.com> Gellyfish@btinternet.com (Jonathan Stowe) writes:
>On Tue, 1 Sep 1998 16:57:36 GMT, Eric Dew wrote :
>
><snip>
>>
>>Once more: if I can just get the thing to run, I'll debug it myself and
>>skip your pansy-ass comments. Can I get a straight answer?
>>
>
>Shut up insulting people for no reason.
>
>If you have pl2bat.bat in you c:\perl\bin directory then read the
>documentation and use it. If you dont then either get a distribution
>that includes it or mail me and I will send it to you.
>
Given the run-around I got for an answer, I felt my response was completely
justified. The other answer from Ed Henderson was much more enlightening
and I responded appropriately there. There was a reason.
EDEW
------------------------------
Date: 1 Sep 1998 21:13:15 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Help with fork() and pipe()
Message-Id: <6si63b$a8e$1@monet.op.net>
In article <6s9gcs$k72$1@nntp1.ba.best.com>,
Malcolm Hoar <malch@malch.com> wrote:
>I have a Perl application where a parent fork()'s multiple
>children and then communicates with them via a pair of
>pipe()'s.
You should really show the code, because without the code I can only
make a vague speculation.
It sounds at though you are making one pipe, and then letting all the
children inherit the same pipe. If this is the case, it's not too
suprising that the data re garbled, because all the children are
yakking into the same pipe at the same time, and maybe their messages
are getting all mixed up. But without the code, I can't be sure.
You either need to use a separate pair of pipes for each child, or you
need to enforce a very rigorous protocol for determining who will read
and who will write and exactly when they will do this, or else you
need to be very clever and know what you are doing.
>Also, is it likely that a socketpair would be more robust
>than the pipe?
I am not going to answer that, because you are barking up the wrong
tree here. I would give you thousand-to-one odds that the problem is
in the construction of your program, not in the system facilities. If
I am right, and it is that your program has a bug, then it does not
matter if the socketpair is more or less reliable than the pipes.
------------------------------
Date: 1 Sep 1998 22:39:57 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Newbie RE Question
Message-Id: <6sib5t$avt$1@monet.op.net>
In article <35E9F258.E23B71BA@sunshine.co.nz>,
Andrew Campbell <andrew@sunshine.co.nz> wrote:
>Is there any way of "deactivating" quantifiers in a regular expression?
Use `index' instead of using a regular expression.
$input = <INPUT>;
chomp $input;
if (index($input, $data) >= 0) {
print "Located your query string in the data.\n";
} else {
print "Not found.\n";
}
------------------------------
Date: Tue, 1 Sep 1998 16:56:20 -0700
From: Craig Berry <cberry@cinenet.net>
To: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Parsing XML and HTML (was: Re: Better Regular Expressions)
Message-Id: <Pine.GSO.3.95.980901164857.1156B-100000@hollywood.cinenet.net>
[posted and cc'd to cited author]
On Tue, 1 Sep 1998, Tom Phoenix wrote:
> There's a lot of bogus HTML out there. For example...
[examples snipped]
> The browser wars became a competition as to who could make the
> best web pages out of bogus HTML. :-P
No argument there.
[snip]
> In any case, XML's standard is much tighter. In particular, it requires
> that the parser choke on bogus code. So any errors should be caught at
> once, and parsers can be much simpler.
Is this economically realistic, though? Won't there be enormous pressure
on browser vendors to provide some 'slop' (per the old Net maxim 'produce
conservatively, consume liberally') to deal with bad XML markup, and for
precisely the same reasons they currently deal with bad HTML markup? The
clueless shall always be with us; thus, bad markup shall be, too.
If totally-XML-compliant browser A rejects half the Web on sight, not even
providing a best-guess rendering, while browser B can display 95% of the
Web with varying loss of content, most users will percieve browser B as
being 'better'. They don't care about standards compliance; they want to
see the Web! I fail to grok how a tighter standard will prevent this very
strong market-acceptance force from eroding the insistence on strictly
correct XML. And soon, the slippery slope will land us right back where
we currently are with HTML.
Or perhaps I'm just a pessimist. :)
And thanks for the XML-support-in-perl comments, btw -- you more or less
confirmed my understanding of the situation.
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| "Ripple in still water, when there is no pebble tossed,
nor wind to blow..."
------------------------------
Date: Wed, 02 Sep 1998 01:02:13 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Parsing XML and HTML (was: Re: Better Regular Expressions)
Message-Id: <Pine.GSO.4.02A.9809011754460.21048-100000@user2.teleport.com>
On Tue, 1 Sep 1998, Craig Berry wrote, quoting me:
> > In any case, XML's standard is much tighter. In particular, it requires
> > that the parser choke on bogus code. So any errors should be caught at
> > once, and parsers can be much simpler.
>
> Is this economically realistic, though? Won't there be enormous pressure
> on browser vendors to provide some 'slop' (per the old Net maxim 'produce
> conservatively, consume liberally') to deal with bad XML markup, and for
> precisely the same reasons they currently deal with bad HTML markup? The
> clueless shall always be with us; thus, bad markup shall be, too.
Of course, XML isn't just for the web. If your XML editor produces bad
XML, your XML spell checker isn't going to be able to work on it. You may
be right that bad markup will always be with us, but there will be good
incentives to make sure every tool produces only good markup. I hope
they'll be good enough.
Of course, we've wandered far away from Perl itself now....
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 1 Sep 1998 16:32:56 -0700
From: "Scott Pasnikowski" <spasnikowski@symantec.com>
Subject: Perl scripts running as NT services
Message-Id: <6si2gr$ka3$1@news2.symantec.com>
Has anyone run Perl scripts as NT services?
I am looking around for docs that might indicate how, but I am not having
much luck.
I'm interested in running some scripts in the background ( when no one is
logged in )
that don't need any UI.
I tried the NT AT command and it seems to start Perl.exe but it won't run my
script.pl.
( brings up "perl.exe" but not "perl myscript.pl" )
Even if this worked I suspect it would barf if nobody was actually logged
into the server.
( Yes it's NT Server )
Any suggestions would be helpful
Spaz
spasnikowski@symantec.com
------------------------------
Date: 2 Sep 1998 00:58:40 GMT
From: Dan Nguyen <nguyend7@msu.edu>
Subject: Re: Perl scripts running as NT services
Message-Id: <6si580$n68$1@msunews.cl.msu.edu>
Scott Pasnikowski <spasnikowski@symantec.com> wrote:
Thank you so much for posting the same thing again.
--
Dan Nguyen | There is only one happiness in
nguyend7@msu.edu | life, to love and be loved.
http://www.cse.msu.edu/~nguyend7 | -George Sand
------------------------------
Date: Tue, 1 Sep 1998 16:42:40 -0700
From: "Scott Pasnikowski" <spasnikowski@symantec.com>
Subject: Perl scripts running like NT Service
Message-Id: <6si2gt$ka3$2@news2.symantec.com>
Has anyone successfully run perl scripts on NT Server like an NT service?
I have been looking all over for docs that might indicate how.
I am interested in running some scripts with no UI needs on an as needed and
continuous basis.
This implies that they have to keep running even if the user at the console
loggs out.
I have tried the NT AT command and it will launch perl.exe but "Perl
myscript.pl" barfs
with a generic error. I also suspect this method would not survive the
admin logging out.
Any suggestions would be helpful.
Spaz
spasnikowski@symantec.com
------------------------------
Date: 1 Sep 1998 21:37:04 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Playing with file handles
Message-Id: <6si7g0$ae5$1@monet.op.net>
In article <6rvjam$vv3$1@phaedrus.zeta.org.au>,
David Parrish <dparrish@gidora.zeta.org.au> wrote:
>Assuming I'm reading a file using <FILEHANDLE>.... how do I push the read line
>back to the stream so the next <FILEHANDLE> will read that same line?
In general, you can't. When I know I'm going to need to unget data,
I sometimes write something like this:
{
my @buffer;
BEGIN { @buffer = (); }
sub getline {
if (@buffer) {
return pop @buffer;
} else {
return scalar <FILEHANDLE>;
}
}
sub ungetline {
push @buffer, @_;
}
}
Then make all the calls through `getline' and `ungetline'.
More sophisticated variations should suggest themselves.
Another strategy: If the data is not too large, just read it all into
an array:
@lines = <FILEHANDLE>;
then operate on the array of lines as much as you want to; use `shift'
to read a line at the beginning and `unshift' to put it back again.
------------------------------
Date: 1 Sep 1998 18:47:51 -0500
From: tye@fumnix.metronet.com (Tye McQueen)
Subject: Re: Please help XS newbie with object creation
Message-Id: <6si137$8mi@fumnix.metronet.com>
Thomas Rock <thomas@x-tekcorp.com> writes:
)
) Could someone please post a snippet of code which shows how to create a
) perl object from within an XSUB? I'd like the object to contain
) pointer(s) to C arrays.
I'd like to strongly discourage you from using that approach.
Instead, have the XSUB return the pointers (and perhaps some other
information that you might need) and write a subroutine in Perl
that creates the object and have the users of your module call
this Perl subroutine. The resulting code will probably be much
easier to understand, debug, and extend.
Use C for the stuff that is easy in C and use Perl for the stuff
that is easy in Perl.
--
Tye McQueen Nothing is obvious unless you are overlooking something
http://www.metronet.com/~tye/ (scripts, links, nothing fancy)
------------------------------
Date: Wed, 02 Sep 1998 00:51:35 +0000
From: Jure Simsic <jure.simsic@uni-lj.si>
Subject: Problems building threaded perl 5.005 on OSF 4.0d
Message-Id: <35EC9697.80A30007@uni-lj.si>
Has anybody gotten this to work. I tried perl 5.005 and 5.005_51 but
failed. I tried with just ./Configure --Dusethreads -des and with
adittional -pthread to ccflags, -pthread to ldflags, -lpthread -lc_r to
lddlflags and native malloc as described in README.threads but make
always breaks at utf8.c. Transcript:
CCCMD = cc -DPERL_CORE -c -pthread -std -fprm d -ieee
-D_INTRINSICS -
I/usr/local/include -D__LANGUAGE_C__ -O4
`sh cflags libperl.a utf8.o` utf8.c
CCCMD = cc -DPERL_CORE -c -pthread -std -fprm d -ieee
-D_INTRINSICS -
I/usr/local/include -D__LANGUAGE_C__ -O4
cc: Error: utf8.c, line 483: In this declaration, the type of
"Perl_to_utf8_uppe
r" is not compatible with the type of a previous declaration of
"Perl_to_utf8_up
per" at line number 644 in file proto.h.
to_utf8_upper(U8 *p)
^
cc: Error: utf8.c, line 494: In this declaration, the type of
"Perl_to_utf8_titl
e" is not compatible with the type of a previous declaration of
"Perl_to_utf8_ti
tle" at line number 645 in file proto.h.
to_utf8_title(U8 *p)
^
cc: Error: utf8.c, line 505: In this declaration, the type of
"Perl_to_utf8_lowe
r" is not compatible with the type of a previous declaration of
"Perl_to_utf8_lo
wer" at line number 643 in file proto.h.
to_utf8_lower(U8 *p)
^
*** Exit 1
Stop.
Any ideas?
Btw, it does build without threads..
Jure
------------------------------
Date: Tue, 1 Sep 1998 16:45:25 -0700
From: "Scott Pasnikowski" <spasnikowski@symantec.com>
Subject: Running perl scripts like NT services
Message-Id: <6si2gt$ka3$3@news2.symantec.com>
I have been looking all over for docs that might indicate how.
I am interested in running some scripts with no UI needs on an as needed and
continuous basis.
This implies that they have to keep running even if the user at the console
loggs out.
I have tried the NT AT command and it will launch perl.exe but "Perl
myscript.pl" barfs
with a generic error. I also suspect this method would not survive the
admin logging out.
Any suggestions would be helpful.
Spaz
spasnikowski@symantec.com
------------------------------
Date: Tue, 1 Sep 1998 23:51:54 GMT
From: David Corcoran <david.corcoran@pss.boeing.com>
To: Raj Subramani <raj.subramani@citicorp.com>
Subject: Re: Source in multiple files [Newbie]
Message-Id: <35EC889A.68FAF994@pss.boeing.com>
in test.pl put:
require 'fileFtp.pl';
Also put a 1 at the end of fileFpt.pl. (modified your original below)
Raj Subramani wrote:
>
> I have written some ftp related subroutines and put them
> in a file called fileFtp.pl (it looks something like this)
> -------------------------
> #!/usr/local/bin/perl
>
> use Net::FTP;
>
> sub openHostForFtp {
> blah blah ..
> }
>
> sub getAsciiFiles {
> blah blah ..
> }
>
> sub quitFtpHost {
> blah blah ..
> }
< 1; # happifier
> -------------------------
>
> Now I need to write a test script in file called (say) test.pl.
> How do I link test.pl and fileFtp.pl when running?
>
> (Apologies if this has been asked 10k times but I have looked
> and found many many possible answers, none of which seem to work).
>
> Thanks in advance.
>
> --
> -raj
------------------------------
Date: Tue, 01 Sep 1998 23:50:58 GMT
From: therobot@vegtabl.com
Subject: Re: Tom Phoenix: ANSWERS WANTED!
Message-Id: <CL%G1.5797$f01.4306123@news.teleport.com>
John Porter <jdporter@min.net> wrote:
>Jerome O'Neil wrote:
>> Nathan V. Patwardhan wrote:
>> > It's just eerie to read multiple
>> > postings from you per day which are almost identical.
>> And every one of them a polite pointer to the answers that
>> the person is looking for.
>Check again. Tom is (almost) always polite, but his answers
>RARELY provide any real insight or direction.
I must disagree. I am a brand new perler, and have been
following up on Tom's pointers: he's spot on. He is polite,
unless you're loaded for irritation. The only better resource
I've found is contained within #!/usrlocal/perl5, vi, and the
shell prompt.
veg
------------------------------
Date: Wed, 02 Sep 1998 09:14:36 +0900
From: No.unsoiliciteds@dead.end (Norman UNsoliciteds)
Subject: Re: Tom Phoenix: ANSWERS WANTED!
Message-Id: <No.unsoiliciteds-0209980914370001@cs11l46.ppp.infoweb.or.jp>
In article <slrn6uom15.g6m.adelton@aisa.fi.muni.cz>, adelton@fi.muni.cz wrote:
> His answers to off-topics of FAQs in 95 % contain the
> proper balance of actual help and note that the poster should use his
> own brain to solve his own problems/task.
And whatsmore he does this without resorting to petty digs from the lofty
postion of one who knows, or airing personal prejudices. But that this
were the norm.
--
It took a learned man to teach me the true meaning
of ignorance - the willingness to believe learning
is finite
Norman Unsoliciteds -The Wilderness Years, Boscara Press 1967
------------------------------
Date: Tue, 01 Sep 1998 20:28:20 -0400
From: "Matthew O. Persico" <mpersico@erols.com>
Subject: Re: Tom Phoenix: ANSWERS WANTED!
Message-Id: <35EC9124.ED04FDC4@erols.com>
And maybe, just maybe, Tom's area of guru-ness doesn't include CGI
stuff. Not that he isn't necessarioly good at it but maybe his high
standards won't let him ramble on when he isn't top-shelf sure of
himself. Wouldn't THAT be a relief if we ALL (me included) took that
advice?
Doesn't anyone remember when Perl was the glue (duct tape?) that held
one system together, not the Web?
--
#!/usr/bin/perl -- Matthew O. Persico
print "Just Another Perl Neophyte\n";
## Simplicity is a blessing when you're
## supporting the program at 2AM
------------------------------
Date: Tue, 01 Sep 1998 20:49:17 -0500
From: alecler@cam.org (Andre L.)
Subject: Re: Tom Phoenix: ANSWERS WANTED!
Message-Id: <alecler-0109982049170001@dialup-719.hip.cam.org>
In article <6shfkr$igr$1@info.uah.edu>, Greg Bacon <gbacon@cs.uah.edu> wrote:
> In article <alecler-0109981303140001@dialup-690.hip.cam.org>,
> alecler@cam.org (Andre L.) writes:
> : It is quite unreasonable to demand answers like you do. The man has the
> : right to respond in the manner he deems appropriate, and that is all.
> : Besides, he knows what he's doing.
>
> If this is the case, then why doesn't your argument apply to Abigail
> or tchrist?
>
> Greg
Huh?
------------------------------
Date: Tue, 01 Sep 1998 20:30:35 -0400
From: "Matthew O. Persico" <mpersico@erols.com>
Subject: Re: US-NY-LI 516 PERL Programmer/Analyst
Message-Id: <35EC91AB.80158ACA@erols.com>
perlunix@my-dejanews.com wrote:
>
> http://www.CarFinance.com and http://www.PriceAutoOutlet.com
> (a unit of NationsBank) is looking for UNIX PERL programmers.
Then why do you ramble on in the next paragraph about Java?
> Requirements: 5+ years professional experience UNIX, Strong PERL.
> SQL or Informix a big plus, Java a plus.
SQL is a language. Informix is a DBMS. Sounds like someone in marketing
ate the jargon file for lunch yet again!
--
#!/usr/bin/perl -- Matthew O. Persico
print "Just Another Perl Neophyte\n";
## Simplicity is a blessing when you're
## supporting the program at 2AM
------------------------------
Date: 12 Jul 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
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 3612
**************************************
