[10823] in Perl-Users-Digest
Perl-Users Digest, Issue: 4424 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Dec 14 21:07:26 1998
Date: Mon, 14 Dec 98 18:00:17 -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 Mon, 14 Dec 1998 Volume: 8 Number: 4424
Today's topics:
Re: ($e_mail !~ /\w+[-\w]*\@\w+[-\w]*\.\w+/) <uri@ibnets.com>
ANNOUNCE: CodeMagic Universal IDE for Win32 (Free Perl pete@davesworld.net
Re: Bug (array ref in a "void" context) <uri@ibnets.com>
Re: Bug (array ref in a "void" context) (Andrew Allen)
Re: Bug (array ref in a "void" context) <uri@ibnets.com>
Re: Can standard Perl functions be overloaded ? <zenin@bawdycaste.org>
Re: CGI to capture "multiple select" output (brian d foy)
Re: CGI tools - Shopping Basket me@alistair.com
Re: emulating sed's "/start/,/stop/<do something>"? <zenin@bawdycaste.org>
Re: fork and defunct processes <gellyfish@btinternet.com>
Re: Get an Html page from another server <Bill.Palmer@online.disney.com>
Re: Getting IP of connecting station (Martien Verbruggen)
Re: How to extract emails from HTML page <gellyfish@btinternet.com>
Re: Ip number (Erik)
Re: Ip number (Martien Verbruggen)
Re: Perl2EXE <gellyfish@btinternet.com>
Re: Perl2EXE (Martien Verbruggen)
Re: Perl2EXE <tchrist@mox.perl.com>
Re: Script to Convert Text to HTML <gellyfish@btinternet.com>
Re: site_perl Migration <gellyfish@btinternet.com>
Re: timelocal and localtime with negative values? <gellyfish@btinternet.com>
Re: What can't a file handle Have in it? (Erik)
Re: What can't a file handle Have in it? <tchrist@mox.perl.com>
Re: What can't a file handle Have in it? (Erik)
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 14 Dec 1998 18:56:42 -0500
From: Uri Guttman <uri@ibnets.com>
Subject: Re: ($e_mail !~ /\w+[-\w]*\@\w+[-\w]*\.\w+/)
Message-Id: <39d85mmg5h.fsf@ibnets.com>
>>>>> "RS" == Randal Schwartz <merlyn@stonehenge.com> writes:
RS> print "Just another Perl hacker, and FAQ-whacker," :)
don't do that in public (or in certain movie houses) or you might get
caught and convicted again! probably violate your parole too!
:-)
uri
--
Uri Guttman Hacking Perl for Ironbridge Networks
uri@sysarch.com uri@ironbridgenetworks.com
------------------------------
Date: Tue, 15 Dec 1998 00:56:40 GMT
From: pete@davesworld.net
Subject: ANNOUNCE: CodeMagic Universal IDE for Win32 (Free Perl IDE)
Message-Id: <754c46$kh$1@nnrp1.dejanews.com>
ANNOUNCE: CodeMagic Universal IDE for Win32
Win32 Based FREE IDE for Perl, TclTk, Java, C, Python
Beta Release 1 (15 Dec, 1998)
NEVER PAY FOR FREE SOFTWARE!
NEVER PAY FOR PERL SOFTWARE WHEN ALL YOU WANT IS FREE!
NEVER PAY FOR PROPRIETARY PERL SOFTWARE!
Finally, you can say goodbye to notepad and cheap shareware editors.
Gone forever are expensive, proprietary Perl tools for Win32.
NOW AVAILABLE, this is the first FREE IDE for Perl (and other languages)
for the Win32 system in the world. It also happens to be the best. It
is free for download from this site. It is published purely for the benefit
of the Perl community, and to eliminate the need for the poor quality
commercial software currently available for Perl. It's features include:
1. Very customizable, muli-language editor with user-customizable syntax
highlighting (Perl, Html, Java, C, C++, Delphi, Pascal, Python, Sql, Lisp,
Batch Files, and of course Text), AutoCorrection, Template Completion, and
other niceties. Main emphasis is on Perl. 2. Personalized setting for each
user of the system the IDE is installed on 3. Free Perl Debugger,
cooperation with the debuggers for other languages 4. Free Perl Tk (or
TclTk) Form Generator for quick and easy tk-ing 5. Project Management 6.
Fast lookup/goto for perl subroutines 7. Fast search of any file by regular
expression 8. AutoCreation of different file types: Perl Program, CGI
Script, Perl Module, Perl Class, Perl Autoload Module, Perl XS Module
Project, C File, C Header File, C++ Class File, Html File, 6-Division Html
File, Java Program, Java Applet, Java Applet Html Template, Python File, and
many more. Some of these use Wizards to help you create them. 9. Multiple
wizards: Database Wizard, Database Connection Wizard, CGI Wizard, CGI
Counter Wizard, Shopping Cart Wizard, CGI Form Wizard, CGI Database Table
Wizard 10. Integrated FTP access to publish your Html and CGI by FTP to your
ISP. 11. Integrated Version Control 12. Complete Online Help, and hopefully
integrated online help for supported languages (Perl First) 13. Most
processing is done in Perl for easy porting to other platforms Works with
any version of Perl on the Win32 platform. A future version will come with
it's own build of Threaded Perl 5.005, complete CPAN module compatibility,
and most of the best modules built in, installed and configured when you
install the IDE. Finally, say goodbye forever to non-compatible modules and
limited package repositories. 14. Created in super-fast Delphi IV. 15.
Complete source is available upon request to former employers who think I
might have copied any of their work to complete this thing. (Otherwise,
editor source is not available, and is not distributable. However, add-on
sources will be publicly available, as it is hoped that the user community
will contribute their own functionality to the IDE through add-on modules
written in perl/tk or as DLL's [C, VB, or Delphi].). Complete source will be
made public in the future. 16. Fully Y2K compatible
This is BETA 1 of this CodeMagic. Most features are fully functional.
Please report any bugs to me directly. Beta instructions are included
with the software in online help. BETA 2 will be released on January 1,
1999, and Version 1.0 will be released on January 1, 1999. Some features
are in development (wizards, online help).
The beta file will be updated regularly to demonstrate bug fixes. This
will be about twice a week.
Currently, CodeMagic requires MS Internet Explorer 4.0 or higher
installed on your system for the online help. This will be corrected for
Netscape users in a future update.
A CDRom version will be available by March 1, 1999, that includes a
non-proprietary version of threaded perl that is compatible with CPAN
modules, as well as the other freeware tools that this software can
be partnered with.
Download CodeMagic Beta 1 (1.2 Meg) at http://homepage.dave-world.net/~pete
by David T. Grove
pete@dave-world.net
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 14 Dec 1998 18:54:50 -0500
From: Uri Guttman <uri@ibnets.com>
To: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Bug (array ref in a "void" context)
Message-Id: <39g1aimg8l.fsf@ibnets.com>
>>>>> "BL" == Bart Lateur <bart.lateur@skynet.be> writes:
>> $aryref ||= ($updated++ ,[1,2,3]);
BL> I expected the assignment to have the lowest precedence of all,
BL> except maybe the artificially low precedences of "or" and "and".
that would make little sense as MJD said before.
how would you do a for loop like this:
for ( $i = 0, $j = 10 ; $i < 10 ; $i++, $j-- ) {
without a low precedence comma that would be tricky. each assignment
would be in a paren. this also came from c where it has a low
precedence.
comma is a sequential operator. effectively it allows for multiple
almost full statements (in perl that means without statement modifiers),
to be executed sequentially and refered to as one statement. so it has
to be lower than = to be useful.
BL> The comma operator is not the same as the comma separators in a
BL> function parameter list. Or is it?
no. comma in a list or function separates values. comma as an operator,
executes expressions sequentially.
BL> I still find it bizarre that the comma operator, which I think is
BL> a typical scalar operator, generates a "void context".
because your [1,2,3] was not assigned anywhere so it was an expression
(without a side effect of assignment) which is a void context.
same as if you did:
[1, 2, 3] ;
under -w that should get an error since it does nothing useful.
perl -we '[1,2,3]'
Useless use of scalar ref constructor in void context at -e line 1.
interesting choice of error message here:
(parsed as a block it seems with 1 statement)
perl -we '{1,2}'
Useless use of a constant in void context at -e line 1.
while this is parsed as an anon hash:
perl -we '{a=>2}'
Useless use of scalar ref constructor in void context at -e line 1.
uri
--
Uri Guttman Hacking Perl for Ironbridge Networks
uri@sysarch.com uri@ironbridgenetworks.com
------------------------------
Date: 15 Dec 1998 00:51:12 GMT
From: ada@fc.hp.com (Andrew Allen)
Subject: Re: Bug (array ref in a "void" context)
Message-Id: <754bq0$7r5@fcnews.fc.hp.com>
: BL> The comma operator is not the same as the comma separators in a
: BL> function parameter list. Or is it?
: no. comma in a list or function separates values. comma as an operator,
: executes expressions sequentially.
Doesn't comma simply build a list, evaluating left-to-right, in all
circumstances? I'm confused by your distinction here.
Andrew
------------------------------
Date: 14 Dec 1998 20:05:07 -0500
From: Uri Guttman <uri@ibnets.com>
Subject: Re: Bug (array ref in a "void" context)
Message-Id: <39btl6mczg.fsf@ibnets.com>
>>>>> "AA" == Andrew Allen <ada@fc.hp.com> writes:
AA> Doesn't comma simply build a list, evaluating left-to-right, in
AA> all circumstances? I'm confused by your distinction here.
from perlop:
Comma Operator
Binary "," is the comma operator. In a scalar context it
evaluates its left argument, throws that value away, then
evaluates its right argument and returns that value. This
is just like C's comma operator.
In a list context, it's just the list argument separator,
and inserts both its arguments into the list.
does this clear it up?
in a scalar context there can be no list to build up. it just throws
away the left argument. that left argument should have a side effect
(assignment, sub call, etc.) to be useful. otherwise in most/many cases it
will get flagged by -w as this thread has been talking about.
hth,
uri
--
Uri Guttman Hacking Perl for Ironbridge Networks
uri@sysarch.com uri@ironbridgenetworks.com
------------------------------
Date: 15 Dec 1998 01:43:24 GMT
From: Zenin <zenin@bawdycaste.org>
Subject: Re: Can standard Perl functions be overloaded ?
Message-Id: <913686321.510810@thrush.omix.com>
[posted & mailed]
Sean McAfee <mcafee@waits.facilities.med.umich.edu> wrote:
>snip<
: On further investigation, it appears that one can't have a subroutine
: prototype when using this kind of construct:
: use subs 'open';
: sub open (*$) { ... }
:
: With Perl 5.005, I get this error message:
: Prototype mismatch: sub main::open vs (*$) at -e line 1.
:
: Bummer.
use subs 'open(*$)';
sub open (*$) { ... }
--
-Zenin (zenin@archive.rhps.org) From The Blue Camel we learn:
BSD: A psychoactive drug, popular in the 80s, probably developed at UC
Berkeley or thereabouts. Similar in many ways to the prescription-only
medication called "System V", but infinitely more useful. (Or, at least,
more fun.) The full chemical name is "Berkeley Standard Distribution".
------------------------------
Date: Mon, 14 Dec 1998 19:10:51 -0500
From: comdog@computerdog.com (brian d foy)
Subject: Re: CGI to capture "multiple select" output
Message-Id: <comdog-ya02408000R1412981910510001@news.panix.com>
In article <74rh9s$r4e$1@nnrp1.dejanews.com>, mclapham1234@my-dejanews.com posted:
> I know if only one item was selected, I could use
> $var=$Query->param('color') to capture this.
>
> But if color has multiple values selected, how would
> I capture all the values selected for this ?
according to the CGI.pm documentation, you do something like
@vars = $Query->param('color');
good luck ;)
--
brian d foy <brianNOSPAM@NOSPAM.smithrenaud.com>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
remove NOSPAM or don't. it doesn't matter either way.
------------------------------
Date: Tue, 15 Dec 1998 00:28:31 GMT
From: me@alistair.com
Subject: Re: CGI tools - Shopping Basket
Message-Id: <754afc$v28$1@nnrp1.dejanews.com>
Well, a lot of people really hype this program, but unless you have a degree
in computer science, or you know someone who does, don't bother. It is a
pretty complex setup, and there is ZERO support. The docs that come with it
are not particularly complete, and there is no help forthcoming from the
author.
I was very excited to get Minivend going, and gave it the ol' 'College Try'
for almost a month, posting requests for help in the discussion group and a
fairly detailed request for some assistance from the author, but I got
nothing.
After a month of flailing about (and getting some professional help, whose
comment was "This documentation sucks" for the machine I was setting up on) I
have decided to look elsewhere.
In short: I hear Minivend is a great Shopping Cart, and it is free, but Caveat
Emptor! If it is free, don't expect anyone to help you get it going...
Alistair Calder.
In article <737dum$fee$1@nnrp1.dejanews.com>,
birgitt@my-dejanews.com wrote:
> In article <slrn75dosl.a2.jonathan@core.dumped.org>,
> jonathan@core.dumped.org (Jonathan Bobin) wrote:
> > In article <7368hb$igk$1@nnrp1.dejanews.com>, juliegee@iname.com wrote:
> > >Hi all,
> > >
> > >I am writing some HTML pages for a company and they need some CGI.
> > >They have around 9,000 products and I think they need something like
> > >a "Shopping basket" on their web site.
> > >
> > >Is there a CGI program available or a Tool to help me write the CGI
> > >for a "Shopping basket" type web site.
> >
> > Your best bet would be to go with a company that does it already, like
> > http://stores.yahoo.com, which is pretty cheap afaik.
> >
> > I'm sure that there are free CGI programs out there... try a website like
> > http://www.freecode.com/
> >
>
> hmm, a bit weird someone can't find a shopping cart these days (Altavista
> keyword search "shopping cart" gives them back like a swarm of flies).
>
> A bit weirder, someones asks in clpm for a shopping cart, and is pointed
> to Netscape. At least one should point to a free shopping cart written
> in perl, like "Minivend" (www.minivend.com).
>
> Birgitt
>
> -----------== Posted via Deja News, The Discussion Network ==----------
> http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
>
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 15 Dec 1998 01:51:12 GMT
From: Zenin <zenin@bawdycaste.org>
Subject: Re: emulating sed's "/start/,/stop/<do something>"?
Message-Id: <913686789.479873@thrush.omix.com>
David Combs <dkcombs@netcom.com> wrote:
: THANK YOU ALL!
n/p :-)
: suggestion: in EACH book that talks about the .. (ie, every
: book, presumably), add in the index a ref under "sed",
: ie emulating sed's flip-flop on-off on-off ... ranges.
$ perlindex flip-flop
1 0.189 lib/perl5/i386-freebsd/5.00404/Opcode.pm
2 0.177 lib/perl5/site_perl/Term/ANSIColor.pm
3 0.087 lib/perl5/pod/perlop.pod
Enter Number or 'q'>
Ok, so it's number 3 in the list, but it found it. I *highly*
suggest installing Text::English aka perlindex, available from
your local CPAN.
--
-Zenin (zenin@archive.rhps.org) From The Blue Camel we learn:
BSD: A psychoactive drug, popular in the 80s, probably developed at UC
Berkeley or thereabouts. Similar in many ways to the prescription-only
medication called "System V", but infinitely more useful. (Or, at least,
more fun.) The full chemical name is "Berkeley Standard Distribution".
------------------------------
Date: 15 Dec 1998 00:25:00 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: fork and defunct processes
Message-Id: <754a8s$361$1@gellyfish.btinternet.com>
On 14 Dec 1998 17:32:44 -0500 Mark-Jason Dominus <mjd@op.net> wrote:
> In article <36757FB6.41C67EA6@scitec.com>,
> Crist J. Clark <cjc@scitec.com> wrote:
>>I've had a look through perl manpages and tried some FAQ's but have not
>>been able to locate a reference to this type of problem. Thanks for any
>>help.
>
> perlfaq8:
> How do I avoid zombies on a Unix system?
>
That should be revised to be:
How do I avoid zombies on a Unix system without invoking Baron Samedi
or sacrificing any white chickens ?
;-}
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Mon, 14 Dec 1998 16:14:54 +0000
From: Bill Palmer <Bill.Palmer@online.disney.com>
Subject: Re: Get an Html page from another server
Message-Id: <3675397E.26E6@online.disney.com>
Greg Ward wrote:
>
> Thomas Cunningham <cunningt@primenet.com> wrote:
> > I R A Aggie <fl_aggie@thepentagon.com> writes:
> >
> > : perldoc LWP contains the information you seek.
> >
> > : James
> >
> > Is there an easy way to do this without the LWP module?
>
> I have been known to perpetrate the following hack when I couldn't be
> bothered to download and install LWP *and* all of its dependencies (hey,
> I was in a hurry):
>
> $foo = `lynx -source $url`;
>
> Of course, this assumes you have lynx installed, which is somewhat more
> of a chore than LWP. Also, you lose a great deal of control over error-
> handling. But if a quick hack is needed...
>
> But everyone has been saying "Get LWP", and they're absolutely right.
> It does everything you need for web client hackery.
$debug = 0;
use Socket;
sub open_TCP
{
my ($FS, $dest, $port) = @_;
my $proto = getprotobyname('tcp');
socket($FS, PF_INET, SOCK_STREAM, $proto);
my $sin = sockaddr_in($port,inet_aton($dest));
connect($FS,$sin) || return undef;
my $old_fh = select($FS);
$| = 1; # don't buffer output
select($old_fh);
1;
}
sub getRemoteFile
{
local( $theFile, $theServer, $thePort, $theProxy ) = @_;
if( !defined open_TCP('REMOTESERVER', $theServer, $thePort) )
{
print "\nError connecting to web server:
http://$theServer:$thePort\n";
return( -1 );
}
print REMOTESERVER "GET $theFile HTTP/1.0\n";
print REMOTESERVER "Accept: */*\n";
print REMOTESERVER "User-Agent: remote.pl 1.0\n\n";
while( $response = <REMOTESERVER> )
{
$remote .= $response;
}
close( REMOTESERVER );
return( %remote );
}
>
> Greg
> --
> Greg Ward - software developer gward@cnri.reston.va.us
> Corporation for National Research Initiatives
> 1895 Preston White Drive voice: +1-703-620-8990 x287
> Reston, Virginia, USA 20191-5434 fax: +1-703-620-0913
------------------------------
Date: Tue, 15 Dec 1998 00:06:31 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Getting IP of connecting station
Message-Id: <bKhd2.123$g15.190@nsw.nnrp.telstra.net>
In article <36755CB4.E0556B1@patriot.net>,
Marquis de Carvdawg <carvdawg@patriot.net> writes:
> How can I get the IP address of the connecting system? I've
> tried:
>
> ...$sock->peeraddr()
# perldoc Socket
[snip]
($port, $iaddr) = sockaddr_in(getpeername(Socket_Handle));
$peer_host = gethostbyaddr($iaddr, AF_INET);
$peer_addr = inet_ntoa($iaddr);
[snip]
Does the above work for you?
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | If it isn't broken, it doesn't have
Commercial Dynamics Pty. Ltd. | enough features yet.
NSW, Australia |
------------------------------
Date: 15 Dec 1998 00:21:23 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: How to extract emails from HTML page
Message-Id: <754a23$35u$1@gellyfish.btinternet.com>
On Mon, 14 Dec 1998 22:15:51 +0100 Philip Class <philip.class@popcorn-studio.ch> wrote:
> Does anyone know if there's a module that extracts email-adresses from a
> huge textfile or html page and stores these emailadresses in a file.
> The output should be a list (file) containing all emails, that originally
> have been somewhere in the html-file.
Ho Ho Ho,
Of course you will need to use HTML::Parser and probably URI::URL and so on
and so forth - but of course unless you can bring a note from your mother
that you are not going to use this for spamming purpose I dont think that
anyone will (or should indeed) help you any further ...
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 15 Dec 1998 00:09:51 GMT
From: eln@cyberhighway.net (Erik)
Subject: Re: Ip number
Message-Id: <7549cf$fjm$2@news.cyberhighway.net>
In article <3675A56D.8CF4A490@hotmail.com>,
Torsten Lund <torsten_l@hotmail.com> writes:
> Is it possible to log the IP of the person that has accessed a
> perlscript through http?
Yes, but not necessarily reliably.
> I have a web site on a linux server, using Apache httpd.
So what was your question on Perl?
--
Erik Nielsen, Cyberhighway Internet Services NOC
> If I wanted to kill a battleship, I'd use a shitload of Harpoons.
NT is a lot cheaper.
-- Paul Tomblin, Petro in a.s.r.
------------------------------
Date: Tue, 15 Dec 1998 00:10:22 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Ip number
Message-Id: <ONhd2.124$g15.190@nsw.nnrp.telstra.net>
In article <3675A56D.8CF4A490@hotmail.com>,
Torsten Lund <torsten_l@hotmail.com> writes:
> Is it possible to log the IP of the person that has accessed a
> perlscript through http?
> I have a web site on a linux server, using Apache httpd.
This really has nothing at all to do with perl. Please, in the future,
ask CGI specific questions in a CGI group.
A CGI script has access to a bunch of environment variables, two of
which give you the 'identity' of the remote machine. REMOTE_HOST and
REMOTE_ADDRESS, I believe, but I don't know without reading the
documentation. To find out which they are, ask on one of the CGI
groups, somewhere in comp.infosystems.www.*, or read some CGi
documentation at www.cgi-resources.com.
Be warned that if the remote system uses a proxy, that you will most
likely see the proxy's address, not the client's address.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | Unix is user friendly. It's just
Commercial Dynamics Pty. Ltd. | selective about its friends.
NSW, Australia |
------------------------------
Date: 15 Dec 1998 01:10:35 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: Perl2EXE
Message-Id: <754cub$36b$1@gellyfish.btinternet.com>
On Mon, 14 Dec 1998 18:50:06 +0100 Christian <cb2001@hotmail.com> wrote:
> Hi everybody!
>
> Fast HELP wanted!
> Does someone have the fullversion of PERL2EXE? or can someone tell me where
> to download the fullversion (not the shareware trial!)
>
> i need this very much, cuz i have to write a perl script for school, but i
> don't want them to get the source, it was too much work!
>
> so please send it to me (cb2001@hotmail.com) or let me know where i can
> download it!
>
I think you'll find that this is a commercial product and therefore you
will have to pay for the full version - under these circumstances I
would be shocked if anyone would make available to you a licensed version.
My biggest problem is that if you have created a script for *school* then
how is anyone going to assess the worth of your code - to a certain extent
this is why Perl prgrammers get so precious about the style of coding -
because anyone can look at your code and criticize it. I can guarantee to
you that if everyone else took this attitude then Perl certainly but
probably most of the available programming languages would die out.
Actually I have been inspired by this - I am going to post some code that
compiles the Perl documentation so that no-one else can read it - after all
I wouldnt want anyone else to learn Perl because that might be a threat to
my employment prospects ... ;-}
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Tue, 15 Dec 1998 01:15:29 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Perl2EXE
Message-Id: <RKid2.133$g15.275@nsw.nnrp.telstra.net>
In article <754cub$36b$1@gellyfish.btinternet.com>,
Jonathan Stowe <gellyfish@btinternet.com> writes:
> Actually I have been inspired by this - I am going to post some code that
> compiles the Perl documentation so that no-one else can read it - after all
> I wouldnt want anyone else to learn Perl because that might be a threat to
> my employment prospects ... ;-}
Now _that_ would be useful. Instead of just saying 'read the
documentation, page such-and-such', we can say 'buy my documentation
decoder, and then read the documentation, page such-and-such, or pay
me to spell out the documentation for you'. Maybe we will get rich
after all.
:)
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | You can't have everything, where would
Commercial Dynamics Pty. Ltd. | you put it?
NSW, Australia |
------------------------------
Date: 15 Dec 1998 01:30:09 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Perl2EXE
Message-Id: <754e31$a53$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, Jonathan Stowe <gellyfish@btinternet.com> writes:
:My biggest problem is that if you have created a script for *school* then
:how is anyone going to assess the worth of your code - to a certain extent
:this is why Perl prgrammers get so precious about the style of coding -
:because anyone can look at your code and criticize it.
Oh, that's not a problem. perl2exe is a trick. Any programmer worth
his salt can trivially circumvent such pseudo-security bull. It's not
worth anything.
--tom
--
/* we have tried to make this normal case as abnormal as possible */
--Larry Wall in cmd.c from the perl source code
------------------------------
Date: 14 Dec 1998 23:50:55 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: Script to Convert Text to HTML
Message-Id: <75488v$35l$1@gellyfish.btinternet.com>
[Posted to comp.lang.perl.misc and somthing entirely different mailed.]
On Mon, 14 Dec 1998 12:10:38 -0800 Larry Rosler <lr@hpl.hp.com> wrote:
> [Posted to comp.lang.perl.misc and a copy mailed.]
>
> In article <753oo7$2pv$1@gellyfish.btinternet.com> on 14 Dec 1998
> 19:25:59 -0000, Jonathan Stowe <gellyfish@btinternet.com> says...
>> On Mon, 14 Dec 1998 11:44:36 EDT sugar@HWS.EDU wrote:
> ...
>> print "<TD>$field</TD>\n";
> ...
>> Of course I dont understand your data so it probably isnt as want it but
>> I leave that as an exercise for the reader.
>
> Well, if the data contain anything that might look like HTML tags, the
> above line might benefit by being preceded by:
>
> $field =~ s/</</g;
> $field =~ s/>/>/g;
>
> I *know* there is a module URI/Escape_or_whatever to do this, but you
> didn't use a module to generate the HTML, so I certainly won't!
>
Of course that'll be HTML::Entities but as I said we'll leave that as an
exercise for the reader ;-}
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 15 Dec 1998 00:10:04 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: site_perl Migration
Message-Id: <7549cs$35r$1@gellyfish.btinternet.com>
On Sun, 13 Dec 1998 11:40:05 -0500 Aravind Subramanian <aravind@genome.wi.mit.edu> wrote:
> We are moving several applications that use Perl 5.00502 to a new
> machine (same OS - solaris). Its easy enough to install Perl on the new
> machine but the site_perl on the old machine has several CPAN module
> installations. Can the site_perl simply be copied over into the new
> machine's Perl lib dir?
>
I would suggest that you should gether together all of the source for the
installed modules into one place (in their own subdirectories of course) and
then create a script that will do the whole build process for each module -
now this gets a little complicated if there are any dependencies there and
you may have to be 'root' to do 'make install' but if you merely copy the
files then you *will* run into a problem sooner or later unless you are
moving to an identical machine.
Do have fun
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 15 Dec 1998 01:31:29 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: timelocal and localtime with negative values?
Message-Id: <754e5h$3bk$1@gellyfish.btinternet.com>
On Mon, 14 Dec 1998 18:29:39 -0500 I R A Aggie <fl_aggie@thepentagon.com> wrote:
> In article <753mhc$2p8$1@gellyfish.btinternet.com>, Jonathan Stowe
> <gellyfish@btinternet.com> wrote:
>
> + On Tue, 8 Dec 1998 16:48:08 -0800 Larry Rosler <lr@hpl.hp.com> wrote:
> + >
> + > So this is Yet Another Y2038 bug. I must admit that I don't much care.
> + > :-)
> + >
> +
> + Except of course if they finally iron the the problems out of cryogenics :-0
>
> In which case, Larry will be awakened in 2038?
>
Nah, 2037 he's gotta have some time to sort all this stuff out - I'm working
on a manual system to make sure all of this works out alright. Anyhow we're
going around Larry's with a truckload of Liquid Nitrogen in a couple of weeks
now 'cause we dont want want him to burn himslef up totally over the century
thing (whatever that may be :)
;-}
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 15 Dec 1998 00:07:21 GMT
From: eln@cyberhighway.net (Erik)
Subject: Re: What can't a file handle Have in it?
Message-Id: <75497p$fjm$1@news.cyberhighway.net>
[Posted and mailed]
In article <3675A353.9D890AA7@counter.w-dt.com>,
Mike <support@counter.w-dt.com> writes:
> What characters can't a file handle have in it? Can you store the file
Like a variable, a filehandle can have letters, digits, and the underscore
character, and nothing more. In order to avoid clashing with reserved
words (current or future), it is highly recommended that filehandles be
in all uppercase.
> handle in a string variable like, $handle = "handle"; and use $handle as
> your file handle?
Yes. Just be careful to avoid any special characters or reserved words
in that string.
> If you don't know can you atleast point me to somewhere to find out. I
If someone doesn't know, I doubt they would be able to point you to
a document that contains the answer. If they could, they would know,
wouldn't they?
> have checked the perldocs, its not there. I know I've seen it somewhere
> just can't remember where.
The blue camel perhaps? Page 37? I'm not sure where it is in the online
docs, but I'm sure its there somewhere.
--
Erik Nielsen, Cyberhighway Internet Services NOC
"It is easier to port a shell than a shell script."
-- Larry Wall
------------------------------
Date: 15 Dec 1998 00:12:45 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: What can't a file handle Have in it?
Message-Id: <7549ht$6ro$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
eln@cyberhighway.net (Erik) writes:
:> handle in a string variable like, $handle = "handle"; and use $handle as
:> your file handle?
:
:Yes. Just be careful to avoid any special characters or reserved words
:in that string.
That's not so.
$handle = "/etc/motd";
open ($handle, $handle) || die "can't open $handle: $!";
while (<$handle>) {
print;
}
--tom
--
There ain't nothin' in this world that's worth being a snot over.
--Larry Wall in <1992Aug19.041614.6963@netlabs.com>
------------------------------
Date: 15 Dec 1998 00:16:05 GMT
From: eln@cyberhighway.net (Erik)
Subject: Re: What can't a file handle Have in it?
Message-Id: <7549o5$fjm$3@news.cyberhighway.net>
[Posted and mailed]
In article <7549ht$6ro$1@csnews.cs.colorado.edu>,
Tom Christiansen <tchrist@mox.perl.com> writes:
> That's not so.
>
> $handle = "/etc/motd";
> open ($handle, $handle) || die "can't open $handle: $!";
> while (<$handle>) {
> print;
> }
Wacky.
--
Erik Nielsen, Cyberhighway Internet Services NOC
I think it's a new feature. Don't tell anyone it was an accident. :-)
-- Larry Wall on s/foo/bar/eieio in <10911@jpl-devvax.JPL.NASA.GOV>
------------------------------
Date: 12 Dec 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 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 4424
**************************************
