[7915] in Perl-Users-Digest
Perl-Users Digest, Issue: 1540 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Dec 27 14:07:14 1997
Date: Sat, 27 Dec 97 11:00:26 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sat, 27 Dec 1997 Volume: 8 Number: 1540
Today's topics:
Re: [HELP-URGENT] Binaries for Aix (Clay Irving)
Re: ARGV to read commandline input (Tad McClellan)
Re: Can I use -d,-e,-s.... in WinNT ? scott@softbase.com
Re: Can I use -d,-e,-s.... in WinNT ? <jacklam@math.uio.no>
Re: Finding the TITLE to a HTML page (Frank)
flock Not Available in MacPerl 5? <VikR@aol.com>
Re: Help, "Fatal error" 'libperl.a' when compiling Perl (Mike Stok)
Re: How do I send an FTP line command with Win32:Intern (Jeffrey Drumm)
Re: Installing Perl on Solaris - Problem (Neil Briscoe)
Re: MAPI modules for perl WIN32?? scott@softbase.com
Re: overloading in function (correction II) <xah@best.com>
Re: overloading in function <dima@duti515a.twi.tudelft.nl>
Re: overloading in function <dima@duti515a.twi.tudelft.nl>
Re: overloading in function <stone@math.grin.edu>
Re: Perl Converter for Solaris version (Joanne Foxcourt)
Re: Perl editor needed <webmaster@fccj.cc.fl.us>
Re: Powered by Servlets <merlyn@stonehenge.com>
problem with modules <amilopxa@eupmt.upc.es>
Re: Which language pays most? Smalltalk, not C++ nor J <gschwarz@netup.cl>
Re: Which language pays most? Smalltalk, not C++ nor J <pats@acm.org>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 27 Dec 1997 10:43:33 -0500
From: clay@panix.com (Clay Irving)
Subject: Re: [HELP-URGENT] Binaries for Aix
Message-Id: <6837n5$m3@panix.com>
In <34A3FC16.3EBF@ccr.jussieu.fr> Sunny PARIS <sparis@ccr.jussieu.fr> writes:
>I need to find a binary version of PERL for AIX.
>As i want to use the FCGI module, i need it to be compiled WITH SFIO
>support.
>If someone has an ftp adress ...
I don't know they were compiled with SFIO support, but a links to SMIT
installable binaries are found at:
http://reference.perl.com/query.cgi?binaries
--
Clay Irving <clay@panix.com> I think, therefore I am. I think?
http://www.panix.com/~clay/
------------------------------
Date: Sat, 27 Dec 1997 10:51:17 -0600
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: ARGV to read commandline input
Message-Id: <5mb386.ov3.ln@localhost>
Ted Fiedler (budo@news.ncx.com) wrote:
: #!/usr/bin/perl
Always use the -w switch to enable warnings from perl. This will help
you find bugs in your scripts.
#!/usr/bin/perl -w
: open (ARGV, $ARGV);
Always check the return value from calls to open() to see if it
succeeded in actually opening the file (it might fail you know...)
open (ARGV, $ARGV) || die "could not open '$ARGV' $!";
If you had done those two things,
---------------------
#!/usr/bin/perl -w
open (ARGV, $ARGV) || die "could not open '$ARGV' $!";
---------------------
perl would have output:
Use of uninitialized value at ./mygrep line 3.
Use of uninitialized value at ./mygrep line 3.
could not open '' No such file or directory at ./mygrep line 3.
Which would point out that $ARGV doesn't contain anything.
: while (<$ARGV[0]>) {
Using angle brackets to read input (as opposed to their other use as
filename globs) requires a file_handle_ inside them. You have given
a file_name_ (contained in $ARGV[0]) there.
If you modify the script so that the open() succeeds (ie. the filehandle
ARGV is valid), then you would want this instead:
while (<ARGV>) {
: if (/$ARGV[1]/) {
: print $_;
: }
: }
: close(ARGV);
That part looks like it should work fine.
: ok im using perl 5.003 i want this program to take two commandline arguments
If your script requires exactly two arguments, it would be a Good Idea
to check that it is called with exactly two arguments:
die "USAGE: mygrep <filename> <pattern>\n" unless @ARGV == 2;
: then use the first as the file name and the second as the pattern match
Since the ARGV filehandle is used by some perl magic, I'll use a
different filehandle:
------------------
#!/usr/bin/perl -w
die "USAGE: mygrep <filename> <pattern>\n" unless @ARGV == 2;
open (IN, $ARGV[0]) || die "could not open '$ARGV[0]' $!";
while (<IN>) {
print if /$ARGV[1]/;
}
close(IN);
------------------
If you have the pattern be the _first_ argument, then it would be
very easy to let your script search in many files for the pattern.
The use of <> is documented in the 'perlop' man page under the
heading 'I/O Operators':
------------------
#!/usr/bin/perl -w
die "USAGE: mygrep <pattern> <filename...>\n" unless @ARGV > 1;
$pattern = shift; # remove the first element from the @ARGV array.
# the rest of the args will be taken as filenames
# for use by the <> magic
while (<>) {
print if /$pattern/;
}
------------------
Or, using the command line switches described in 'perlrun' and a
BEGIN block, you can do it with a one-liner:
perl -nwe 'BEGIN {$pat=shift(@ARGV)} print if /$pat/' word file1 file2...
If the pattern contains regex metacharacters, you may want to escape
them if you want it to match literally.
$pattern = quotemeta(shift);
or, quote metacharacters in the regex itself:
print if /\Q$pattern/;
If you want to match the entire "word" rather than anything that
contains the "word" (eg: /ed/ will match if $_='Fiedler')
Then you may want to use word boundary matches too:
/\bed\b/; # match 'ed' only if there are no "word characters"
adjacent to it.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 27 Dec 1997 14:33:19 GMT
From: scott@softbase.com
Subject: Re: Can I use -d,-e,-s.... in WinNT ?
Message-Id: <6833jf$3rg$2@mainsrv.main.nc.us>
Q-ball (a9438@mail.kscgeb.edu.tw) wrote:
> Hello :
> I had installed the Perl for Win32 in my PC (OS : NT4.0 )
> But I don't know can I use the
> parameter ( -e : check if files exit ,-f,-d. -T.........)
> under NT to check the file's attribute ?
Works for me.
Some of the really exotic UNIX tests might not work, but the
major ones will.
Scott
--
Look at Softbase Systems' client/server tools, www.softbase.com
Check out the Essential 97 package for Windows 95 www.skwc.com/essent
All my other cool web pages are available from that site too!
My demo tape, artwork, poetry, The Windows 95 Book FAQ, and more.
------------------------------
Date: Sat, 27 Dec 1997 18:14:06 +0100
From: Peter John Acklam <jacklam@math.uio.no>
Subject: Re: Can I use -d,-e,-s.... in WinNT ?
Message-Id: <34A5375E.1617@math.uio.no>
scott@softbase.com wrote:
>
> Q-ball (a9438@mail.kscgeb.edu.tw) wrote:
> >
> > Hello :
> > I had installed the Perl for Win32 in my PC (OS : NT4.0 )
> > But I don't know can I use the
> > parameter ( -e : check if files exit ,-f,-d. -T.........)
> > under NT to check the file's attribute ?
>
> Works for me.
>
> Some of the really exotic UNIX tests might not work, but the
> major ones will.
On Win95 I can't use thing like
if ( -e $file && -T _ ) { ... }
I must -- for some reason -- do it like this
if ( -e $file && -T $file ) { ... }
How is this under WinNT?
Peter
------------------------------
Date: Sat, 27 Dec 1997 17:00:30 GMT
From: FHeasley@chemistry.com (Frank)
Subject: Re: Finding the TITLE to a HTML page
Message-Id: <34a63383.1918092@news.halcyon.com>
On 27 Dec 1997 01:04:13 -0500, Lloyd Zusman <ljz@ljz.asfast.net>
wrote:
>psullivan@stlnet.com (psullivan) writes:
>
>> How would I find the title from a html file? I tried...
>> open(HTML,$htmlfile);
>> @html = <HTML>;
>> close(HTML);
>>
>> foreach $line (@html) {
>> if ($line =~ /title/i) {
>> $html_title = $line;
>> }
>> }
>>
>> and then I would take out the <title> and </title> tags, but it returns a
>> blank $html_line variable. It looks fine to me, but is there another way of
>> ^^^^^^^^^^
>> finding the title without having to resort to use calls? (i.e. the HTML::
>> ones, if such one exists). I would like to keep it as portable as possible.
>> Thanks.
>
>While you're waiting for someone to send you a reference to an
>appropriate HTML-parsing module, I have some comments about your Perl
>code:
>
>First of all, I think that the reason your '$html_line' variable is
>blank is because in your loop, you're setting a variable called
>'$html_title'.
>
>Also, here's a method for finding the title which doesn't require a
>loop and which handles the case where the <title> and </title> tags
>are on different lines:
>
> Line 1: unless (open(HTML, "<$htmlfile")) {
> Line 2: # error processing goes here
> Line 3: }
> Line 4: $html = join('', <HTML>);
why is this better than:
{ local $/; $html = <HTML> };
(taken from a previous thread)
??
> Line 5: close(HTML);
> Line 6: if ($html =~ m/<title>(.*?)</title>/is) {
should read:
Line 6: if ($html =~ m/<title>(.*?)<\/title>/is) {
> Line 7: $html_title = $1;
> Line 8: }
> Line 9: # more error processing goes here
>
>The statement on Line 3 reads the entire HTML file into one scalar
>variable.
>
>The regular expression on Line 6 terminates with an 's'. This 's'
>causes the '.' in the regular expression to match newlines as well as
>other characters ... in other words, the matching will be performed
>properly even when the searched-for pattern spans multiple lines. The
>'?' in this reqular expression causes '.*' to match the *shortest*
>string that fits between a <title> and a </title> tag. This will
>handle the (admittedly erroneous) case where there are mutiple <title>
>or </title> tags in the document.
>
>Finally, the parentheses in the regular expression cause the string
>matched by '.*?' to be put into the variable $1. Therefore the
>'$html_title' variable will be set to everything between the <title>
>and the </title> tags.
>
>However, you're better off using a bona fide HTML parser, since there
>are a number of cases where this kind of pattern matching will fail to
>return a proper title. Therefore, I agree that a pre-existing module
>will help you. I think that such an HTML parser exists somewhere in
>the LWP:: module, but someone more familiar with that package will
>have to confirm this.
>
>--
> Lloyd Zusman
> ljz@asfast.com
Frank
------------------------------
Date: Sat, 27 Dec 1997 10:37:14 -0800
From: Vik Rubenfeld <VikR@aol.com>
Subject: flock Not Available in MacPerl 5?
Message-Id: <34A54AD8.C30A1291@aol.com>
A client of mine is running MacPerl 5.1.5r4 on a Mac, and reports that flock
is unavailable. He's getting a
"# The flock() function is unimplemented." error. I can see in the MacPerl
docs that flock seems to be present in MacPerl. What could explain this?
Thanks very much in advance to all for any info.
- Vik
------------------------------
Date: 27 Dec 1997 12:00:52 -0500
From: mike@stok.co.uk (Mike Stok)
Subject: Re: Help, "Fatal error" 'libperl.a' when compiling Perl 5.004_04
Message-Id: <683c84$ha$1@stok.co.uk>
In article <34A4E81F.957C0631@earthlink.net>,
Ames <alexandera@earthlink.net> wrote:
>round2.. Now I am getting stuck with:
>
># make
>make: Warning: Both `makefile' and `Makefile' exist
>gcc -o miniperl miniperlmain.o libperl.a
>Undefined first referenced
> symbol in file
>log libperl.a(pp.o)
>pow libperl.a(pp.o)
>sqrt libperl.a(pp.o)
>floor libperl.a(pp.o)
>atan2 libperl.a(pp.o)
>exp libperl.a(pp.o)
>sin libperl.a(pp.o)
>cos libperl.a(pp.o)
Are you missing a -lm from the libs variable in the config.sh? All thses
symbols are typically in the C math library. My config.sh has this line
in it:
libs='-lnsl -lgdbm -ldb -ldl -lm -lc -lposix -lcrypt'
so you may want to manually add -lm and then read the comment at the top
of config.sh
Hope this helps,
Mike
--
mike@stok.co.uk | The "`Stok' disclaimers" apply.
http://www.stok.co.uk/~mike/ | PGP fingerprint FE 56 4D 7D 42 1A 4A 9C
http://www.tiac.net/users/stok/ | 65 F3 3F 1D 27 22 B7 41
stok@colltech.com | Collective Technologies (work)
------------------------------
Date: Sat, 27 Dec 1997 17:33:05 GMT
From: drummj@mail.mmc.org (Jeffrey Drumm)
Subject: Re: How do I send an FTP line command with Win32:Internet
Message-Id: <34a5382f.143051311@news.mmc.org>
On Sat, 27 Dec 1997 04:10:12 -0500, me <me@here.com> wrote:
>I have the need to issue the command "quote site filetype=jes" before I
>"put" my file. Is there a way to issue this command with
>Win32:Internet? Other suggestions are also welcome. I am on an Intel
>box running IIS3.0. Thank you.
>
>Alan Sturm
>alan@globalec.com
Not familiar with Win32::Internet; must be an ActiveState module?
If you used Gurusamy Sarathay's Win32 binary distribution, you'd have
Graham Barr's libnet and included Net::FTP module. Net::FTP has a quote
method that will do exactly what you want.
I did find a problem with the libnet included with Sarathay's port, but an
upgrade to libnet 1.06.03 fixed it (and I think .04's out now).
--
Jeffrey R. Drumm, Systems Integration Specialist
Maine Medical Center Information Services
420 Cumberland Ave, Portland, ME 04101
drummj@mail.mmc.org
------------------------------
Date: 27 Dec 1997 12:54:29 GMT
From: neilb@zetnet.co.uk (Neil Briscoe)
Subject: Re: Installing Perl on Solaris - Problem
Message-Id: <memo.19971227125428.10201B@skep.compulink.co.uk.cix.co.uk>
In article <681dfm$7up$1@apple.news.easynet.net>,
andrew@boothman.easynet.co.uk.NOSPAM (Andrew Boothman) wrote:
> Hi All!
>
> A Solaris box is currently running perl 5.001, but the most recent versi
> on
> of CGI.pm needs a newer version so I'm going to install whatever the new
> est
> is (5.004_something-or-other).
>
> The problem is that the Solaris machine is running some 'mission critica
> l'
> perl scripts that we can't afford to have any downtime on. So I would li
> ke
> to install perl in a different place, and leave the current installation
> totally untouched.
>
> Is this possible?
>
Of course. Before embarking on your new installation, run your current
perl with the -V switch, as in
perl -V
This will tell you where the current Perl looks for all its stuff.
Now you know where NOT to install your new perl, and can answer the
questions Configure will ask you accordingly.
Regards
Neil
------------------------------
Date: 27 Dec 1997 14:40:08 GMT
From: scott@softbase.com
Subject: Re: MAPI modules for perl WIN32??
Message-Id: <683408$3rg$3@mainsrv.main.nc.us>
David X. Johnson (david_x_johnson@ml.com) wrote:
> Looking for a MAPI module for perl WIN32. I'm not interested in simple
> send mail -- I can use SMTP for that. For example: Would like to
> export a list of mail addresses from the global list (MS Exchange) using
> perl.
> Does anyone know if/where such a thing exists?
I've done a lot of research into this myself. Basically,
in a nutshell:
1. MAPI has an OLE Automation interface you can use
from Perl.
2. This interface is totally, completely undocumented.
I've looked EVERYWHERE -- the MSDN CDs, the book
Inside MAPI, etc. I even contacted MS Press about
a future edition of Inside MAPI having some info on
this added, and they said no future editions were
planned. The book Developing Exchange Applications
in C++ *mentions* the interface, but does not
document it. I don't know why it is undocumented.
3. You can *use* the MAPI.Session object, by trial
and error. It's very similar in nature to a
raw C++ MAPI session.
4. MAPI.Session behaves differently with different
e-mail clients installed! I've tried it on systems
with Exchange and with Outlook, and have gotten
radically different results. This makes it
almost totally useless. (For example, Outlook can't
send a message non-interactively. It *ALWAYS* puts
up an interactive dialog.)
My conclusion is I just gave up. My goal was to send e-mail
noninteractively from background jobs, so I created an SMTP mail
sending function.
Scott
--
Look at Softbase Systems' client/server tools, www.softbase.com
Check out the Essential 97 package for Windows 95 www.skwc.com/essent
All my other cool web pages are available from that site too!
My demo tape, artwork, poetry, The Windows 95 Book FAQ, and more.
------------------------------
Date: Sat, 27 Dec 1997 05:39:46 -0800
From: "Xah" <xah@best.com>
Subject: Re: overloading in function (correction II)
Message-Id: <68306c$503$1@nntp1.ba.best.com>
Sorry folks. The Mathematica code I gave is incorrect again. I just realized
that a correct solution cannot be coded recursively using only one symbol.
Anyhow, my original question is how to write a function in Perl and Scheme
such that different number of arguments calles different definitions.
If you are interested in writing Range for fun, let's start another thread.
(or you can email me first, then I'll give you the complete spec.
Xah
In article <682eku$rjv$3@nntp1.ba.best.com>, "Xah" <xah@best.com> wrote:
>Here's a correction to the Mathematica code I gave:
>
>range[a_]:=range[1,a,1];
>range[a_,b_]:=range[a,b,1];
>range[a_,b_,dx_]/;(Sign@N@(b-a)===Sign@N@dx):=Prepend[range[a+dx,b,dx],a];
>
> Xah, xah@best.com
> http://www.best.com/~xah/Wallpaper_dir/c0_WallPaper.html
> "Unix + C + Perl = Apocalypse"
------------------------------
Date: 27 Dec 1997 17:31:50 +0100
From: Dmitrii Pasechnik <dima@duti515a.twi.tudelft.nl>
Subject: Re: overloading in function
Message-Id: <t3zplmeoi1.fsf@duti515a.twi.tudelft.nl>
"Xah" <xah@best.com> writes:
>
> How can I write a function so that its behavior depends on the number of
> arguments?
>
> For example, here's a function called 'range' written in Mathematica.
> (implemented without error checking)
>
> range::"usage"=
> "range[a,b,dx] returns a list from a to b with increment dx. dx can be
> negative if a > b. range[n] is equivalent to range[1,n,1]. range[a,b] is
> equivalent to range[a,b,1].";
>
> range[a_]:=range[1,a,1];
> range[a_,b_]:=range[a,b,1];
> range[a_,b_,dx_]:=Prepend[range[a+dx,b,dx],a];
>
> I want to write range in both Perl and Scheme. Suggestion of common practice
> appreciated. (if it cannot be done as is)
Scheme:
Use dot in the parameter list:
(this is the usual way to treat the arbitrary lists of args, see
r4rs 4.1.1)
(define (range a . x)
(if (null? x) (make-range 1 a 1)
(let ((b (car x)) (dx (cdr x)))
(if (null? dx) (make-range a b 1)
(make-range a b dx)))))
here make-range can be something like (probably can be much more elegant):
(define (make-range a b dx)
(if (= 0 dx) (breakpoint "0 delta in make-range")
(if (= (sign (- b a)) (sign dx))
(let ((end-range
(if (> dx 0) (lambda (x) (> x b))
(lambda (x) (< x b)))))
(letrec ((really-make-range
(lambda (x res)
(if (end-range x) (reverse res)
(really-make-range (+ x dx) (cons x res))))))
(really-make-range a '() )))
'() )))
(define (sign x) (if (>= x 0) 1 -1))
-------
d.pasechnik @ twi dott tudelft dott nl
------------------------------
Date: 27 Dec 1997 18:08:21 +0100
From: Dmitrii Pasechnik <dima@duti515a.twi.tudelft.nl>
Subject: Re: overloading in function
Message-Id: <t3vhwaemt6.fsf@duti515a.twi.tudelft.nl>
Sorry, in my previous posting it should be:
(define (range a . x)
(if (null? x) (make-range 1 a 1)
(let ((b (car x)) (dx (cdr x)))
(if (null? dx) (make-range a b 1)
(make-range a b (car dx))))))
-----------------------
Then it works in all the cases:
> (range -10 1)
'(-10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1)
> (range -10 1 3)
'(-10 -7 -4 -1)
> (range 3)
'(1 2 3)
>
> (range -10)
'()
------------------------------
Date: 27 Dec 1997 11:32:38 -0600
From: John David Stone <stone@math.grin.edu>
Subject: Re: overloading in function
Message-Id: <udzplm66a1.fsf@post.math.grin.edu>
"Xah" <xah@best.com> writes:
> How can I write a function so that its behavior depends on the number of
> arguments?
>
> For example, here's a function called 'range' written in Mathematica.
> (implemented without error checking)
>
> range::"usage"=
> "range[a,b,dx] returns a list from a to b with increment dx. dx can be
> negative if a > b. range[n] is equivalent to range[1,n,1]. range[a,b] is
> equivalent to range[a,b,1].";
>
> range[a_]:=range[1,a,1];
> range[a_,b_]:=range[a,b,1];
> range[a_,b_,dx_]:=Prepend[range[a+dx,b,dx],a];
>
> I want to write range in both Perl and Scheme. Suggestion of common practice
> appreciated. (if it cannot be done as is)
For completely unspecified arity, replace the parameter list with a
single identifier (which is bound at call time to a list containing all of
the arguments). Here's how I'd write RANGE:
(define range
(lambda args
(let ((arg-count (length args)))
(if (not (<= 1 arg-count 3))
(error 'range "wrong number of arguments"))
(let ((start (if (= arg-count 1) 1 (car args)))
(finish (if (= arg-count 1) (car args) (cadr args)))
(increment (if (= arg-count 3) (caddr args) 1)))
(let ((beyond (cond ((positive? increment) >)
((negative? increment) <)
(else (error 'range "zero increment")))))
(let loop ((result '())
(counter start))
(if (beyond counter finish)
(reverse result)
(loop (cons counter result) (+ counter increment)))))))))
If you want some number of required parameters followed by zero or
more optional ones, write the parameter list as
(required-1 required-2 ... required-n . optional)
A call will then contain n or more arguments, the first n bound to
REQUIRED-1, REQUIRED-2, ..., REQUIRED-N, and the remaining ones assembled
into a list that is bound to OPTIONAL.
--
====== John David Stone - Lecturer in Computer Science and Philosophy =====
============== Manager of the Mathematics Local-Area Network ==============
============== Grinnell College - Grinnell, Iowa 50112 - USA ==============
========== stone@math.grin.edu - http://www.math.grin.edu/~stone/ =========
------------------------------
Date: Sat, 27 Dec 1997 18:06:44 GMT
From: joannef@geocities.com (Joanne Foxcourt)
Subject: Re: Perl Converter for Solaris version
Message-Id: <34a54327.1171874@nntp.netcom.ca>
Check the CPAN archives for a Perl to C converter. It's in Alpha3
release but seems to be very reliable. To make your Perl scripts
directly executable, simply use 'chmod 755 myscript.pl' and ensure the
first line of the script starts with the shebang pointing to your perl
binary ( #!/my/path/to/perl ).
Joanne
On 27 Dec 1997 08:44:10 GMT, isc40322@leonis.nus.sg (~{Mu1~Hp~})
wrote:
>Hi, is there any product that convert Perl scripts into the executable under
>Solaris version? Alternatively, a translator that generates C/C++ source
>codes taking Perl script as input is also welcomed.
------------------------------
Date: Sat, 27 Dec 1997 10:06:20 -0500
From: "Webmaster" <webmaster@fccj.cc.fl.us>
Subject: Re: Perl editor needed
Message-Id: <34a51a23.0@usenet.fccj.cc.fl.us>
Well, I will throw my Two-Cents worth in :-)
BBEdit Kicks Ass!
Thank you for taking the time to read this far ;-)
Bill
Lars Kristensson wrote in message <34a4a5b9.0@d2o62.telia.com>...
>I have to mention QEdit for DOS. I have a faint feeling it has changed
>name since I last used it but anyway, It's really a killer!
>
>In article
><34a18b62.22859566@news.ntslink.net>,
> dgrove@ntslink.net (David Grove) writes:
>> Buy codewright. vi isn't as good as DOS Edit, which sucks. If you WANT
>> a real programming editor, get one: don't settle for a re-named,
>> scaled-down notepad with extra buttons.
>>
>>
>> On Wed, 24 Dec 1997 01:35:09 GMT, wjin@cs.uh.edu (Woody Jin) wrote:
>>
>>>In article <67mgu3$cs5$3@mainsrv.main.nc.us>, scott@softbase.com wrote:
>>>>Perl editors under Windows ...
>>>
>>>Elvis 2.1
>>> 1) First, it is a vi. I can't live without it
>>> 2) Nice syntax coloring.
>>>
>>>available ftp://ftp.cs.pdx.edu/pub/elvis
>>>
>>>--
>>>Woody
>>
>
>--
>-- lars.kristensson@ne.su.se, Dept of Economics, Stockholm Univ
>Tel:+46-8-16 31 13, Fax:+46-8-15 94 82, Mob:+46-70-667 62 63
>
>"As a sysadmin, YES, I CAN read Your e-mail, but I would never
>be so bored that I would."
------------------------------
Date: 27 Dec 1997 07:41:19 -0700
From: Randal Schwartz <merlyn@stonehenge.com>
To: comdog@computerdog.com (brian d foy), kwilliams@qqworld.com
Subject: Re: Powered by Servlets
Message-Id: <8c1zyyq25s.fsf@gadget.cscaper.com>
>>>>> "brian" == brian d foy <comdog@computerdog.com> writes:
brian> In article <34A441D6.73AE@qqworld.com>, kwilliams@qqworld.com wrote:
>> Entire site beautifully powered by Java Servlets,
>> http://www.qqworld.com
brian> how about a site powered by mod_perl?
brian> http://www.dejanews.com
Or even http://www.us.imdb.com/ (The Internet Movie Database),
and for a bunch more, see:
http://apache.perl.org/sites.html
print "Just another Perl hacker," # but not what the media calls "hacker!" :-)
## legal fund: $20,990.69 collected, $186,159.85 spent; just 248 more days
## before I go to *prison* for 90 days; email fund@stonehenge.com for details
--
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: 27 Dec 1997 13:27:36 GMT
From: "Conrad" <amilopxa@eupmt.upc.es>
Subject: problem with modules
Message-Id: <01bd12be$6c0e3ac0$e14b4dc3@conrad>
Hi.
I have a problem with Pg.pm .. a module for Postgres database interface..
When i try to execute the module with ... uses Pg; ... retur the follow
error message:
Can't find loadable object for module Pg in
(/usr/lib/perl5/i386-linux/5.003
/usr/lib/perl5 /usr/lib/perl5/site_perl
/usr/lib/perl5/site-perl/i586-linux) at
/usr/lib/perl5/site-perl/Pg.pm line 109
the line 109 of Pg.pm contents the instruction : bootstrap Pg;
------------------------------
Date: Sat, 27 Dec 1997 10:11:55 -0400
From: Guillermo Schwarz <gschwarz@netup.cl>
Subject: Re: Which language pays most? Smalltalk, not C++ nor Java.
Message-Id: <34A50CAA.54AA@netup.cl>
Kaz Kylheku wrote:
> Although 'memcpy' is not a reserved keyword by any means,
> it is a reserved 'external name'.
It is the first time I see reserved external.
> A strictly conforming program may not define any external
> name that begins with 'mem' followed by any combination of letters,
> digits or underscores.
Ok. Define void memfoo() { } and see if it compiles.
It does.
> Define memcpy, if you write such a static function, you must not
> include the <string.h> header in
> the same translation unit, else undefined behavior results.
Wrong. The compiler points out two different implementations.
The executable can't be generated.
> There is no such thing as ``overriding'' in C. Each external name must
> have exactly one definition if it is used anywhere in the program.
That's true. C is not object oriented. C++ is just an Smalltalk
wannabe.
------------------------------
Date: Sat, 27 Dec 1997 06:59:16 -0800
From: Patricia Shanahan <pats@acm.org>
Subject: Re: Which language pays most? Smalltalk, not C++ nor Java.
Message-Id: <34A517C4.5867DAF6@acm.org>
Guillermo Schwarz wrote:
>
> Kaz Kylheku wrote:
> > Although 'memcpy' is not a reserved keyword by any means,
> > it is a reserved 'external name'.
> It is the first time I see reserved external.
> > A strictly conforming program may not define any external
> > name that begins with 'mem' followed by any combination of letters,
> > digits or underscores.
> Ok. Define void memfoo() { } and see if it compiles.
> It does.
What does this have to do with the question of whether it is a
"strictly conforming program"? Surely that can be resolved only by
reference to the language standard. There is no certainty that the set
of programs accepted by a particular compiler exactly corresponds to
the set of strictly conforming programs.
> > Define memcpy, if you write such a static function, you must not
> > include the <string.h> header in
> > the same translation unit, else undefined behavior results.
> Wrong. The compiler points out two different implementations.
> The executable can't be generated.
> > There is no such thing as ``overriding'' in C. Each external name must
> > have exactly one definition if it is used anywhere in the program.
> That's true. C is not object oriented. C++ is just an Smalltalk
> wannabe.
This thread contains a lot of cross-purposes discussion, because some
participants are apparently using what the standard says as their
definition of C, while others are apparently using K&R or what the
compilers they use currently accept. For terms like "strictly
conforming program" I think the language standard is the only
reasonable basis. For other issues, common practice or K&R may be
appropriate, but please first discuss which basis should be used,
rather than diving straight into specific issues that may give
different answers.
Patricia
------------------------------
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 1540
**************************************
