[13353] in Perl-Users-Digest
Perl-Users Digest, Issue: 763 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Sep 11 07:07:25 1999
Date: Sat, 11 Sep 1999 04:05:08 -0700 (PDT)
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, 11 Sep 1999 Volume: 9 Number: 763
Today's topics:
Re: Design Advice needed on Sending Data to Client <makkulka@cisco.com>
Re: Design Advice needed on Sending Data to Client <cee@blowpipe.mit.edu>
Re: Find 'sendmail' with only ftp... (Villy Kruse)
Re: folder name question <makkulka@cisco.com>
Re: folder name question (Abigail)
Re: folder name question (Abigail)
Re: folder name question (Kragen Sitaker)
Re: Getting odd error... <agray@infoscience.otago.ac.nz>
Help! My perl cgi script truncates my download counter <yu108512@yorku.ca>
Re: How do I load libraries from a non-default path ?? <mike@yawp.com>
Re: How to perform nslookup functions in perl? <tchrist@mox.perl.com>
MySQL and Perl Problem (can't find insertid) <dove@synopsys.com>
Re: MySQL and Perl Problem (can't find insertid) <dove@synopsys.com>
Re: Need help with Matching (Eric Bohlman)
passing variables in URL without ? rajanishi@my-deja.com
Problem with DBD::ODBC ? Please . <alrope@zaz.com.br>
Resizing gifs / Dynamic gifs <v0xman@yahoo.com>
Re: UNCRAP project proposal (Benjamin Franz)
Re: UNCRAP project proposal <uri@sysarch.com>
Re: UNCRAP project proposal (Abigail)
Re: Unix Trouble <neil@pacifier.com>
Re: WHAT IS THE BEST WAY <gellyfish@gellyfish.com>
Re: Why doesn't my undef an array? (Kai Henningsen)
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 10 Sep 1999 17:18:29 -0700
From: Makarand Kulkarni <makkulka@cisco.com>
Subject: Re: Design Advice needed on Sending Data to Client
Message-Id: <37D99FD5.EF3A9364@cisco.com>
[ Caitlyn Hay wrote:
> What is the standard way of doing this?
The client will send the criteria wait for the server to respond.
> But then, how would the client know how many lines there are?
You need not bother about these things. Use the module LWP::Simple
or LWP::UserAgent.
> On second thought, maybe I can save the
> ASCII data to a temp file, and let the client download it. But then, what
> if there are more than one client request with different criteria - that
> means I have to generate different files.
Too complex. You will have to create unique file (names) for each client sending
same criteria. What will you do if the client does not download this file at
all.
How long will you wait ? This opens a big bag of problems.
> All these questions pop up, I need to know the standard way of doing this?
Standard way is for the client to wait for the server to respond.
==
------------------------------
Date: Sat, 11 Sep 1999 00:35:26 -0400
From: cee <cee@blowpipe.mit.edu>
Subject: Re: Design Advice needed on Sending Data to Client
Message-Id: <37D9DC0D.720AE29C@blowpipe.mit.edu>
woah.
you spell it with a c and a y,
i think you are the first one ive met that
spells it the same as i do
cheers
another caitlyn
------------------------------
Date: 11 Sep 1999 12:47:29 +0200
From: vek@pharmnl.ohout.pharmapartners.nl (Villy Kruse)
Subject: Re: Find 'sendmail' with only ftp...
Message-Id: <7rdc01$bg9$1@pharmnl.ohout.pharmapartners.nl>
Jonathan Stowe <gellyfish@gellyfish.com> wrote:
>*I* suspect that most systems that actually have a /usr/sbin and have
>sendmail installed there will have linked /usr/lib/sendmail as well.
And if you don't you can make one.
You have the same problem with:
#!/usr/local/bin/perl
versus
#!/usr/bin/perl
Fix it once and for all with a symlink, until someone can authoritatively
say which is the one and only correct form.
--
Villy
------------------------------
Date: Fri, 10 Sep 1999 17:11:45 -0700
From: Makarand Kulkarni <makkulka@cisco.com>
Subject: Re: folder name question
Message-Id: <37D99E40.2A51B908@cisco.com>
[ Jake wrote:
> Hi,
>
> Does anybody know how a perl script can identify the current folder that it
> is residing in? For example, can the script process.cgi identify that it is
> currently residing in a folder named Alabama?
To find the folder where the script itself resides just use $0.
If the script is in /home/files and the name of the script is script.p
then $0 will be /home/files/script.p. You can strip off the file name
to get at the folder name.
For knowing current working direcotory use Cwd;
use Cwd;
$dir = cwd;
--
------------------------------
Date: 11 Sep 1999 02:26:36 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: folder name question
Message-Id: <slrn7tk16h.5ou.abigail@alexandra.delanet.com>
Jake (kptoth@microdsi.net) wrote on MMCCI September MCMXCIII in
<URL:news:rtj2pc3n1iv71@corp.supernews.com>:
@@
@@ Does anybody know how a perl script can identify the current folder that it
@@ is residing in? For example, can the script process.cgi identify that it is
@@ currently residing in a folder named Alabama?
What if it's "residing" in more than one "folder" (you mean directory, right?)
Abigail
--
srand 123456;$-=rand$_--=>@[[$-,$_]=@[[$_,$-]for(reverse+1..(@[=split
//=>"IGrACVGQ\x02GJCWVhP\x02PL\x02jNMP"));print+(map{$_^q^"^}@[),"\n"
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 11 Sep 1999 02:29:15 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: folder name question
Message-Id: <slrn7tk1bg.5ou.abigail@alexandra.delanet.com>
David Amann (dove@synopsys.com) wrote on MMCCI September MCMXCIII in
<URL:news:37D99672.D3895EDE@synopsys.com>:
\\ Hi Jake,
\\
\\ Jake wrote:
\\
\\ > Does anybody know how a perl script can identify the current folder that it
\\ > is residing in? For example, can the script process.cgi identify that it is
\\ > currently residing in a folder named Alabama?
\\
\\
\\ The 'pwd' command is UNIX short hand for print the working directory. This is
\\ not the world's greatest solution, but it's the one I came up with on the spo
And since the working directory is a property of the process, and not
of the file, it has as little to do with the answer to Jakes question
as pointing out that there aren't many cookbooks having recipies for
BBQed penguin. (Not yet, at least).
Abigail
--
srand 123456;$-=rand$_--=>@[[$-,$_]=@[[$_,$-]for(reverse+1..(@[=split
//=>"IGrACVGQ\x02GJCWVhP\x02PL\x02jNMP"));print+(map{$_^q^"^}@[),"\n"
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Sat, 11 Sep 1999 11:02:57 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: folder name question
Message-Id: <BFqC3.4093$N77.266517@typ11.nn.bcandid.com>
In article <rtj2pc3n1iv71@corp.supernews.com>,
Jake <kptoth@microdsi.net> wrote:
>Does anybody know how a perl script can identify the current folder that it
>is residing in? For example, can the script process.cgi identify that it is
>currently residing in a folder named Alabama?
CGI scripts are supposedly (according to
http://hoohoo.ncsa.uiuc.edu/cgi/env.html) told their virtual location
by the environment variable SCRIPT_NAME, which is set by the web
server. So if the script is /home/kragen/public_html/dump.cgi, which
is reachable as http://www.dnaco.net/~kragen/dump.cgi, SCRIPT_NAME will
be set to "/~kragen/dump.cgi".
My server also sets SCRIPT_FILENAME to be the actual name of the script.
There is no general reliable solution to tell where you're being
executed from; $0 can have anything at all in it, even if it usually
has the full path to the script.
Kragen
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
Thu Sep 09 1999
60 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: 11 Sep 1999 16:24:50 +1200
From: Andrew Gray <agray@infoscience.otago.ac.nz>
Subject: Re: Getting odd error...
Message-Id: <uaequcbxp.fsf@infoscience.otago.ac.nz>
Drew Simonis <Care227@ibm.net> writes:
<SNIP>
> ($1,$2,$3,$4,$5,$6,$7) = split(/,/, $_);
<SNIP>
> is returning:
> Modification of a read-only value attempted at phone.pl line 72,
> <PARSED>
> chunk 1.
<SNIP>
I'll assume that the above line is in fact line 72 of your script.
See "perldoc perlre" for the true meaning of $1, etc. These variables
are defined by matching patterns surrounded by parentheses. To solve
this problem, just use meaningful names or an array to hold the
results of split.
Cheers,
Andrew
------------------------------
Date: Fri, 10 Sep 1999 23:36:15 -0400
From: "Alan Borgolotto" <yu108512@yorku.ca>
Subject: Help! My perl cgi script truncates my download counter to zero length
Message-Id: <7rcigq$be4$1@sunburst.ccs.yorku.ca>
Help! The htm file that specifies how many times each of my 3 files are
downloaded gets truncated to zero length after a couple of downloads.
I have 3 simple and similar cgi scripts written in Perl that access this htm
file and increment only the number (out of the three) that corresponds to
the file being downloaded. I know I have a mistake in the script, which is
to unlock the file before the file gets closed. Could this have caused the
file to get truncated to zero length?
Perhaps the htm file gets truncated to zero length when a cgi script does
not close it properly before stopping execution?
Do you know of any reason why an htm file, with permissions of rw-rw-rw-,
can get truncated to zero length?
Here is one of the three cgi scripts (they're all the same except for the
file that gets downloaded and the redirection scheme used):
#!/usr/bin/perl
print "Location: ../Godsbook.zip\n\n";
$file = "../downloads.htm";
$mark = "wdp";
open(MAIN,"$file") || die $!;
flock(MAIN,1);
@main = <MAIN>;
flock(MAIN,8);
close(MAIN);
open(MAIN,">$file") || die $!;
flock(MAIN,2);
foreach $main_line (@main)
if ($main_line =~ /<!--$mark--(.*)-->/) {
$count=$1+1;
print MAIN "<!--$mark--$count-->$count\n";
}
else {
print MAIN "$main_line";
}
}
flock(MAIN,8);
close(MAIN);
exit 0;
The htm file looks like this:
The Adobe Acrobat file has been downloaded
<!--pdf--0-->0
times<br>The ASCII text file has been downloaded
<!--txt--0-->0
times<br>The WordPerfect document has been downloaded
<!--wdp--0-->0
times<br>
------------------------------
Date: Fri, 10 Sep 1999 20:17:03 -0500
From: <mike@yawp.com>
Subject: Re: How do I load libraries from a non-default path ??
Message-Id: <Pine.NEB.3.96.990910200419.4165A-100000@www.yawp.com>
> I need to load a few libraries, but i cannot install them in the
> /usr/lib/perl/....whatever directory ... how can i call my script to
> load them from a different directory like /usr/home/test/libs/ ???
as in:
require "lib_dingus.pl";
or:
use "Dingus";
yes?
you should be able to get them if you use an absolute filepath:
require "/usr/home/test/libs/lib_dingus.pl";
use "/usr/home/test/libs/Dingus.pm";
or you can twiddle the @INC array. that's where perl keeps the list of
directories it searches when looking for files.
DO NOTE: the 'use' keyword sucks files as soon as it's parsed, so
something like:
push @INC, "/usr/home/test/libs/";
use "Dingus";
won't work.. the 'use' statement gets executed *before* the 'push'
statement. the solution in that case is:
BEGIN{ push @INC, "/usr/home/test/libs/"; }
use "Dingus";
which forces the 'push' to be executed as soon as *it's* parsed, too.
if you have a copy of the Camel book (blue version), you can find more
information about the BEGIN and END keywords in chapter 5.
mike
.
------------------------------
Date: 10 Sep 1999 18:58:37 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: How to perform nslookup functions in perl?
Message-Id: <37d9a93d@cs.colorado.edu>
[courtesy cc of this posting mailed to cited author]
In comp.lang.perl.misc, Blair Kissel <blair.kissel@mts.mb.ca> writes:
:I need to perform the following:
:
:nslookup
:ls -t a foo.com
@output = 'echo ls -t a foo.com | nslookup'
It's silly to reinvent the wheel.
--tom
--
X-Windows: Japan's secret weapon.
--Jamie Zawinski
------------------------------
Date: Fri, 10 Sep 1999 18:59:29 -0700
From: David Amann <dove@synopsys.com>
Subject: MySQL and Perl Problem (can't find insertid)
Message-Id: <37D9B781.BDAB56FF@synopsys.com>
Hi all,
If anyone could give me hand, I'd really appreciate it.
Whenever I run the mysqltest.pl below I get the following error:
% ./mysqltest.pl
Can't locate object method insertid via package "DBI::st" at
./mysqltest.pl line 31
I've installed the DBI module that came with the MySQL distribution in
my own module directory (/u/dove/lib). I've written many scripts that
both INSERT and SELECT from my current MySQL databases.
Any ideas on why perl can't find the insertid method? And why is it
referencing DBI::st.
If this is in a FAQ somewhere, I apologize in advance.
Thanks,
-=dav
---------------------BEGIN CODE--------------------------------------
#!/usr/local/bin/perl-5.004 -w
# mysqltest.pl
use strict;
use lib "/u/dove/lib";
use DBI;
my $sql = "INSERT INTO surveys VALUES (
NULL,
\"9999\",
\"smith\",
\"John Jones\",
\"IBM\",
\"jones\@ibm.com\",
\"690-876-0099\")";
my $dbh = DBI->connect("DBI:mysql:ces_surveys", "web", "webpass");
if (!defined $dbh) {
die "Cannot connect to MySQL Server: $DBI::errstr\n";
}
my $sth = $dbh->prepare($sql);
if (!defined $sth) {
die "Cannot prepare statement: $DBI::errstr\n";
}
$sth->execute();
my $survey_id = $sth->insertid;
$sth->finish();
$dbh->disconnect();
print "SURVEY ID IS: $survey_id\n";
------------------------------END CODE
-----------------------------------
------------------------------
Date: Fri, 10 Sep 1999 19:16:08 -0700
From: David Amann <dove@synopsys.com>
Subject: Re: MySQL and Perl Problem (can't find insertid)
Message-Id: <37D9BB67.BA8D31B2@synopsys.com>
Hi all,
Never mind. I think I figured it out.
The insertid is stored not as method but as an attribute. In the script
below, I have
my $survey_id = $sth->insertid;
when what I should have is
my $survey_id = $sth->{insertid};
I got the previous example from the O'Reilly "MySQL and mSQL" book. Is it
wrong there, or do I not have something installed correctly?
Take care,
-=dav
------------------------------
Date: 11 Sep 1999 09:26:09 GMT
From: ebohlman@netcom.com (Eric Bohlman)
Subject: Re: Need help with Matching
Message-Id: <7rd77h$j41@dfw-ixnews6.ix.netcom.com>
rwswebmaster@my-deja.com wrote:
: I need some assistance in matching from parts of
: a file. In the example below, I am searching
: from the string "TLH" to "CIG", which
: incorporates about 15 lines of data. I can
: search and find the data, but it puts the matched
: portion into 1 big glob of data that can be
: broken up by each word, but I want it to spit out
: a line by line representation. The code I am
Then break it up by lines instead of words.
: using is below that breaks the matched portion
: into each word and any help would be GREATLY
: appreciated.
:
:
: open(FILE, "forecasts/ngm/NGMMOS.txt");
*Always* check to see if an attempt to open a file succeeded!
: undef $/;
See below.
: my $names ="";
: my @names = ();
Those initializing expressions aren't necessary; a scalar defaults to ""
and an array defaults to ().
: $f = <FILE>;
If you're going to change the default record separator, it's a good idea
to localize the change within a block so that if you do more file reading
later, you don't have to remember to set the separator back to its
default (remember that the separator applies to *all* files that you
subsequently read).
{local $/; #this saves the old value of $/ and sets the new value to undef
$f=<FILE>;
}
or even
$f=do{local $/;<FILE>};
:
: while ($f =~/TLH(.*?)CIG/s) {
: $names = $1;
: $f= $';
You don't want to do this. You want to use the /g option on your regex
so that it will remember where the last match left off and pick up from
there.
: @names = split " " , $names;
Words are separated by spaces. Lines are separated by newlines.
Therefore, to split your matched text into lines rather than words, split
on a newline rather than a space.
: last;
I presume you put this in purely for debugging purposes, as it guarantees
that the loop will execute only once and that the code below will never
be executed.
: $a=0;
: foreach $el (@names) {
: $a++;
: }
"$a=@names" would have the same effect as the above four lines.
: }
:
: close(FILE);
: $/="\n";
You don't have to do this if you localize your separator value.
------------------------------
Date: Sat, 11 Sep 1999 09:13:18 GMT
From: rajanishi@my-deja.com
Subject: passing variables in URL without ?
Message-Id: <7rd6fb$s54$1@nnrp1.deja.com>
On win NT 4, server, with Apache 1.3.9 (binary
installation), i am able to call a perl file such as
http://localhost/cgi-bin/file.pl/one/two
Apache serves the content for file.pl and passes one and two as
variables.
If i do the same for a html file or a php file (albeit using aliases),
Apache returns a 404 not found error for htmls and a "no input file
specified" for php3
How can I get Apache to do the same thing that it does with perl for
html or other extensions like php3, etc., please? I tried the Apache,
PHP mailing lists, et. al., without any luck.
TIA
Rajan
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Sat, 11 Sep 1999 00:08:11 -0300
From: "Alexandre" <alrope@zaz.com.br>
Subject: Problem with DBD::ODBC ? Please .
Message-Id: <7rcgpa$p6o$1@srv4-poa.nutecnet.com.br>
Please Programmers,
I installed the DBD-ODBC in my system, and when a run a simple programm
appear the message:
" Install_driver(ODBC) failed: DBD::ODBC object version 0.21 does not match
bootstrap parameter
0 at C:\Perl\5.005\lib/MSWin32-x86-object/DynaLoader.pm line 187."
What should i make ?
The package was installed by VMP in the Internet.
Tanks,
Alexandre Roberto Perestrelo
alrope@zaz.com.br
------------------------------
Date: Fri, 10 Sep 1999 23:17:29 -0300
From: "Vox" <v0xman@yahoo.com>
Subject: Resizing gifs / Dynamic gifs
Message-Id: <tYiC3.11509$qY3.489484@newscontent-01.sprint.ca>
This is the quick rough code that works to some point for my dynamic resized
gif... now i get a gif that has the $height and $width divided by two and it
is placed in the new directory with a new name,
The only problem I couldn't solve by "trial and error" is that I don't a
good picture I get only the top corner of the gif ..... not a smaller
version of the same gif...
so if there are any dynamic gif experts out their could you please give me
some tips on resizing gifs.
The decodeGIF and encodeGIF subs are in gifLib.pl a program that i picked up
that is supposed to decode and encode gifs ... that might also be the
problem so maybe i need and new encoder/decoder of gifs.
Thanks...
require 'gifLib.pl';
open(GIFFILE, "$Imageurl");
($error, $width, $height, $colortable, $comment, @image) =
&decodeGIF(\*GIFFILE);
close(GIFFILE);
if ($width % 2 == 0 && $height % 2 == 0) {
$newwidth = $width / 2;
$newheight = $height / 2;
}
else
if ($width % 2 != 0) {
$width--;
$newwidth = $width / 2;
}
elsif ($height % 2 != 0) {
$imageheight--;
$newheight = $height / 2;
}
}
$newurl = "/myhome/images/8294859s.gif";
open(OUT, ">$newurl");
&encodeGIF(\*OUT, $newwidth, $newheight, $colortable, @image);
close(OUT);
print "Wrote: $newurl\n";
exit;
------------------------------
Date: Sat, 11 Sep 1999 00:16:26 GMT
From: snowhare@long-lake.nihongo.org (Benjamin Franz)
Subject: Re: UNCRAP project proposal
Message-Id: <ubhC3.375$9q1.23229@typhoon01.swbell.net>
In article <x7zoyul8pz.fsf@home.sysarch.com>,
Uri Guttman <uri@sysarch.com> wrote:
>
>well, i actually have been requested to help my home town's web site
>with a search engine. here is a fine opportunity to create the first
>UNCRAP cgi program. i will write out some specs and challenge some of
>you intermediates perl hackers to do it. then the submitted code will be
>reviewed here and the best code will get put into the archive by jeff
>pinyan. we have to get the ball rolling somewhere.
[...]
>get the search terms, make a proper regex with qr//.
>
>call Find::File with the list of dirs (config value in the code).
>
>filter files/dirs based on suffixes, depth, etc. the list of filter
>stuff is config values in the code.
>
>slurp in the whole file and match against regex
You are already off to the races with the spec. :(
A _good_ search engine doesn't waste server power real
time crawling the site - this is the A-1 mistake made with
_all_ the well known free scripts for searching web sites.
Use an _inverted index_ and update once a day. More - use the
available-from-CPAN Search::InvertedIndex _module_.
Then when the site grows from 10 pages to 100,000 you don't
blow chunks.
--
Benjamin Franz
------------------------------
Date: 10 Sep 1999 23:18:26 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: UNCRAP project proposal
Message-Id: <x7wvtykuf1.fsf@home.sysarch.com>
>>>>> "BF" == Benjamin Franz <snowhare@long-lake.nihongo.org> writes:
BF> Uri Guttman <uri@sysarch.com> wrote:
>> filter files/dirs based on suffixes, depth, etc. the list of filter
>> stuff is config values in the code.
>>
>> slurp in the whole file and match against regex
BF> You are already off to the races with the spec. :(
BF> A _good_ search engine doesn't waste server power real
BF> time crawling the site - this is the A-1 mistake made with
BF> _all_ the well known free scripts for searching web sites.
i wanted it to be VERY simple to start. and it would be fine for very
small sites. there is a need for just that spec.
BF> Use an _inverted index_ and update once a day. More - use the
BF> available-from-CPAN Search::InvertedIndex _module_.
this is a good idea for the second version or an related one. one of the
problems we seem to see is stupid isp who don't allow new modules. cgi
and file::find are standard core. that one isn't. also running cron jobs
is not a service many web sites will allow. so building the index is
problematical. maybe a remote cron could hit a local cgi which does the
build? :-)
BF> Then when the site grows from 10 pages to 100,000 you don't
BF> blow chunks.
i fully realize that. so maybe making two versions is a way to go.
i still want to see a very simple one first.
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
"F**king Windows 98", said the general in South Park before shooting Bill.
------------------------------
Date: 11 Sep 1999 02:24:36 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: UNCRAP project proposal
Message-Id: <slrn7tk12p.5ou.abigail@alexandra.delanet.com>
Uri Guttman (uri@sysarch.com) wrote on MMCCI September MCMXCIII in
<URL:news:x7zoyul8pz.fsf@home.sysarch.com>:
//
// here are some of the design rules:
//
// uses CGI.pm for parsing and for some/most of the html output
Oh gosh, I could never do the second part. I just fail to understand
why people prefer endless method calls over
print <<END_OF_HTML;
...
END_OF_HTML
and just typing out what you want. CGI.pm's set of methods that output
html tags seems to me as useful as an English.pm module with a method
for every word, and using that instead of writing plain text. It's all
too much 'oh-golly-this-looks-like-I-am-doing-OOP' just for the sake of
looking like you're doing OOP.
Abigail
--
Has anyone figured out what the hell HTML generating methods are doing
in a _CGI_ module? Creature feep on steroids?
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 10 Sep 1999 23:46:37 PST
From: Neil <neil@pacifier.com>
Subject: Re: Unix Trouble
Message-Id: <37d9facd.0@news.pacifier.com>
> i have telnet access, but i'm not sure where to connect it to.
> i also dun really know how to use telnet.
> could u explain more in detail to me??
I am going to assume that you are using Windows 95/98. Connect
to your ISP normally, then go to Start --> Run, then type
telnet yourisp.com
In a couple of seconds it should give you a login prompt. Type your
login, then it will give you a password prompt, type your password.
It will likely ask what terminal type you want to use. Typically you
would choose the default of "VT100" by hitting enter or typing "VT100"
(without the quotes) and then enter. Later you will want to download
a better terminal program or even install Linux, or another UNIX flavor,
on your machine.
Then you should see a prompt. You now have the power and glory of UNIX
at your command. Type 'ls' to see what is in your directory, type
'w' to see who is online with you, then check your mail by typing 'pine'.
Then do a search for "UNIX shell" and UNIX on the Web and find a tutorial
and get a book from the library or store. Learn more about UNIX. And then
write some Perl scripts.
Neil
------------------------------
Date: 10 Sep 1999 22:26:59 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: WHAT IS THE BEST WAY
Message-Id: <7rc0jj$sn$1@gellyfish.btinternet.com>
On 10 Sep 1999 19:10:20 GMT DebbieOney wrote:
> onathan Stowe gellyfish@gellyfish.com
> Date: Thu, 09 September 1999 05:05 AM EDT wrote:
>
>>>"Mr Creutzfeldt and Mr Jakob: No-one had ever heard of these two eminent
> medical men until someone had the>>
>
> What is the rest of this?
Probably 'stupid idea to cause a vegetarian animal to become a cannibal'
However I cant be sure about that because its in a file at work.
Anyhow you can look at it at <http://www.durge.org>
/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: 10 Sep 1999 22:11:00 +0200
From: kaih=7OcGwFBXw-B@khms.westfalen.de (Kai Henningsen)
Subject: Re: Why doesn't my undef an array?
Message-Id: <7OcGwFBXw-B@khms.westfalen.de>
rra@stanford.edu (Russ Allbery) wrote on 05.09.99 in <yl906lgk1l.fsf@windlord.stanford.edu>:
> Kai Henningsen <kai-asstr-news=7OIcF3rlayB@khms.westfalen.de> writes:
>
> > But why are we talking about defined() at all? The original example
> > does not call defined(). The revised example does not call defined(),
> > either.
>
> Well, your example certainly calls defined:
[...]
> > print "$yn : $array[2]\n" if defined @array;
> ^^^^^^^^^^^^^^
Oops. Now kindly explain how I missed that while staring at it
specifically looking for defined ...
> Yes. For that matter, I'd expect it to vary based on the phase of the
> moon. The output varies on the basis of a check of whether an aggregate
> is defined. The result of that check is completely nondeterminate from a
> language specification standpoint. It depends on gory implementation
> details that are highly unpredictable.
Now that certainly looks like the description of a bug. Either it's
allowed, then it should be reproducible, or it shouldn't be allowed.
[look at definition]
Aha. I still claim this is an optimization bug. It says that defined tells
if memory has ever been allocated for *this array*; but that should always
give the same answer for every call of that subroutine because of my(),
because each call has a *different* array.
The optimizer obviously only actually makes it a different array when it's
returned. That is, the optimizer violates the as-if rule (an optimized
program should appear to behave exactly like an un-optimized one, except
for speed issues).
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: 1 Jul 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 1 Jul 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.
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" from
almanac@ruby.oce.orst.edu. The real FAQ, as it appeared last in the
newsgroup, can be retrieved with the request "send perl-users FAQ" from
almanac@ruby.oce.orst.edu. 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" from
almanac@ruby.oce.orst.edu.
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 763
*************************************
