[10241] in Perl-Users-Digest
Perl-Users Digest, Issue: 3834 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Sep 26 23:07:25 1998
Date: Sat, 26 Sep 98 20:00:22 -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 Sat, 26 Sep 1998 Volume: 8 Number: 3834
Today's topics:
Re: /etc/passwd file <gellyfish@gellyfish.btinternet.com>
Re: Best Editor for Perl (under WinNT4) - Syntax Colori <xidicone@iname.com>
Re: Best Editor for Perl (under WinNT4) - Syntax Colori (Alan Daniels)
Re: Best Editor for Perl (under WinNT4) - Syntax Colori (Michael Rubenstein)
Re: Bug in Net::FTP for ActivePerl? (Ed Kear)
Re: cookies <gellyfish@gellyfish.btinternet.com>
Re: Error 405 Method Not Allowed <gellyfish@btinternet.com>
Re: getting open(FH, "| tee $filenameVar"); to work (wo (Greg Andrews)
Re: Hashes springing into existence [Was: more regex/pa <gellyfish@gellyfish.btinternet.com>
Re: Help w/ S.Sol's DB_Manager/Search <phinneas@eskimo.com>
Re: How do I implement perl with javascript or vice ver <gellyfish@btinternet.com>
Re: How to read contents of all *.TXT files in director <rra@stanford.edu>
Re: How to strip binary data from a file (Larry Rosler)
Re: I hate it when I do that. (brian d foy)
Re: I hate it when I do that. <gellyfish@btinternet.com>
is perl better for these? <schless@sprint.ca>
Re: newbie Perl Program help <gellyfish@gellyfish.btinternet.com>
perl for apache (Wendy Liew)
Re: Perl inconsistency? <rra@stanford.edu>
Re: Perl Newbie <gellyfish@gellyfish.btinternet.com>
Re: Perl not terminating <gellyfish@gellyfish.btinternet.com>
Re: Poll: How Did You Learn Perl? (Kai Henningsen)
Re: Poll: How Did You Learn Perl? (Kai Henningsen)
Re: Porting Unix perl script to winNT servers <gellyfish@gellyfish.btinternet.com>
Re: Porting Unix perl script to winNT servers (Larry Rosler)
Re: question cgi <gellyfish@btinternet.com>
Re: removing a-z from a string. <95ncp@eng.cam.ac.uk>
Re: Search engine <gellyfish@btinternet.com>
The misspelled variabel (R. Ransbottom)
Re: The misspelled variabel <J.D.Gilbey@qmw.ac.uk>
Re: The misspelled variabel <rra@stanford.edu>
Re: The misspelled variabel <rick.delaney@shaw.wave.ca>
Re: The misspelled variabel (David Formosa)
Re: Unix Perl server? <gellyfish@gellyfish.btinternet.com>
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 27 Sep 1998 00:45:48 -0000
From: Jonathan Stowe <gellyfish@gellyfish.btinternet.com>
Subject: Re: /etc/passwd file
Message-Id: <6uk1rs$5q8$1@gellyfish.btinternet.com>
On Sun, 20 Sep 1998 22:34:40 -0400 Matthew O. Persico <mpersico@erols.com> wrote:
> And what makes you think you're going to get 12 angry perl hackers? More
> likely, you'll get 12 angry perl newbies who've been flamed on clp.misc
> and hell-bent on revenge! <grin>
Or twelve angry pERL newbies who *havent* been flamed on clp.misc yet.
/J\
Just happy posting again.kewl.
--
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: Sun, 27 Sep 1998 10:46:11 +1100
From: Jussi Jumppanen <xidicone@iname.com>
Subject: Re: Best Editor for Perl (under WinNT4) - Syntax Coloring ?
Message-Id: <360D7CC3.9DA@iname.com>
Alec Stewart wrote:
> Can anyone recommend a decent Editor for Perl (5) ? - Ideally something
> with Syntax Coloring (like KEDIT seems to do for other languages...)
You should take a look at the Zeus for Win32 Programmer's editor. It's
features include Brief, Epsilon or Wordstar keyboard emulation, status
bar, toolbar, configurable syntax colorizing, background compiler,
inline
error correction, unlimited undo/redo, keyboard macros, scripting
language,
templates and of course long filenames and much more.
For more details and even some nice screen shots of Zeus in action
check out the following web page:
http://ourworld.compuserve.com/homepages/jussi/
Jussi Jumppanen
------------------------------
Date: 27 Sep 1998 01:00:58 GMT
From: daniels@mindspring.com (Alan Daniels)
Subject: Re: Best Editor for Perl (under WinNT4) - Syntax Coloring ?
Message-Id: <6uk2oa$it0$1@camel25.mindspring.com>
On Sat, 26 Sep 1998 17:55:01 GMT, Alec Stewart <alec@venus.co.uk> wrote:
>
>Can anyone recommend a decent Editor for Perl (5) ?
>- Ideally something with Syntax Coloring
VIM is available for both Win32 and UNIX, is free, and has syntax
coloring. Admittedly, you'll probably only like it if you like VI,
but I love it personally. Take a look at http://www.vim.org.
--
=======================
Alan Daniels
daniels@mindspring.com
daniels@cc.gatech.edu
------------------------------
Date: Sun, 27 Sep 1998 02:26:22 GMT
From: miker3@ix.netcom.com (Michael Rubenstein)
Subject: Re: Best Editor for Perl (under WinNT4) - Syntax Coloring ?
Message-Id: <36179d61.228125427@nntp.ix.netcom.com>
On Sat, 26 Sep 1998 17:55:01 GMT, alec@venus.co.uk (Alec Stewart)
wrote:
>
>Hi,
>
>Can anyone recommend a decent Editor for Perl (5) ?
>- Ideally something with Syntax Coloring
>(like KEDIT seems to do for other languages...)
>
>
>I am running under WinNT 4 (SP3).
My preference is emacs. Various vi clones are also good -- I like
vim.
Both emacs and vim allow editing either in text or windowed mode.
Both have syntax coloring, but vim seems to do a better job for perl
(you could customize either to provide coloring you like). Emacs only
supports coloring in windowed mode. vim can color in either, but I
find it hard to read its coloring in text mode.
Codewright is a good commercial editor that provides syntax coloring.
However, it only works in windowed mode.
--
Michael M Rubenstein
------------------------------
Date: Sun, 27 Sep 1998 00:25:19 GMT
From: ed@roundthebend.com (Ed Kear)
Subject: Re: Bug in Net::FTP for ActivePerl?
Message-Id: <6uk0lf$2lo_002@news.albany.net>
"Eric Pan" <pan@part.net>
>I have wrote a simple code:
>
>use Net::FTP;
>
>$ftp = Net::FTP->new("ftp.microsoft.com",Debug=>1) or die "1. $!\n";
>$ftp->login("anonymous","user\@abc.com") or die "2. $!\n";
>print "pwd = " , $ftp->pwd(), "\n";
>print "ls = " , join("\n",$ftp->dir()), "\n";
>$ftp->get("dirmap.txt","dirmap.txt") or die "4. $!\n";
>$ftp->quit;
>
>and run it in WinNT 4.0 SP 3 Perl5001 Build 501 and I get the following
>results:
<snip>
>Net::FTP=GLOB(0xcb6d40)>>> PORT 10,0,1,137,0,0
>
>Net::FTP=GLOB(0xcb6d40)<<< 500 Invalid PORT Command.
>Net::FTP=GLOB(0xcb6d40)>>> PORT 10,0,1,137,0,0
>
>Net::FTP=GLOB(0xcb6d40)<<< 500 Invalid PORT Command.
>The code works fine on UNIX but no on WinNT. Please help. Thanks.
>
The workaround is to use passive mode (if the server supports it)
try
$ftp = Net::FTP->new("ftp.microsoft.com",Debug=>1,Passive=>1)
Ed
Ed Kear | RoundTheBend's
ed@roundthebend.com | Online Travel Guide for Upstate New York
| http://www.roundthebend.com/
------------------------------
Date: 27 Sep 1998 02:33:47 -0000
From: Jonathan Stowe <gellyfish@gellyfish.btinternet.com>
Subject: Re: cookies
Message-Id: <6uk86b$66e$1@gellyfish.btinternet.com>
On Mon, 21 Sep 1998 16:32:44 -0500 Eric Dalrymple <ericdal@gte.net> wrote:
> This is a multi-part message in MIME format.
> --------------410C3E7C1527
> Content-Type: text/plain; charset=us-ascii
> Content-Transfer-Encoding: 7bit
> --
> _________________________________________________
> --------------410C3E7C1527
> Content-Type: application/x-zip-compressed; name="cookielib.zip"
> Content-Transfer-Encoding: base64
> Content-Disposition: inline; filename="cookielib.zip"
I'm sure it is but I'm nt going to sort it out.
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 27 Sep 1998 02:29:15 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: Error 405 Method Not Allowed
Message-Id: <6uk7tr$65t$1@gellyfish.btinternet.com>
On Mon, 21 Sep 1998 16:38:56 -0400 sw <sloanw@desupernet.net> wrote:
> i am attempting to design a website for my company(winNT server) but always
> receive a
> '405: method not allowed' error when attempting to submit a form using perl.
Execute permissions on the directory ?
comp.infosystems.www.servers.ms-windows ?
Blah
Blah
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 26 Sep 1998 19:01:38 -0700
From: gerg@shell1.ncal.verio.com (Greg Andrews)
Subject: Re: getting open(FH, "| tee $filenameVar"); to work (won't convert var name)
Message-Id: <6uk6a2$5vd$1@shell1.ncal.verio.com>
Nick Grossman <ngrossman@searchathome.com> writes:
>Uri Guttman wrote:
>> well i ran this one liner and it works:
>>
>> perl -e '$f="bar";open F,"|tee $f"; print F "asdf\n"'
>>
>> not nice code but asdf went to the file and stdout
>>
>> maybe you should post more broken code. what you have here works.
>
>Ok, the problem was that I have a space after the pipe character. Your
>example works perfectly.
>
Nope, that's not it.
This is a piece of a script I wrote that opens output to tee
without any problem, and it has a space after the pipe character:
$logfile = "/tmp/scriptname.log.$$";
$teecmd = '/usr/bin/tee';
open(LOG, "| $teecmd $logfile") or die "Can't log to $logfile: $!\n";
Something else was wrong with your script. You mentioned trying to use
single quotes, which would definitely have told tee to create a file
with the wrong filename.
-Greg
------------------------------
Date: 27 Sep 1998 00:05:43 -0000
From: Jonathan Stowe <gellyfish@gellyfish.btinternet.com>
Subject: Re: Hashes springing into existence [Was: more regex/pattern substitution]
Message-Id: <6ujvgn$5m3$1@gellyfish.btinternet.com>
On 22 Sep 1998 23:03:43 -0400 Uri Guttman <uri@sysarch.com> wrote:
>>>>>> "TC" == Tom Christiansen <tchrist@mox.perl.com> writes:
<snip>
> TC> As seen in PCB chapter 11:
> i haven't read that far yet. i need to put pcb higher on my read queue.
I've had it a week and already it looks worse than "the C++ programming
language 2e" or either of the Camels - I've put it under the atlas to
straighten the cover out - but admittdly no pizza on it yet and that was
page 236 - now which book eh?
/J\
--
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: Sat, 26 Sep 1998 16:52:05 -0700
From: "Phinneas G. Stone" <phinneas@eskimo.com>
To: RJDsys@world.std.com
Subject: Re: Help w/ S.Sol's DB_Manager/Search
Message-Id: <360D7E25.C05683D1@eskimo.com>
I did put a print statement in right after the content-type... header. No
luck Works from the command line, but nothing makes it to the browser. When I
hit the stop button, it gives me a ">" followed by an <HR> line (the line
itself, not the code), then "Transfer interrupted!" When I run it from the
command line locally, as I said, everything works fine. However, when I run
it from the command line on my UNIX host (ISP), it just gives me another
command line prompt: no error or output or anything.
RJDsys@world.std.com wrote:
> Put some print statements in there so you can find out where it hangs.
>
> -- dave
>
> In article <360D1DCA.94012221@eskimo.com> you write:
> >I can get it to run at the command line, but not through the browser (it
> >just hangs). Yes I know about permissions and have triple-checked them.
> >Shouldn't matter anyway since I'm testing first on a Win95 machine. Yes
> >other perl cgi programs work fine on this localhost, so it's not a
> >problem there. I even hard-coded the setup file variable since it
> >wouldn't accept it from the form, and that got it to at least work from
> >the command line. I'm really pulling my hair out over this and would
> >appreciate any help. Please reply by email since I don't frequent this
> >group as often as I should.
> >
> >Thanks,
> >Phinneas
> >
> >
------------------------------
Date: 27 Sep 1998 01:00:24 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: How do I implement perl with javascript or vice versa?
Message-Id: <6uk2n8$5rq$1@gellyfish.btinternet.com>
In comp.lang.perl.misc R. Reiter <ralrei@wave.home.com> wrote:
> There are two things I'd try before starting to write client-side CGI code
> in javascript (since you know perl):
Sorry ? "client-side CGI code" ?
/J\
--
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 26 Sep 1998 17:08:50 -0700
From: Russ Allbery <rra@stanford.edu>
Subject: Re: How to read contents of all *.TXT files in directory into one file?
Message-Id: <yl67eav2lp.fsf@windlord.stanford.edu>
Michael Yevdokimov <flanker@sonnet.ru> writes:
> How to read contents of all *.TXT files in directory into one file using
> Perl?
opendir (DIR, '/path/to/directory') or die "can't open dir: $!\n";
my @files = grep { /\.TXT$/ } readdir DIR;
closedir DIR;
open (OUTPUT, '> /path/to/output/file')
or die "can't create output file: $!\n";
for my $file (@files) {
open (INPUT, "/path/to/directory/$file")
or warn "can't open $file: $!\n";
print OUTPUT while (<INPUT>);
close INPUT;
}
close OUTPUT;
--
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
------------------------------
Date: Sat, 26 Sep 1998 19:31:32 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: How to strip binary data from a file
Message-Id: <MPG.1077435d2e445823989884@nntp.hpl.hp.com>
[Posted to comp.lang.perl.misc and copy mailed.]
In article <6ujk5c$4e2$1@gellyfish.btinternet.com> on 26 Sep 1998
20:51:56 -0000, Jonathan Stowe <gellyfish@gellyfish.btinternet.com>
says...
...
> But isnt he asking how to do the equivalent of "strings" in unix with Perl ?
> I've been pissing around with a couple of REs to do this but all that is
> required is to find an expression that will remove all non-alphanumeric
> stuff from the input.
What about space and punctuation characters?
> Of course you will have to binmode your input but the whole thing amounts
> to some thing like:
>
> $input =~ s/[^\s\w]//g;
>
> (Actually that doesnt work right but can see where this is going )
How about this (assuming the file has been slurped into $_):
my @strings = /[!-~\w][!-~\w\s]{2,}[!-~\w]/g;
This defines a 'string' as a sequence of four or more 'printable' ASCII
characters (!-~ as defined by C isgraph()), or characters defined as word
characters by the locale (\w), or space characters (\s), where the first
and last characters are not space characters.
To restrict to ASCII, leave out the '\w's. To avoid locales but include
all printable ISO 8859-1 (Latin 1) characters, replace '\w' by '[\xA0-
\xFF]' but that might include too much binary stuff.
The minimum length of four is the default for the BSD strings(1) command,
which uses a definition more restrictive than this (ASCII only, ending in
new-line or null), and warns: "The algorithm for identifying strings is
extremely primitive." And so is this one!
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Sat, 26 Sep 1998 22:07:01 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: I hate it when I do that.
Message-Id: <comdog-ya02408000R2609982207010001@news.panix.com>
Keywords: from just another new york perl hacker
In article <m3g1df58jx.fsf@joshua.panix.com>, Jonathan Feinberg <jdf@pobox.com> posted:
>Perl's flexibility and expressiveness makes it possible to write a
>code phrase that compiles and runs without warning, but is not at all
>what you meant.
<homer>
i can write code that doesn't do what i meant in lots of languages.
</homer>
--
brian d foy <comdog@computerdog.com>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
Comprehensive Perl Archive Network (CPAN) <URL:http://www.perl.com>
Perl Mongers needs volunteers! <URL:http://www.pm.org/to-do.html>
------------------------------
Date: 27 Sep 1998 01:21:49 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: I hate it when I do that.
Message-Id: <6uk3vd$5uj$1@gellyfish.btinternet.com>
On 26 Sep 1998 15:04:50 +0200 Jonathan Feinberg <jdf@pobox.com> wrote:
> Perl's flexibility and expressiveness makes it possible to write a
> code phrase that compiles and runs without warning, but is not at all
> what you meant.
> I'd say that once a day, on average, I write this:
> $foo = s/something/something else/;
> when I meant to bind the regex to $foo. This results in minutes of
> frustration while I fail to see what could *possibly* be wrong with
> such a simple subroutine, or one-liner, what have you.
> I hate it when I do that.
I reckon I type that mistake once a day as well.
Possibly the reult of trying to use too many languages at once.
/J\
--
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: Sun, 27 Sep 1998 01:42:15 GMT
From: "David Schlessinger" <schless@sprint.ca>
Subject: is perl better for these?
Message-Id: <01bde9b7$e72831e0$912467d1@Mycomputer>
Wondering if perl would be helpful for these tasks, or should I stick with
something like Bourne Shell in a UNIX environment??? and why??
1) listing objects in the current directory, by full name or lexical
pattern
2) removing objects in the current directory, individually by name or
collectively by lexical pattern
3) searching contents of text files for a given string or lexical pattern
Now, if I stick with Bourne Shell, and subsequently want to translate it
into a compiled language, what language would be preferable, and why?
Dave
------------------------------
Date: 27 Sep 1998 01:34:10 -0000
From: Jonathan Stowe <gellyfish@gellyfish.btinternet.com>
Subject: Re: newbie Perl Program help
Message-Id: <6uk4mi$5vs$1@gellyfish.btinternet.com>
On Sat, 26 Sep 1998 10:46:30 -0400 caustic <caustic@causticinteractive.com>
wrote:
> Hi,
> I have been trying to write a quick CGI that displays news headlines from a
> newspage.
> Basically, this script needs to hit a flat html page and grab the first 3
> headlines it finds within <headline></headline> tags and display them on a
> homepage.
A Cursory glance at HTML::Parser would indicate that it could be configured
to work with arbitrary mark-ups. Of course you could naiively attempt:
if($text =~ m|<headline>(.*)</headline>!i)
{
$headline = $1;
}
After having read in the appropriate text into $text dealing with
multiline text appropriately this might work I suppose.
/J\
--
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 27 Sep 1998 01:42:33 GMT
From: wendy@cs.UAlberta.CA (Wendy Liew)
Subject: perl for apache
Message-Id: <6uk569$ers$1@scapa.cs.ualberta.ca>
I couldn't figure out a better group to post this ...
I need to write my prototype with some cgi script running on my apache
(win32) server. If you have an example where the server simply respnod
with all the name-value paris values and env variables for a simple
post, please let me know. Many thanks....
also, do I need to download perl.exe for apache 1.3.1 win32 version (if
you happen to know )
thanks,
wendy
------------------------------
Date: 26 Sep 1998 17:12:58 -0700
From: Russ Allbery <rra@stanford.edu>
Subject: Re: Perl inconsistency?
Message-Id: <yl3e9ev2et.fsf@windlord.stanford.edu>
Farhad Farzaneh <ff@creative.net> writes:
> First, I admit that it's probably my misunderstanding, but here is my
> problem:
> I have some code that includes (modified for testing):
> my $r = $rField->range; # a method of object instance $rField
> print "Undefined\n" if ( !defined($r));
> my @range = @$r;
> and which does print the "Undefined". It chokes on the last line with
> the following error:
> # Can't use an undefined value as an ARRAY reference.
> However, when I try to build a short script to test this behaviour, I
> never get this error. I'm not sure why this error occurrs in one case
> and not in another.
I tested this on my system, which is running Perl 5.005_02, and it only
prints out the error about using an undefined value as an ARRAY reference
if the code is run under use strict. Otherwise, the script ran fine.
Could that be the difference? Are you running your application under use
strict but not your testing scripts?
--
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
------------------------------
Date: 27 Sep 1998 02:07:14 -0000
From: Jonathan Stowe <gellyfish@gellyfish.btinternet.com>
Subject: Re: Perl Newbie
Message-Id: <6uk6ki$63k$1@gellyfish.btinternet.com>
On Sat, 26 Sep 1998 15:24:26 -0500 Butch Bridges <bridges@brightok.net> wrote:
> I know nothing about Perl. Been told we can use it to "convert" out DBF
> records here at the courthouse to an HTML format so the records can be
> placed on our website for the public to search/access. If we place our
> records on the Net, we will be the first courthouse in Oklahoma to do
> so.
Hey I've been asked all of the Minutes and Agendas of our Council from
AmiPro to HTML and thats *easy*.
> Would anyone be willing to me help achieve this goal?
Yeah check out the DBD::XBase modules from CPAN. If you are feeling really
*bad* then I have the specs for the DBF files right here.
Or maybe
> there is another way of making these rocords available on the Net?
> Please send me email at bridges@brightok.net if you would like
> to be a part of this First.
No that is fine - however most people would like to see some details about
the input data and the output format before commiting themselves ;-}
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 27 Sep 1998 01:51:44 -0000
From: Jonathan Stowe <gellyfish@gellyfish.btinternet.com>
Subject: Re: Perl not terminating
Message-Id: <6uk5ng$620$1@gellyfish.btinternet.com>
On Sat, 26 Sep 1998 13:45:46 -0400 Michel Prevost <michel.prevost@cactuscom.ca_REMOVE_TO_MAIL> wrote:
> Hi all
> Have anyone ever experienced a perl script not terminating and found the
> solution?
^C ^| or in extremis kill -9 <PID> ;-}
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 27 Sep 1998 01:36:00 +0200
From: kaih=71fSWBCXw-B@khms.westfalen.de (Kai Henningsen)
Subject: Re: Poll: How Did You Learn Perl?
Message-Id: <71fSWBCXw-B@khms.westfalen.de>
richgrise@entheosengineering.com (Rich Grise) wrote on 23.09.98 in <3609449C.31D@entheosengineering.com>:
> Excellent point - maybe the question should be,
> "How did you learn enough perl to start hacking Matt's scripts?"
> or
> "How did you learn enough perl to field a working CGI?"
> or
> "How did you learn enough perl to ask an intelligent question?"
> or
> "How did you learn enough perl to get yourself into serious trouble?"
Or
"Why on earth are people so fixated on CGI programming?"
I've done a number of different things with Perl, including net stuff. For
example, I've written yet another web mirror.
But not a single CGI, so far.
Kai
--
http://www.westfalen.de/private/khms/
"... by God I *KNOW* what this network is for, and you can't have it."
- Russ Allbery (rra@stanford.edu)
------------------------------
Date: 27 Sep 1998 01:49:00 +0200
From: kaih=71fSWHFXw-B@khms.westfalen.de (Kai Henningsen)
Subject: Re: Poll: How Did You Learn Perl?
Message-Id: <71fSWHFXw-B@khms.westfalen.de>
jdporter@min.net (John Porter) wrote on 23.09.98 in <360923EC.8E9919D0@min.net>:
> From what resource(s) did you learn Perl?
>
> . Llama v.1
> . Llama v.2
> . Camel v.1
> X Camel v.2
> . Other book (give name)
Before I had the camel, I tried Ellie Quigley's "Perl by Example" (in
the German translation). That convinced me I really wanted the camel,
but I did learn *something*.
Reading the panther right now.
> X Docs included in the distribution
This was actually what I started with. Not what I'd recommend, though.
> . Something on the WWW
> X Studying existing code
> . Class/tutor
I think I learnt most about the language from the camel, and that's where
I prefer to look for language features. For modules, online docs are
usually fine.
Kai
--
http://www.westfalen.de/private/khms/
"... by God I *KNOW* what this network is for, and you can't have it."
- Russ Allbery (rra@stanford.edu)
------------------------------
Date: 27 Sep 1998 02:15:54 -0000
From: Jonathan Stowe <gellyfish@gellyfish.btinternet.com>
Subject: Re: Porting Unix perl script to winNT servers
Message-Id: <6uk74q$64i$1@gellyfish.btinternet.com>
On Sat, 26 Sep 1998 21:38:50 GMT Belle <Sweets@sugarhigh.com> wrote:
> After several hours of hunting a good shopping cart script, I finally
> found one that looked PERFECT for me. Unfortunately, the script was
> for Unix based servers and may not run on NT servers, which is what my
> host uses. Could someone tell me if it's possible to edit this script
> (http://www.virtualcenter.com/scripts2/WWWOrder2.html) for NT? Any
> help would be appreciated.
I'm sure that it is - however it is kinda tricky knowing what needs to be
edited when one doesnt know what it is that isnt working?
Some typical problems (off the top of my head):
1) use of unix specific external programs
2) use of unix kernel specific fuctionality (i.e. fork(), alarm())
3) use of unix style pathnames
And many more besides that I hadnt thought of - deeedddadededalaadea.
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: Sat, 26 Sep 1998 19:39:46 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Porting Unix perl script to winNT servers
Message-Id: <MPG.1077454b1d35b654989885@nntp.hpl.hp.com>
[Posted to comp.lang.perl.misc and copy mailed.]
In article <360d5e21.29780689@news.mindspring.com> on Sat, 26 Sep 1998
21:38:50 GMT, Belle <Sweets@sugarhigh.com> says...
> After several hours of hunting a good shopping cart script, I finally
> found one that looked PERFECT for me. Unfortunately, the script was
> for Unix based servers and may not run on NT servers, which is what my
> host uses. Could someone tell me if it's possible to edit this script
> (http://www.virtualcenter.com/scripts2/WWWOrder2.html) for NT? Any
> help would be appreciated.
The best help I can give is to suggest that you try it. It is too much
trouble to download and examine the program from the URL you have
provided.
The CGI protocol is portable, and so is Perl. Unless the program invokes
command support via system() or qx// etc., or plays fast and loose with
file names, everything should work 'out of the box'.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 27 Sep 1998 02:59:36 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: question cgi
Message-Id: <6uk9mo$69n$1@gellyfish.btinternet.com>
On Tue, 22 Sep 1998 10:31:17 +0200 zaliko <miro@rain.fr> wrote:
> bonjour
> comment tester en local des cgi et programme perl avec mon navigateur
> sans activer un serveur http sur ma machine
> est ce possible ,et comment faire !
Sorry my French failed me but I figure you ought to use CGI.pm to test
whether your scripts will work or not.
To see the results of yout CGI in your navigateur you will need a server.
However it is not a problem to have un petit serveur on your PC with wich
you can test your CGI stuff.
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: Sun, 27 Sep 1998 03:50:45 +0100
From: Nigel Parker <95ncp@eng.cam.ac.uk>
To: Jim Weeks <jim@siteplus.com>
Subject: Re: removing a-z from a string.
Message-Id: <Pine.HPP.3.96L.980927034929.6422A-100000@club.eng.cam.ac.uk>
On Sat, 26 Sep 1998, Jim Weeks wrote:
: Bmw Volvo 205-894-5660
:
: $line =~ s/a-z//g; #remove lower case.
: $line =~ s/A-Z//g; #remove upper case.
You simply need $line =~ s/[a-zA-Z]+//g;
I think!
Nigel
--
Girton College, Cambridge, England, CB3 0JG. Tel: 0411 384803
http://welcome.to/nigels nigel.parker@iee.org
------------------------------
Date: 27 Sep 1998 02:41:15 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: Search engine
Message-Id: <6uk8kb$67q$1@gellyfish.btinternet.com>
On Mon, 21 Sep 1998 17:54:01 -0700 E-swap <webmaster@eswap.co.uk> wrote:
> Hi
> Does anyone know of a perl/cgi serach engine available. Not a search for
> your site but for the net as a whole. Similar to yahoo, excite, lycos etc.,
> etc., etc.
No. But I'm sure if you looked at the LWP::RobotUA module and its
documentation you'd get the idea.
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 26 Sep 1998 20:10:08 -0400
From: rir@phavl.ultranet.com (R. Ransbottom)
Subject: The misspelled variabel
Message-Id: <6ujvp0$7rm$1@phavl.ethernet>
The misspelled variable is a favorite error
of mine in languages which don't require
explicit declaration of variables. I have
transferred this ability from sh to ksh to
perl.
( $style, $size, $dest ) = split $_;
if ( $syle eq "tomato" ) { $dest = $stage; }
I am seeking tips, tricks and/or tools
that would help with this problem.
Thanks.
--
rob
rir@phavl.ultranet.com
------------------------------
Date: Sun, 27 Sep 1998 01:30:37 +0100
From: Julian Gilbey <J.D.Gilbey@qmw.ac.uk>
Subject: Re: The misspelled variabel
Message-Id: <360D872D.262951F9@qmw.ac.uk>
R. Ransbottom wrote:
>
> The misspelled variable is a favorite error
> of mine in languages which don't require
> explicit declaration of variables. I have
> transferred this ability from sh to ksh to
> perl.
>
> ( $style, $size, $dest ) = split $_;
> if ( $syle eq "tomato" ) { $dest = $stage; }
>
> I am seeking tips, tricks and/or tools
> that would help with this problem.
use strict;
at the beginning of your script forces all variables to be
pre-declared with my. Look up perldsc(1).
Julian
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Julian Gilbey Email: J.D.Gilbey@qmw.ac.uk
Dept of Mathematical Sciences, Queen Mary & Westfield College,
Mile End Road, London E1 4NS, ENGLAND
-*- Finger jdg@goedel.maths.qmw.ac.uk for my PGP public key. -*-
------------------------------
Date: 26 Sep 1998 17:35:16 -0700
From: Russ Allbery <rra@stanford.edu>
Subject: Re: The misspelled variabel
Message-Id: <yln27mtmt7.fsf@windlord.stanford.edu>
R Ransbottom <rir@phavl.ultranet.com> writes:
> The misspelled variable is a favorite error of mine in languages which
> don't require explicit declaration of variables. I have transferred
> this ability from sh to ksh to perl.
> ( $style, $size, $dest ) = split $_;
> if ( $syle eq "tomato" ) { $dest = $stage; }
> I am seeking tips, tricks and/or tools that would help with this
> problem.
use strict;
--
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
------------------------------
Date: Sun, 27 Sep 1998 00:41:41 GMT
From: Rick Delaney <rick.delaney@shaw.wave.ca>
Subject: Re: The misspelled variabel
Message-Id: <360D8B4A.609B85D2@shaw.wave.ca>
[posted & mailed]
R. Ransbottom wrote:
>
> I am seeking tips, tricks and/or tools
> that would help with this problem.
You will probably get a lot of responses to this telling you to use the
-w switch. You will get a lot of responses because it can't be stressed
enough how useful it is.
If you run your program as
perl -w scriptname
from the shell or use
#!/your/path/to/perl -w
at the top of your scripts you will get all sorts of useful warnings
that help you debug your programs.
One of the most prevalent of warnings (at least in my scripts) is
Name "main::syle" used only once: possible typo at temp line 3.
This will catch many typos like the one you described and make it easy
for you to find and fix them.
For more info:
perldoc perl
perldoc perlrun
--
Rick Delaney
rick.delaney@shaw.wave.ca
------------------------------
Date: 27 Sep 1998 12:19:05 +1000
From: dformosa@zeta.org.au (David Formosa)
Subject: Re: The misspelled variabel
Message-Id: <6uk7ap$ipd$1@godzilla.zeta.org.au>
In <6ujvp0$7rm$1@phavl.ethernet> rir@phavl.ultranet.com (R. Ransbottom) writes:
>The misspelled variable is a favorite error
>of mine[...]
>I am seeking tips, tricks and/or tools
>that would help with this problem.
use strict 'vars';
--
Please excuse my spelling as I suffer from agraphia. See the URL in my
header to find out more.
------------------------------
Date: 26 Sep 1998 23:44:24 -0000
From: Jonathan Stowe <gellyfish@gellyfish.btinternet.com>
Subject: Re: Unix Perl server?
Message-Id: <6uju8o$5j6$1@gellyfish.btinternet.com>
On Fri, 25 Sep 1998 13:22:43 -0400 Joseph DuBois <jdubois@keane.com> wrote:
> Peter Moore wrote:
>> Joseph,
>> Do you mean on a web server? If so, there is a module for the Apache
>> www server which does this.
>> regards
>> peter
>>
> No, There was a deamon that ran as a background process that acted as
> the perl interpreter. That way it was always running and you did not have
> the startup time of starting perl each time a process was spawned. The
> need for this will probably go away when the compiler is fully functional
> though.
> This was a commercial program, but I can't remeber the company.
I dont know of any commercial product that does this - but mod_perl *does*
go a long way to creating a persistent instance of a given script with
many side benefits besides.
The implentation of Perl that shipped with Novell IntraNetware also ran in
a "persistent" manner as an NLM - that is that the script was passed to it
over a socket connection of course one could exploit that security hole:
bung your favourite corrupt Perl script down port 8871 or whatever. I
have the Netware Developers SDK for NW5 on my desk at work (or did until
I tidied up ;-) but havent tried out that Perl yet.
Anyhow when are Novell going to releae their Perl 5.* to the community ?
I think they could win a lot of brownie points if they did.
/J\
--
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
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 3834
**************************************
