[11642] in Perl-Users-Digest
Perl-Users Digest, Issue: 5242 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Mar 27 23:07:29 1999
Date: Sat, 27 Mar 99 20:00:18 -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 Mar 1999 Volume: 8 Number: 5242
Today's topics:
Re: Can Somedy Stop This Script From Crashing the Log F <gellyfish@gellyfish.com>
Re: Can Somedy Stop This Script From Crashing the Log F <skilchen@swissonline.ch>
Re: change default file type in file upload <gellyfish@gellyfish.com>
Re: DNS Module for Perl (David Efflandt)
Re: HELP HELP HELP HELP HELP <ffchopin@worldnet.att.net>
Help with named named pipes and ipc!!! (Noah Silverman)
Re: Help: Memory troubles <gellyfish@gellyfish.com>
Re: Initializing an array with STDIN (newbie) (Bob Trieger)
Re: Input Password <gellyfish@gellyfish.com>
Re: internal server error <gellyfish@gellyfish.com>
Is it possible to do this with a module?? <biwillia@cisco.com>
Re: Need automatic forwarding perl script <gsx97@usa.net>
Re: Newbie ques., clearing an array (Larry Rosler)
Re: Passing parameters <ffchopin@worldnet.att.net>
Re: Passing parameters <ffchopin@worldnet.att.net>
Re: Passing parameters <gellyfish@gellyfish.com>
Re: Perl script goes zombie, help! <gellyfish@gellyfish.com>
Re: PROBLEM reading file in array (Larry Rosler)
Re: Q: redefined subroutines <gellyfish@gellyfish.com>
Re: Reading results of external commands <gellyfish@gellyfish.com>
Require Question <mwatkins@promotion4free.com>
Re: Split with + , but no %2B <cassell@mail.cor.epa.gov>
Re: Split with + , but no %2B <gellyfish@gellyfish.com>
Re: Split with + , but no %2B (brian d foy)
tie-ing 1000+ hashes is failing. help! <princecharles7045@my-dejanews.com>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 28 Mar 1999 00:54:38 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Can Somedy Stop This Script From Crashing the Log File?
Message-Id: <7djuke$23i$1@gellyfish.btinternet.com>
On Fri, 26 Mar 1999 04:23:01 GMT tatabu@my-dejanews.com wrote:
Subject: Can Somedy Stop This Script From Crashing the Log File?
I havent seem it spelt like that for ages but here goes:
Did you hear Luton Town spent two million pounds last week - they managed
to buy two key supporters ...
Did that help ;-}
/J\
--
Jonathan Stowe <jns@gellyfish.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: Sun, 28 Mar 1999 03:01:01 +0200
From: "Samuel Kilchenmann" <skilchen@swissonline.ch>
Subject: Re: Can Somedy Stop This Script From Crashing the Log File?
Message-Id: <7djv5f$921$1@news.swissonline.ch>
tatabu@my-dejanews.com schrieb in Nachricht
<7df22t$rht$1@nnrp1.dejanews.com>...
>This CGI script keeps deleting the contents of the
>HTML LOG file it reads/recreates too often. Can somebody
>fix it? I would appreciate it.
>
>open (LOG, ">$logpath") || die;
NEVER, NEVER, NEVER do that, if you want to control access to a file via
locking!
The file is truncated BEFORE the following flock will prevent concurrent
accesses to the file.
>flock (LOG,2);
change your open to something like:
open(LOG, "+<$logpath") || die;
--
Samuel Kilchenmann
skilchen@swissonline.ch
------------------------------
Date: 28 Mar 1999 02:44:12 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: change default file type in file upload
Message-Id: <7dk1hc$282$1@gellyfish.btinternet.com>
On Thu, 25 Mar 1999 21:40:58 GMT esun_@yahoo.com wrote:
>
> Is there any way to make sure netscape browser shows all types of file when
> "Browse" button is pressed? Your help is appreciated in fixing this problem.
>
If there is a way to do this then it is nothing to do with Perl as moments
thought would indicate - it is too late for perl to have anything to do
with it ...
/J\
--
Jonathan Stowe <jns@gellyfish.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: 28 Mar 1999 00:11:43 GMT
From: efflandt@xnet.com (David Efflandt)
Subject: Re: DNS Module for Perl
Message-Id: <slrn7fqsrj.n4.efflandt@efflandt.xnet.com>
On Thu, 25 Mar 1999 16:45:42 -0700, David Rose <rose@gsc.nrcan.gc.ca> wrote:
>I need to reconcile Internet addresses for out domain and would like to know
>if Perl can handle the job. I've checked at CPAN and there is a DNS module,
>however, its several years old and mentions that it is buggy.
Do you need to do more than you can do with gethostbyname or
gethostbyaddr? I use gethostbyaddr to resolve hostnames, because our
webserver doesn't and gethostbyname for various hostname checks including
rejecting any obviously bogus domains in e-mail addresses, URL's, etc.
>My preferred platform for Perl is Win95, however, I can also run it on a
>number of Unix systems.
I gave up on Win95 perl long ago. Linux works much closer to my Solaris
ISP without having to make any script changes at all.
>Many Thanks
>
>
>- Dave Rose
>
>--
>================================================
>David Rose, Gological Survey of Canada, Calgary
>Phone: (403) 292-7129 Fax: (403) 292-5377
>E-Mail: rose@gsc.nrcan.gc.ca
--
David Efflandt efflandt@xnet.com
http://www.xnet.com/~efflandt/
------------------------------
Date: Sat, 27 Mar 1999 20:55:48 -0500
From: "Jason Simms" <ffchopin@worldnet.att.net>
Subject: Re: HELP HELP HELP HELP HELP
Message-Id: <7dk2l6$mmf$1@mtinsc02.worldnet.att.net>
Please take your issue to the following newgroup, where you will likely find
more information on CGI:
comp.infosystems.www.authoring.cgi
Also, more people will be apt to read and assist if your Subject line is
more informative...
Jason Simms
salbarcar@my-dejanews.com wrote in message
<7di2ef$dvn$1@nnrp1.dejanews.com>...
>Is it possible to use an ssi tag from within a cgi (perl) script? I'm
trying
>to customize the look of the HTML output of a script that I have and I'd
like
>the outputted page to include some ssi tags.
>
>IS THIS POSSIBLE??!!! I've tried it and it doesn't work obviously. Is there
>another way of doing it?
>
>PLEASE E-MAIL ME AT steve@grandemesa.com if you have an answer.
>
>-----------== Posted via Deja News, The Discussion Network ==----------
>http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Sat, 27 Mar 1999 22:11:37 -0500
From: noah@allresearch.com (Noah Silverman)
Subject: Help with named named pipes and ipc!!!
Message-Id: <noah-2703992211370001@slip129-37-96-75.ny.us.ibm.net>
Help,
I am trying to set up a simple system to process a large amount of data.
My main program gathers the data to process and writes it to a named pipe.
I want to have 4 or 5 copies of the same processing script that will take
turns pulling data from the named pipe as they are ready.
The code looks something like this:
main.pl
open(out, "namedpipe");
foreach $item (@list){
prinnt out $item;
}
process.pl
open IN, "<namedpipe")
while (<IN>){
pint $_; # OR DO THE OTHER PROCESSING TASKS HERE
}
Ideally, I should have several copies of the "process.pl" program
runninng. This would allow the data to be processed much faster than by a
single program
MY PROBLEM IS: The first copy of process.pl starts working fine, but the
other copies never read any data from the pipe or process anythinng.
HELP, HELP
------------------------------
Date: 28 Mar 1999 02:28:37 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Help: Memory troubles
Message-Id: <7dk0k5$27u$1@gellyfish.btinternet.com>
On Wed, 24 Mar 1999 15:17:45 GMT bmonti@my-dejanews.com wrote:
> The following Perl script was handed to me to fix.
> I am not at all a Perl guru, so I am having a trouble figuring out how to fix
> it.
>
<snip>
> Here is my plea: - if you have the time, please take a look at the code and
> offer any help that you can.
>
<snip>
> for $htmllinenum ( $first..$#htmllines ) { if( $htmllines[$htmllinenum] =~
> m/<!--: *for *([0-9]+) *-->/i ) # FOR LOOPS { # $global_index =
> $htmllinenum + 1; # my $local_index = $htmllinenum + 1; # # if(
> $#{$sets[$1]} > -1 ) # { # for $rownum ( 0..$#{$sets[$1]} ) # { #
> $forindex++; # push( @forhistory, $rownum ); # $accum .= parse_html(
<etc>
you can forget it matey ...
/J\
--
Jonathan Stowe <jns@gellyfish.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: Sun, 28 Mar 1999 01:15:52 GMT
From: sowmaster@juicepigs.com (Bob Trieger)
Subject: Re: Initializing an array with STDIN (newbie)
Message-Id: <7djvui$hl6$1@oak.prod.itd.earthlink.net>
Sender <fairfiel@dundee.net> wrote:
>Hello
>
> If the answer to my question is anywhere in the llama book, just say
>where!
>
> I've been trying to place an input file into an array, and then split()
>that array. I get messages indicating that the array is not initialized:
>"Use of implicit split to @_ is deprecated," and "Use of uninitialized
>value at line xxx, <INFILE> chunk xxx."
>
>
>I've tried a few approaches:
>
>1. Use a loop to read each line from the text file into the array. Use
>the split() function after each line is read in, or after the whole
>array has been (supposedly) filled.
>
>2. Put the data file directly into the array:
> @order = <INFILE>; (With variations in syntax).
You posted 1 line of code and it is valid.
Try posting the 5lines before and the 5 lines after this line or the all of
your code if it is not too long (less than 20 lines).
Bob Trieger
sowmaster@juicepigs.com
------------------------------
Date: 28 Mar 1999 02:49:33 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Input Password
Message-Id: <7dk1rd$28s$1@gellyfish.btinternet.com>
On 27 Mar 1999 16:50:39 GMT Huang Lee wrote:
>
> but now,if I want to add another function like "Press any key to stop".
> I mean I can input "one key" without ENTER.
> and the program will not stop.until I type something....
> what should I do....(Under telnet mode,I am server on unix)
fish,seeds,tools, Term::ReadKey ...
/J\
--
Jonathan Stowe <jns@gellyfish.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: 28 Mar 1999 00:24:19 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: internal server error
Message-Id: <7djsrj$23e$1@gellyfish.btinternet.com>
On Sat, 27 Mar 1999 23:57:00 +0100 Frank de Bot wrote:
> You must chmod them 755.
>
I think that 777 is just as likely to work as 755 - this is not the problem
they could be 555 500 733 701 blah .. depending on who the owner of the
file was and who was trying to run them.
/J\
--
Jonathan Stowe <jns@gellyfish.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: Thu, 25 Mar 1999 16:13:12 -0500
From: Bill Williams <biwillia@cisco.com>
Subject: Is it possible to do this with a module??
Message-Id: <36FAA6E8.6B0306FA@cisco.com>
Is it possible to use a module written to support logging for a program,
and have
the output of the progam go to logs handled by options in the module?
In other words, I have written a module that handles notification that
when a lengthy
process is done, but I also want to be able to turn on and off logging
from the parent
script, and not worry about the logs once I have called the module... I
don't think it's
feasible to pass info from the parent process to a separate filehandle,
but I could be
wrong.... please show me the error of my ways.
--
Thanks,
__________________________
Bill Williams
ERP Systems Administrator
Cisco Systems - RTP-IS
------------------------------
Date: Sat, 27 Mar 1999 19:14:31 -0500
From: "J. Parsons" <gsx97@usa.net>
Subject: Re: Need automatic forwarding perl script
Message-Id: <7djs3n$kdu@news1.snet.net>
Realize of course that this NG is for Perl questions. For searching for
scripts, try one of those search engine things. They put so much hard work
into them, it would be a damn shame not to use them.
To answer your question, you don't need a script to do what you're asking.
Put this in your page:
<html>
<head>
<title></title>
<meta http-equiv="REFRESH" content="1; url=http://www.new-site.com">
</head>
<body>
</body>
</html>
-------------
content="1 Change the 1 to the # of seconds before moving them.
url=http://www.new-site.com Change to the new site to send to.
That's all. Good Luck.
Beny Spensieri <bernardino.spensieri@utoronto.ca> wrote in message
news:36FD1EE7.D2C0F627@utoronto.ca...
> I need a script that will forward a user to another page after a
> few seconds. This is commonly used to send web serfers to the
> new location of a web page that has moved.
>
> Please e-mail your responses to me, thanks.
>
> Beny
> --
> ___________ "I have summoned you here for a purpose..."
> // I \\ "Nobody summons Megatron!"
> // I \\ "Then it pleases me to be the
> first..."
> // /UUU\ \\
> II /UUUUUUU\ II
> II======]U> <U[======II o
> II \UUUUUUU/ II /|\\
> \\ \UUU/ // / \
> \\ I //
> \\_____I_____//
------------------------------
Date: Sat, 27 Mar 1999 19:02:39 -0800
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Newbie ques., clearing an array
Message-Id: <MPG.11673ba5c4f2464f9897dc@nntp.hpl.hp.com>
[Posted and a courtesy copy sent.]
In article <7djh34$1ot$1@gellyfish.btinternet.com> on 27 Mar 1999
21:03:32 -0000, Jonathan Stowe <gellyfish@gellyfish.com >says...
> On Sat, 27 Mar 1999 16:13:03 GMT Neil Cherry wrote:
...
> > 1) How does one clear an array after it's bee filled?
> >
> Clear in what way ?
>
> $#array = -1;
> @array = ();
> shift @array while $#array;
>
> I could go on getting increasingly incorrect.
You've gone far enough!
If there are any elements in the array before this statement, you are
left with one element. If there are no elements in the array before
this statement, there will be a L--O--N--G delay before the next
statement gets executed.
You mean:
shift @array while @array;
Though why one would choose such an approach is incomprehensible!
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personl/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Sat, 27 Mar 1999 20:52:53 -0500
From: "Jason Simms" <ffchopin@worldnet.att.net>
Subject: Re: Passing parameters
Message-Id: <7dk2g1$mc8$1@mtinsc02.worldnet.att.net>
This is a CGI issue, so your questions are best taken to the following
group:
comp.infosystems.www.authoring.cgi
For excellent CGI instruction, read Lincoln Stein's Guide to CGI.pm (he
wrote it the module, so he knows what's going on) published by
Addison-Wesley. Also, read the CGI chapter in Learning Perl, by
Christiansen et al.
Jason Simms
Olivier Maas wrote in message <36FBB917.D453E555@at-lci.com>...
>Hi,
>I cannot print the parameters I give to a perl prog via a form, any
>idears why
>
>my HTML page:
><html>
><BODY>
>
><FORM ACTION="c:/NewArbor/Olivier/Web/prems.pl" METHOD="POST">
> URL : <INPUT NAME="Url" VALUE="http://www."
>SIZE=30> <P>
> Titre de la page : <INPUT NAME="Titre" SIZE=40><P>
> Auteur : <INPUT NAME="Nom" SIZE=25 VALUE="Me"><P>
> E-mail : <INPUT NAME="Email" SIZE=25 VALUE="htt@"><P>
>
> <INPUT TYPE="SUBMIT" VALUE=Inscription>
> </FORM>
></body>
></html>
>
>and prog .pl:
>comments are due to the fact that I cannot get the html page directly
>(pb with my Windows NT environement, still trying to figure out), I
>therefore print a file on the disk to continue the tests.
>
>#!/bin/perl
>#push(@INC,'/Perl');
>#Require("CGI.pm");
>#use CGI ;
>#$html= CGI->new ;
>#print $html->header ;
> $Url='test';
>#Les lignes qui suivent construisent un fichier HTML
>open(TES,'>c:/NewArbor/Users/Olivier M/Web/tes2.html');
> print TES "<HTML>\n";
> print TES "<HEAD>\n";
> print TES "<TITLE>titre de la page renvoyie</TITLE>\n";
> print TES "</HEAD>\n";
> print TES "<BODY>\n";
> print TES "\n";
> print TES "<H1>Mon 3 exemple</H1>\n";
>There is where I tried to get my arguments... I tried several syntaxes
>but... nothing
> print TES "recuperation de Url: $Url\n";
> print TES "recuperation de nom: $input\n";
>print TES "recuperation de Email: $input{'Email'}\n";
> print TES "\n";
> print TES "</BODY>\n";
> print TES "</HTML>\n";
>close(TES)
>
>Please mail back to maas@ensae.fr
>
------------------------------
Date: Sat, 27 Mar 1999 21:01:14 -0500
From: "Jason Simms" <ffchopin@worldnet.att.net>
Subject: Re: Passing parameters
Message-Id: <7dk2vb$ni1$1@mtinsc02.worldnet.att.net>
> Also, read the CGI chapter in Learning Perl, by Christiansen et al.
Sorry Randle, should have had your name there(!)...
Jason Simms
------------------------------
Date: 28 Mar 1999 03:48:35 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Passing parameters
Message-Id: <7dk5a3$2d9$1@gellyfish.btinternet.com>
On Sat, 27 Mar 1999 21:01:14 -0500 Jason Simms wrote:
>> Also, read the CGI chapter in Learning Perl, by Christiansen et al.
>
> Sorry Randle, should have had your name there(!)...
>
Is this a new take on the Schwartzian Transform ? This is the second
similar rendering I have seen today .
/J\
--
Jonathan Stowe <jns@gellyfish.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: 28 Mar 1999 00:02:42 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Perl script goes zombie, help!
Message-Id: <7djrj2$220$1@gellyfish.btinternet.com>
On Sat, 27 Mar 1999 20:59:43 +0100 Vanja Bertalan wrote:
> What I'm trying to do is web based interface 4 my intranet users to be
> able to dial-up the internet.
> After all the testing which goes well I need to fire something like "ifup
> ppp0" for example. The command executes but the program becomes zombie,
> and occasionally kills apache...which is not good, right.
> After firing "ifup..." I need to run additionall tests on ifconfig and ps
> to figure out when is the connection established but that's out of
> question because you can't talk to zombie :(
> I tried with system, exec, backticks --- same result.
> If you need additionall info, just name it, I'm out of ideas.
Of course this has nothing to do with Perl as far as I can see but if
you are using 'pppd' then this should run a program 'ip_up' after the
network is established - mine is written in Perl and does one or two
useful things - there will also be an 'ip_down' to help you clean up.
/J\
--
Jonathan Stowe <jns@gellyfish.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: Sat, 27 Mar 1999 19:26:01 -0800
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: PROBLEM reading file in array
Message-Id: <MPG.1167411d3788c99897dd@nntp.hpl.hp.com>
In article <36FD62DA.C5264EA9@yahoo.com> on Sat, 27 Mar 1999 16:59:39 -
0600, David <dave_illini@yahoo.com >says...
...
> To allow an entire text line with many words, insert these changes
> into the code below
> $temp=~(s/^\s+//) if $temp=~/^\s+/;
That line does nothing different from the following, only slower:
$temp =~ s/^\s+//;
...
> open(FILE_TO_READ,"+<any_text_file");
Why do you want to open this file with permission to write on it? Where
is the test if the 'open' fails?
open FILE_TO_READ, "any_text_file" or die "Couldn't open file. $!\n";
> local($uncommented_lines_read=0);
> local(@text_read=());
Read up in perlfunc on the distinction between 'local' and 'my'. You
seldom want to use 'local', and this is not one of the times you do.
> while(<FILE_TO_READ>)
> {
> if((!/#/)&&(/\w/)) #ignores commented or blank lines
To save indenting all the rest of the code in a block, it is neater to
just get to the next iteration directly.
next if /#/ || !/\w/;
> {
> local($temp)=$_;
Why not just do all the work on $_? The code is much cleaner that way.
> #removes carriage return so it won't be placed into the array
>
> chomp $temp;
> ###Your changes go here
> $temp!~(m/(^\w)(\s)/) || die "Error: Use only one word per line in the
> file youre reading!\n";
None of the parentheses there does anything. And the regex means "a
string that begins with one word character and a space". Is that what
you really mean?
> #gets rid of leading white spaces
> $temp=~(s/^\s+//g) if $temp=~/^\s+/;
$temp =~ s/^\s+//;
> ###End your changes
> $text_read[$uncommented_lines_read]=$temp;
> $uncommented_lines_read++;
push @text_read, $temp;
> }
> }
> close FILE_TO_READ;
>
> return @text_read;
> }
...
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personl/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 28 Mar 1999 02:05:04 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Q: redefined subroutines
Message-Id: <7djv80$24o$1@gellyfish.btinternet.com>
On Thu, 25 Mar 1999 23:04:25 +0100 Peter John Acklam wrote:
> I've stripped away everything that does not seem to cause the problem,
> and I am left with a Perl file only containing
>
> #!/local/bin/perl5 -w
>
> use strict;
> use File::Spec;
> use Dirhandle;
>
> but when I run, or just syntax-check it, I get
>
> Subroutine new redefined at E:\PERL\lib/Dirhandle.pm line 32.
> Subroutine DESTROY redefined at E:\PERL\lib/Dirhandle.pm line 43.
> Subroutine open redefined at E:\PERL\lib/Dirhandle.pm line 48.
> Subroutine close redefined at E:\PERL\lib/Dirhandle.pm line 54.
> Subroutine read redefined at E:\PERL\lib/Dirhandle.pm line 60.
> Subroutine rewind redefined at E:\PERL\lib/Dirhandle.pm line 66.
>
> How do I avoid these error messages? Not using -w is hardly a good
> solution, I think.
>
> I am using Perl version 5.005_02 built for MSWin32-x86-object, with
> File::Spec version 0.6. Dirhandle contains no version information.
>
I didnt get these results when I tried something using those modules - so
it is possibly a problem with the way that Perl is built or there is
something going on in your code that you are not telling us about.
/J\
--
Jonathan Stowe <jns@gellyfish.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: 28 Mar 1999 02:09:05 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Reading results of external commands
Message-Id: <7djvfh$253$1@gellyfish.btinternet.com>
On Fri, 26 Mar 1999 14:19:08 -0700 David Rose wrote:
> Tad-
>
> There are a number of ways to do this in Perl. Backticks are one:
>
> @text = `ping -n 1 -w 4 123.456.679.123`;
>
And as Tad pointed out the perlfunc entry for system say:
This is I<NOT> what you want to use to capture
the output from a command, for that you should use merely backticks or
C<qx//>, as described in L<perlop/"`STRING`">.
/J\
--
Jonathan Stowe <jns@gellyfish.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: Sun, 28 Mar 1999 04:00:26 +0100
From: "Mike Watkins" <mwatkins@promotion4free.com>
Subject: Require Question
Message-Id: <uizZqdMe#GA.51@nih2naaa.prod2.compuserve.com>
Hi there,
Why is it, on some UNIX web servers out there, the 'require' function won't
work in perl. Instead, it just gives off a 500 Internal Server Error? I
then tried the line:
eval { require "file.pl"; };
That didn't give off the 500 error, but it didn't load the file either.
Any suggestions?
Mike
------------------------------
Date: Sat, 27 Mar 1999 16:33:26 -0800
From: "David L. Cassell" <cassell@mail.cor.epa.gov>
Subject: Re: Split with + , but no %2B
Message-Id: <36FD78D5.D49BA9C0@mail.cor.epa.gov>
Frank de Bot wrote:
>
> %2B is + in the Query string. The way you say doesn't work.
>
> brian d foy wrote:
>
> > In article <36FD477E.D90081AD@xs4all.nl>, Frank de Bot <debot@xs4all.nl> posted:
> >
> > > Is there anyway to split a string with + while %2B stays ?
> >
> > @list = split /\+/, $string;
> >
> > i'm trying to think how you are doing it so that there is a
> > problem...
Perhaps you need to show us a little code, to demonstrate the
problem you're having. Brian's guess was as good a guess as you
should expect for a no-context-whatsoever situation.
David
--
David L. Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: 28 Mar 1999 00:06:43 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Split with + , but no %2B
Message-Id: <7djrqj$224$1@gellyfish.btinternet.com>
On Sat, 27 Mar 1999 23:52:51 +0100 Frank de Bot wrote:
> %2B is + in the Query string. The way you say doesn't work.
>
If that is what you are doing then you are trying to parse the query
string in a peculiar manner - you might want to be using some other
method to do this.
/J\
--
Jonathan Stowe <jns@gellyfish.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: Sat, 27 Mar 1999 21:44:58 -0500
From: comdog@computerdog.com (brian d foy)
Subject: Re: Split with + , but no %2B
Message-Id: <comdog-ya02408000R2703992144580001@news.panix.com>
In article <36FD6143.2235FC45@xs4all.nl>, Frank de Bot <debot@xs4all.nl> posted:
> %2B is + in the Query string. The way you say doesn't work.
>
> brian d foy wrote:
>
> > In article <36FD477E.D90081AD@xs4all.nl>, Frank de Bot <debot@xs4all.nl> posted:
> >
> > > Is there anyway to split a string with + while %2B stays ?
> >
> > @list = split /\+/, $string;
what is it you want? my example solves the problem you stated.
perhaps you want something else though.
--
brian d foy
CGI Meta FAQ <URL:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
------------------------------
Date: Sun, 28 Mar 1999 02:58:02 GMT
From: Charles Marsh <princecharles7045@my-dejanews.com>
Subject: tie-ing 1000+ hashes is failing. help!
Message-Id: <7dk5rn$3dj$1@nnrp1.dejanews.com>
I am tieing hashes to files so I can load a 5 large datafiles without running
out of memory. I am setting one hash per field. In the end, I have around 200
hashes tied to DBMs.
Meaning, I have lots of hashes like:
$field1{$sym} = $field1;
$field2{$sym} = $field2;
.
.
.
At first I had a problem because I needed more than 50 files open at once. So
now I have my shell to allow me 1024 file descriptors. Unfortunately, I now
need to load a few more datafiles so now I'll need over 1024 hashes if I
continue under my current architecture. Unix is not letting me have that
many.
Is there a better way to load my data so I don't need so many hashes but I can
still tie them? What I'd really like is to have $data{sym}{field} be my data
structure, but that isn't possible and to tie, right?
CDM
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
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 5242
**************************************
