[13565] in Perl-Users-Digest
Perl-Users Digest, Issue: 975 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Oct 2 23:07:09 1999
Date: Sat, 2 Oct 1999 20:05:07 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <938919907-v9-i975@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Sat, 2 Oct 1999 Volume: 9 Number: 975
Today's topics:
/@array/ abnerstransky@my-deja.com
Re: /@array/ <ltl@rgsun40.viasystems.com>
Re: Cancelled by Larry Rosler whos_john_galt@my-deja.com
Re: Cancelled by Larry Rosler <gellyfish@gellyfish.com>
Re: Cancelled by Larry Rosler <rootbeer@redcat.com>
Re: Cancelled by Larry Rosler whos_john_galt@my-deja.com
Re: Cancelled by Larry Rosler (Larry Rosler)
Re: Cancelled by Larry Rosler (Larry Rosler)
Re: CGI.pm <gellyfish@gellyfish.com>
Re: getting server errors <zzzbrono@uq.net.au>
How To Use a User Definied Type in Perl. <sphildreth@hotmail.com>
Re: I am having a problem setting cookies in perl (Bill Moseley)
Re: Installing Tk on solaris? lvirden@cas.org
Re: Match and escape processing <ltl@rgsun40.viasystems.com>
Re: memory differences reported by top and perl? <stampede3@yourcompass.com>
Re: mSQL question: How to save the query result into a <gellyfish@gellyfish.com>
Re: Not so sticky checkbox in CGI.pm <bokler_1@hiwaay.net>
Re: Perl IDE for X lvirden@cas.org
Re: Premature end of script headers patrick@teleport.com
script for URL forwarding or redirection with perl ?? <junglecore@SexMagnet.com>
Re: using CPAN to upgrade perl version lvirden@cas.org
Re: using tr? (Neko)
Re: Wow! cgi.pm is great! <bokler_1@hiwaay.net>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sun, 03 Oct 1999 01:15:52 GMT
From: abnerstransky@my-deja.com
Subject: /@array/
Message-Id: <7t6ao4$gvo$1@nnrp1.deja.com>
How can I search for the terms that I have in array when I won't know
how many terms are in the array each time?
$dat =~ /\b$refnums[0]\b|\b$refnums[1]\b/i
basically, how can I do this:
$dat =~ /\b@refnums\b/i
I'm not adverse to joining the array first, so I just have a string of
search terms.
Thanks a lot!
-Abner
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 3 Oct 1999 02:03:23 GMT
From: lt lindley <ltl@rgsun40.viasystems.com>
Subject: Re: /@array/
Message-Id: <7t6dhb$9c1$1@rguxd.viasystems.com>
abnerstransky@my-deja.com wrote:
:>How can I search for the terms that I have in array when I won't know
:>how many terms are in the array each time?
:>$dat =~ /\b$refnums[0]\b|\b$refnums[1]\b/i
:>basically, how can I do this:
:>$dat =~ /\b@refnums\b/i
:>I'm not adverse to joining the array first, so I just have a string of
:>search terms.
If you already knew about that method for solving the problem, why
didn't you just try it? We generally have a lot more fun here if
you post some code that doesn't work the way you expect. And you
would learn better that way too.
The Perl Cookbook has a few good examples of this. The central theme
is to use map and join to build up a string that represents your
regular expression or else to build up some executable code that
tests each regular expression in turn.
my @refnums = qw/first second third/;
my $restring = join '|', map "\\b$_\\b", @refnums;
my $dat = 'This is the first time.';
print "Matches\n" if $dat =~ /$restring/o;
__END__
Matches
--
// Lee.Lindley /// I used to think that being right was everything.
// @bigfoot.com /// Then I matured into the realization that getting
//////////////////// along was more important. Except on usenet.
------------------------------
Date: Sat, 02 Oct 1999 22:17:59 GMT
From: whos_john_galt@my-deja.com
Subject: Re: Cancelled by Larry Rosler
Message-Id: <7t60ai$apm$1@nnrp1.deja.com>
Well this is my story...
I was curious as to why I couldn't find my post. So, I used deja's
search utility and searched for the title of my message here are the
results (pasted):
>10/01/99 Cancel "Re: Advice from the comp.lang.perl.misc lr
>10/02/99 Re: Advice from the Wise comp.lang.perl.misc Kenneth
Bandes
>10/02/99 Re: Advice from the Wise comp.lang.perl.misc Jonathan
Stowe
>10/01/99 Advice from the Wise comp.lang.perl.misc whos_john_galt
>10/01/99 Re: Advice from the Wise comp.lang.perl.misc Larry Rosler
When I visited the very first post of these results, it read:
>Subject: Cancel "Re: Advice from the Wise"
>Date: 1999/10/01
>Author: lr <lr@hpl.hp.com>
> Posting History
>Cancel
Recognizing Mr. Rosler's name, I realized that he was of such stature,
that the cancellation must have been fueled by vehemence.
Hence, the reason for this post.
Thanks for your time.
Joey Cutchins
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 2 Oct 1999 23:09:32 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Cancelled by Larry Rosler
Message-Id: <7t63bc$87s$1@gellyfish.btinternet.com>
On Sat, 02 Oct 1999 22:17:59 GMT whos_john_galt@my-deja.com wrote:
> Well this is my story...
>
> I was curious as to why I couldn't find my post. So, I used deja's
> search utility and searched for the title of my message here are the
> results (pasted):
>
>>10/01/99 Cancel "Re: Advice from the comp.lang.perl.misc lr
>>10/02/99 Re: Advice from the Wise comp.lang.perl.misc Kenneth
> Bandes
>>10/02/99 Re: Advice from the Wise comp.lang.perl.misc Jonathan
> Stowe
>>10/01/99 Advice from the Wise comp.lang.perl.misc whos_john_galt
>>10/01/99 Re: Advice from the Wise comp.lang.perl.misc Larry Rosler
>
> When I visited the very first post of these results, it read:
>
>>Subject: Cancel "Re: Advice from the Wise"
>>Date: 1999/10/01
>>Author: lr <lr@hpl.hp.com>
>> Posting History
>
>>Cancel
>
> Recognizing Mr. Rosler's name, I realized that he was of such stature,
> that the cancellation must have been fueled by vehemence.
>
> Hence, the reason for this post.
>
Prat! That was Larry cancelling his own post as he has already explained.
Deja News has this unfortunate thing that it archives control messages
if they are directed to a particular group - I'd get a better newsreader.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Sat, 2 Oct 1999 16:12:09 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Cancelled by Larry Rosler
Message-Id: <Pine.GSO.4.10.9910021605570.19155-100000@user2.teleport.com>
On Sat, 2 Oct 1999 whos_john_galt@my-deja.com wrote:
> When I visited the very first post of these results, it read:
>
> >Subject: Cancel "Re: Advice from the Wise"
> >Date: 1999/10/01
> >Author: lr <lr@hpl.hp.com>
> > Posting History
>
> >Cancel
>
> Recognizing Mr. Rosler's name, I realized that he was of such stature,
> that the cancellation must have been fueled by vehemence.
Perhaps you should have investigated further, and found that the message
being cancelled was <MPG.125ef5ab7839375d98a024@nntp.hpl.hp.com>. Would
that be the ID of your message, or one by Larry Rosler?
It is generally considered appropriate to be able cancel one's own
messages.
I hereby second the suggestion that you apologize to Mr. Rosler.
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Sun, 03 Oct 1999 01:22:39 GMT
From: whos_john_galt@my-deja.com
Subject: Re: Cancelled by Larry Rosler
Message-Id: <7t6b4r$h1k$1@nnrp1.deja.com>
Hello,
Considering the requests of Jonathon Stowe and Tom Phoenix, I must
apologize for any misrepresentation on my behalf. My goal was only to
question the content of my original post not to cause any disdain. My
intent was guided by a vision which may have been blinded by
inexperience and the inability to find the original post via dejanews.
I sincerely regret any time you have wasted on such trivial matters.
Thank you for your time.
Joey Cutchins
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sat, 2 Oct 1999 18:43:16 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Cancelled by Larry Rosler
Message-Id: <MPG.1260548e836bf3ea98a02a@nntp.hpl.hp.com>
In article <Pine.GSO.4.10.9910021605570.19155-100000@user2.teleport.com>
on Sat, 2 Oct 1999 16:12:09 -0700, Tom Phoenix <rootbeer@redcat.com>
says...
> On Sat, 2 Oct 1999 whos_john_galt@my-deja.com wrote:
...
> > Recognizing Mr. Rosler's name, I realized that he was of such stature,
> > that the cancellation must have been fueled by vehemence.
...
> I hereby second the suggestion that you apologize to Mr. Rosler.
I received an emailed apology signed with a real name. The writer
blamed his error on inexperience and failure to find his article on
Deja.com. He was concerned that its content might have 'caused any
disdain' that led to its being canceled.
Apology accepted; end of incident. On to the next brouhaha.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Sat, 2 Oct 1999 19:07:45 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Cancelled by Larry Rosler
Message-Id: <MPG.12605a475676f63798a02b@nntp.hpl.hp.com>
[Posted and a courtesy copy sent.]
In article <7t6b4r$h1k$1@nnrp1.deja.com> on Sun, 03 Oct 1999 01:22:39
GMT, whos_john_galt@my-deja.com <whos_john_galt@my-deja.com> says...
...
> ... My
> intent was guided by a vision which may have been blinded by
> inexperience and the inability to find the original post via dejanews.
I already responded to you by email and acknowledged it by a post.
Many of us (myself included) appreciate the courtesy of receiving
emailed copies of posts. But they should be labeled as such (as I have
done above; my newsreader makes it require no more than setting a
checkbox), so the recipient knows the situation.
Failure to label the email (called by some a 'stealth Cc') causes this
kind of multiple runaround to occur.
> I sincerely regret any time you have wasted on such trivial matters.
>
> Thank you for your time.
Indeed. :-)
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 2 Oct 1999 23:16:07 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: CGI.pm
Message-Id: <7t63nn$87v$1@gellyfish.btinternet.com>
On Sat, 2 Oct 1999 17:22:02 -0500 Scott Beck wrote:
> This is a multi-part message in MIME format.
>
> ------=_NextPart_000_0053_01BF0CFA.A45A4580
> Content-Type: text/plain;
> charset="iso-8859-1"
> Content-Transfer-Encoding: 7bit
>
Oh my gawd.
> I noticed allot of questions about CGI.pm and how to use
> it so I thought I would post this Help file I made for CGI.pm.
> It is basically an indexed version of the documentation.
> I did not write the documentation in this file I just
> compiled it into a help file.
>
> This will only work on Windows.
>
> If this was inappropriate for posting to this group I apologize.
>
yes this was an inappropriate posting for this group - it was a binary
posting in some unknown format - totally useless to the majority of
the people here who would anyhow have the CGI.pm manpage.
Thanks for your efforts but believe me it was totally misguided ....
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Sun, 03 Oct 1999 12:15:09 +1000
From: Outlaw Jim <zzzbrono@uq.net.au>
Subject: Re: getting server errors
Message-Id: <37F6BC2D.B134B2DA@uq.net.au>
$sourcefile is meant to be defined in the following syntax
e.g. http://linux.gamers.net/cgi-bin/getdoc.pl?sourcefile=news.txt,
As for debuging, I wrote most of it on really old toshiba notebook, alas
couldn't really tell what I was typing, I was forced to use edlin, yuk yuk!
I think the biggest part of the problem lies with the host, it's buggered,
nothing works like it should :( alas I can't afford to pay for hosting yet
Thanks for your help.
Jason Romo wrote:
> Try to run this with the -w thsi will show you want it wants.
>
> Try to run this from the command prompt.
>
> #!/usr/bin/perl -w
>
> you have not set:
>
> $sourcefile
>
> open(INF, "$sourcefile"); or &dienice("Can't find the file requested");
>
> Outlaw Jim wrote:
>
> > I've got a really big problem with getdoc.pl(attached), it doesn't work.
> > This is some of the first(worst) perl I've ever written in a long time
> > so please don't email me telling me how crap it is unless you can fix it
> > :). I used chmod 755 for permissions so that's out. I have no idea what
> > I've done wrong.
> >
> > -
> > Cheers,
> > Outlaw Jim
> >
> > -----------------------
> > check out LinuxGamer at
> > http://linux.gamers.net
> > -----------------------
> >
> > ------------------------------------------------------------------------
> > Name: getdoc.pl
> > getdoc.pl Type: Perl Program (application/x-perl)
> > Encoding: 7bit
>
> --
> split // => '"';
> ${"@_"} = "/"; split // => eval join "+" => 1 .. 7;
> *{"@_"} = sub {foreach (sort keys %_) {print "$_ $_{$_} "}};
> %{"@_"} = %_ = (Just => another => Perl => Hacker); &{%{%_}};
--
Cheers,
Outlaw Jim
-----------------------
check out LinuxGamer at
http://linux.gamers.net
-----------------------
------------------------------
Date: 2 Oct 1999 20:17:02 -0500
From: "Steven Hildreth" <sphildreth@hotmail.com>
Subject: How To Use a User Definied Type in Perl.
Message-Id: <B7yJ3.5371$oo4.294369@newscene.newscene.com>
Hi, I am wanting to know how do you use a user definied type in perl. I use
this udf in PowerBasic to access a binary database, I am wanting to use perl
to access this database and display data to a web page.
Here is a example of the user definied type:
----------------------------
Type ExampleInfo
something as string * 1
else as integer
LastPart as boolean
end type
dim Example as ExampleInfo
open filename for random as FileID
get #FileID, , Example
close FildID
cls
print "Here is the something string"; example.something
end
-----------------------
I have looked at several websites and see no information about user defined
types.
Any help would be appreciated.
Regards..
Steven
------------------------------
Date: Sat, 2 Oct 1999 15:31:12 -0700
From: moseley@best.com (Bill Moseley)
Subject: Re: I am having a problem setting cookies in perl
Message-Id: <MPG.1260278cbbf13a859897c2@206.184.139.132>
Jody Fedor (JFedor@datacom-css.com) seems to say...
> Bill Moseley wrote in message ...
> Maybe you should BUTT OUT if not offering any suggestions!
Gawd, that sounds familiar. Oh wait... searching `"BUTT OUT" Jody'..
http://x37.deja.com/getdoc.xp?AN=527669803&CONTEXT=938903300.937623587&h
itnum=3
Where you got mad at someone for correcting this statement of yours:
`$filext = "\.txt"; <-- must escape the use of .'
Now, about this thread. I don't see how your example tests your
statement:
"Cookies must be set before you issue the Content-type!"
Still belive that statement? Try his nph script. Put the Content-type:
header any place you like and see if it it has to be after the Set-
Cookie: header as you say.
#!/usr/local/bin/perl5.005 -w
print <<EOF;
HTTP/1.1 200 OK
Connection: close
Date: Sat, 02 Oct 1999 16:44:42 GMT
Content-Type: text/html
Client-Date: Sat, 02 Oct 1999 16:44:26 GMT
Client-Peer: 128.32.224.21:80
Set-Cookie: Cookie=sugar; path=/; expires=Sun, 03-Oct-1999 04:44:43 GMT
Server: Apache/1.3.9
<HTML><BODY>
Hello There
</BODY></HTML>
EOF
This has very little to do with perl, except that one should, as I
commented to you, carefully test before posting advice. I can't imagine
why anyone would think that is offensive.
HAND,
--
Bill Moseley mailto:moseley@best.com
pls note the one line sig, not counting this one.
------------------------------
Date: 2 Oct 1999 23:54:06 GMT
From: lvirden@cas.org
Subject: Re: Installing Tk on solaris?
Message-Id: <7t65uu$pqn$1@srv38.cas.org>
According to Mario Gonzlez <Mario.Gonzalez@eto.ericsson.se>:
:I have written a small thing in perl which uses Tk for user interaction.
Is this via the perl/Tk module, or via some sort of exec/shell call?
:Is there a binary distribution of Tk available somewhere? Or can I
:perhaps compile it myself somehow? The target machine in question is a
:SUN Enterprise Server with OS-Version SunOS 5.5.1
You couldn't be programming in Tk unless it has been compiled already, right?
I'm confused as to what you are doing. However, note that there is a
comp.lang.perl.tk newsgroup for perl/tk questions, a comp.lang.tcl group
for tcl/tk questions, and a comp.lang.perl.modules for discussing, I suppose,
distributing applications which require modules but which you are not able
to require the user to compile perl and its modules...
--
<URL: mailto:lvirden@cas.org> Quote: Save us from the snobs.
<*> O- <URL: http://www.purl.org/NET/lvirden/>
Unless explicitly stated to the contrary, nothing in this posting
should be construed as representing my employer's opinions.
------------------------------
Date: 2 Oct 1999 23:51:55 GMT
From: lt lindley <ltl@rgsun40.viasystems.com>
Subject: Re: Match and escape processing
Message-Id: <7t65qr$7c0$1@rguxd.viasystems.com>
Abigail <abigail@delanet.com> wrote:
:>lt lindley (ltl@rgsun5.viasystems.com) wrote on MMCCXX September MCMXCIII
:>in <URL:news:7stsrs$fi0$1@rguxd.viasystems.com>:
:>`` M.J.T. Guy <mjtg@cus.cam.ac.uk> wrote:
:>``
:>`` :> $xyz =~ /^\Q$xyz$/;
:>``
:>`` The above doesn't match for any value of $xyz that I can think of.
:> #!/opt/perl/bin/perl -wl
:> use strict;
:> sub TIESCALAR {bless \(my $a = '')}
:> sub FETCH {my $a = shift; my $b = $$a; $$a = '$'; $b}
:> tie my $xyz => '';
:> print "Yes" if $xyz =~ /^\Q$xyz$/;
:> __END__
:> Yes
OK. I left you an opening and you slithered through like
a snake through a mouse hole. I should have said "for any
single value of $xyz".
But I'm still ignorant as to why the first reference to $xyz during
the re interpolation doesn't call FETCH. I suppose I have some
reading to do and that it will all make sense then.
Thanks for making me stretch.
--
// Lee.Lindley /// I used to think that being right was everything.
// @bigfoot.com /// Then I matured into the realization that getting
//////////////////// along was more important. Except on usenet.
------------------------------
Date: Sat, 02 Oct 1999 23:48:17 GMT
From: stampede <stampede3@yourcompass.com>
Subject: Re: memory differences reported by top and perl?
Message-Id: <7t65k0$dt5$1@nnrp1.deja.com>
In article <7t0jql$32g$1@gellyfish.btinternet.com>,
Jonathan Stowe <gellyfish@gellyfish.com> wrote:
> It might be that it bites the dust when Perl tries to allocate a large
> wad of memory that is not available ...
that seems to make sense; but actually when i looked back at my memory
usage, there was 6 MB of free memory lying around, 640 KB...
> > 2) How can I conserve memory? How can I have perl clean up
> > appropriately so that I can get through this 1 GB DB?
> >
>
> Difficult to say - you might be served by posting the smallest example
> of code that exhibits your problem - say 10 lines or so ?
this is pretty ugly code; i found out that the script craps out after
about 145000 keys. so i'm trying to close up the hash and undef the
reference to the db to maybe clear up some memory(?).
my $output_db_hash2;
my $output_db_ref1 = tie(%output_db_hash2, 'DB_File', $output_db_name2,
O_RDWR|O_CREAT, 0777, $DB_BTREE) || die $!;
# same declaration for output_db_ref2
my $kept_urls;
my ($status, $key, $value);
for ($status = $source_db_ref->seq($key, $value, R_FIRST) ;
$status == 0 ;
$status = $source_db_ref->seq($key, $value, R_NEXT) ) {
my $value = $urls;
$kept_urls = &keep_or_not($urls);
if ($i < 145000) { # this is the time when memory runs out
$kept_urls = &hash($kept_urls);
$output_db_ref1->put($key, $kept_urls);
undef $urls; undef $kept_urls;
} elsif ($i < 290000) {
if ($output_db_ref1) {
# kill the variables to maybe free up some memory?
$now_time = &time_it($now_time);
print STDERR "Untying hash1 and output_db_ref1.\n";
untie %hash1; undef $output_db_ref1;
}
$kept_urls = &hash($kept_urls);
$output_db_ref2->put($key, $kept_urls);
undef $urls; undef $kept_urls;
}
}
hope this sheds some light on the problem; thanks.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 2 Oct 1999 22:57:45 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: mSQL question: How to save the query result into a file?
Message-Id: <7t62la$84r$1@gellyfish.btinternet.com>
On Sat, 02 Oct 1999 21:39:51 GMT tomwanginc@my-deja.com wrote:
> mSQL question: How to save the query result into a file?
>
> Dear Friends:
>
> I try to save the query result (Such as "Select ... From... Where ...")
> into a data file, so that I can move the file to my PC for some
> analysis.
>
> The msqlexport command will export the whole table into a file, it is
> too large, that will take me too much time to delete and re-arrange the
> data.
>
> Do you know any easy way to do this in mSQL? Or any way I can use their
> C API?
>
I dont know why dont you ask in comp.lang,c ?
This certainly hasnt anything to do with Perl.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Sat, 02 Oct 1999 17:09:36 -0500
From: James Moore <bokler_1@hiwaay.net>
Subject: Re: Not so sticky checkbox in CGI.pm
Message-Id: <OHz2NwwWECobuR01VobsMvOszhLF@4ax.com>
On Fri, 1 Oct 1999 20:41:08 -0700, moseley@best.com (Bill Moseley)
wrote:
>But clearly, I'm doing something wrong. There must be a zillion CGI.pm-
>generated checkboxes running at any moment in time and someone else
>would have noticed this.
It has been noticed before. Lincoln confirmed it as a bug circa Feb,
1999 - I assumed it had been fixed by now. Following are some snippets
from that thread that may help some ambitious soul to craft a fix:
LS:>The problem is either that the new() method isn't correctly
LS:>detected parameters that are "present but undefined", or that the
LS:>save() method is dumping out parameters that are true ("on"), but
LS:>not those that are false ("off"). It should be a relatively easy
LS:>bug to spot and fix.
LS:>
LS:>Lincoln
<snip - irrelevant stuff>
LS:>I'm afraid you've picked up a real bug. I have to record "set but
LS:>off" to the parameter list that is saved and restored.
LS:>
LS:>Lincoln
JM:>James Moore writes:
JM:>CGI.pm version: 2.42
JM:>Perl version: 5.005_02 for MSWin32 (ActiveState)
JM:>WebServer: NS ES 3.5.1
JM:>OS: NT4.0, SP3
JM:>Browser: NS 4.08
JM:>
JM:>Bug: restore_parameters() does not work correctly on all
JM:>checkboxes.
JM:>For example:
JM:>
JM:> td(
JM:> [
JM:> checkbox(-name=>$cckey.'BOX1', -checked=>1,-label=>''),
JM:> checkbox(-name=>$cckey.'BOX2', -checked=>1, -label=>''),
JM:> checkbox(-name=>$cckey.'BOX3', -checked=>0, -label=>'')
JM:> ]
JM:> ),
JM:>
JM:>The form displays, the checkboxes 'BOX1', and 'BOX2' are cleared
JM:>by the user, the form is submitted, and 'save_parameters' saves
JM:>the form state to a file. When the form state is restored from
JM:>file, the BOX1 and BOX2 checkboxes are set again. Therefore, it
JM:>appears that the code above overrides the "checked" argument. This
JM:>is contrary to the documentation in your book on p. 237
JM:>
JM:>Examining the file containing the saved parameters shows that the
JM:>BOX1 and BOX2 values are not set - they are absent. This leads me
JM:>to wonder how an 'off' state can be restored to a checkbox, since
JM:>"cbBOX1=on" means the box is checked, but "" (no value) provides
JM:>no apparent mechanism to override the code above and restore the
JM:>checkbox to unchecked.
JM:>
JM:>Please let me know if I've missed something.
JM:>
JM:>Best Regards,
JM:>James Moore
------------------------------
Date: 2 Oct 1999 22:56:15 GMT
From: lvirden@cas.org
Subject: Re: Perl IDE for X
Message-Id: <7t62if$o4a$1@srv38.cas.org>
According to Francisco Romero <fromero@csudh.edu>:
:Does anyone know if there is an Integrated Developmental Enviornment for
:perl?
:Is there anything to help me write Perl code in X ?
The follow ups have all talked about text editors. Is that specifically
the area that you are concerned about?
In other arenas, an IDE typically is a seamless integration of text editor,
debugger, source code management, code compilation, code reuse facilitator,
code browser, interactive help environment, and possibly more.
However, others use the IDE term to mean nothing more than an editor.
--
<URL: mailto:lvirden@cas.org> Quote: Save us from the snobs.
<*> O- <URL: http://www.purl.org/NET/lvirden/>
Unless explicitly stated to the contrary, nothing in this posting
should be construed as representing my employer's opinions.
------------------------------
Date: Sun, 03 Oct 1999 01:23:59 GMT
From: patrick@teleport.com
Subject: Re: Premature end of script headers
Message-Id: <7t6b78$h1r$1@nnrp1.deja.com>
-You need to telnet in and run your script from the command line; you
may get more verbose error messages there.
-You might also check that the location of perl is the same on the new
server. (#!/usr/local/bin/perl may be different on the new server)
-Make sure the script is saved properly; if it was ftp's over, make
sure it was done in ascii mode. if it was saved, make sure it was saved
in unix format.
-make sure the script has the proper permissions for the new server;
the server's security settigns may be preventing it from running
good luck
-Patrick
In article <37D800E3.74B59E7E@nortel.ca>,
Jim <jim@nortel.ca> wrote:
> Hi,
>
> Does anyone know what the error Premature end of script headers means?
>
> I moved a Perl cgi form script on to an Apache web server (1.3)
running
> on Linux (5.2) and when I press the submit button, this is the error I
> get.
>
> I know the script works, because I've used it successfully before, and
> I've also had a few people look at it, and they say it's fine.
>
> I saw some discussion of this error in relation to Front Page, but I'm
> not using that.
>
> Any help would be appreciated.
>
> Thanks,
>
> Jim
>
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sun, 3 Oct 1999 03:29:16 +0200
From: "JungleCore" <junglecore@SexMagnet.com>
Subject: script for URL forwarding or redirection with perl ??
Message-Id: <7t6be2$5l9$1@as102.tel.hr>
hi there
Like I wrote in subject I would like to know, can be URL forwarding or
redirection done with perl and that it looks like come.to or cjb.net
service.What I really mean is, can I somehow make my self a 'virtual' domain
name like www.myname.com and when is someone surfing to that URL the script
redirects him to my real homepage URL??
Thanks for any help.
------------------------------
Date: 2 Oct 1999 23:55:14 GMT
From: lvirden@cas.org
Subject: Re: using CPAN to upgrade perl version
Message-Id: <7t6612$prk$1@srv38.cas.org>
According to Danny Aldham <danny@hendrix.postino.com>:
:I am not sure I would want to, but is it possible to use the CPAN module
:to actually upgrade the version of perl running?
I think so - all you should have to do is do a
force install Data::Dumper or some other module built into the core perl.
--
<URL: mailto:lvirden@cas.org> Quote: Save us from the snobs.
<*> O- <URL: http://www.purl.org/NET/lvirden/>
Unless explicitly stated to the contrary, nothing in this posting
should be construed as representing my employer's opinions.
------------------------------
Date: Sat, 02 Oct 1999 17:30:27 -0700
From: tgy@chocobo.org (Neko)
Subject: Re: using tr?
Message-Id: <raH2N++dGk+K3SuF7X0KMK32uSi4@4ax.com>
On 2 Oct 1999 13:57:58 -0500, abigail@delanet.com (Abigail) wrote:
>Clinton Pierce (cpierce1@ford.com) wrote on MMCCXXI September MCMXCIII in
><URL:news:37f5c381.284840759@news.ford.com>:
>// On 30 Sep 1999 14:23:58 -0500, abigail@delanet.com (Abigail) wrote:
>// >
>// >$400 in world capitals please.
>//
>// Your question is:
>//
>// Name two multi-character "perlfunc" featured functions that appear
>// as a portion of a World Capital name.
>
>Here are a few:
>
> Andorra la Vella (do)
> Buenos Aires (no)
> Copenhagen (open)
> Helsinki (sin)
> Kuwait (wait)
> London (do)
> Nicosia (cos)
> Saint Denis de la Reunion (int)
> Saint John (int)
> San Salvador (do)
> Santo Domingo (do)
> Stanley (tan)
That last one is -$400. Here are a few others:
Maputo (map)
Bucharest (uc)
Tripoli (tr)
--
Neko | tgy@chocobo.org | Will hack Perl for a moogle stuffy! =^.^=
------------------------------
Date: Sat, 02 Oct 1999 17:56:29 -0500
From: James Moore <bokler_1@hiwaay.net>
Subject: Re: Wow! cgi.pm is great!
Message-Id: <94j2NwAYzPWrU8nDl+gUaTmZzCg8@4ax.com>
On 2 Oct 1999 22:26:05 -0000, Jonathan Stowe <gellyfish@gellyfish.com>
wrote:
>I wouldnt describe Uri as a nitpicker - he somehow volunteered himself
>as the book reviewer and there are few here who would dispute his ability
>to do this and fewer here who would have the inclination to take over
>this role. I would listen.
>
>Oh you were referring to Uri's ever so slightly critical comment werent you?
>
>/j\
Oh - well how would you describe him? Is he a natural resource that
you've adopted for protection, a personal friend, or just someone who
makes you feel that you should go "shushing" to anyone who expresses
an opinion contrary to his?
I did listen. I didn't insult the man any more than he insulted the
publisher and book's author. In this case his post was critical, and
without value... kind of like ours, Jonathan.
James Moore
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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.
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 V9 Issue 975
*************************************
