[16025] in Perl-Users-Digest
Perl-Users Digest, Issue: 3437 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jun 21 06:05:50 2000
Date: Wed, 21 Jun 2000 03:05:15 -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: <961581915-v9-i3437@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 21 Jun 2000 Volume: 9 Number: 3437
Today's topics:
Re: [ Regexp ] Curious Behaviour of " last if /(match)/ <gellyfish@gellyfish.com>
Re: [ Regexp ] Curious Behaviour of " last if /(match)/ <gellyfish@gellyfish.com>
Re: [ Regexp ] Curious Behaviour of " last if /(match)/ <gellyfish@gellyfish.com>
Re: A Computer Programmers Profile (Bart Lateur)
Re: Average Salary? <no@spam.net>
Re: Building perl 5.6 on Linux Mandrake <Andreas.Kutschera@bln.siemens.de>
Re: compiling a decryption module for Perlfilter (Eric Smith)
Re: concerned about flock() (Malcolm Dew-Jones)
Re: Current time minus file's datestamp time <abe@ztreet.demon.nl>
Re: Date time comparisons? <sb@muccpu1.muc.sdm.de>
DBI::rows() problem <debjit@oyeindia.com>
Re: DBI::rows() problem (Iain Chalmers)
Re: debugging an already running program <gellyfish@gellyfish.com>
Re: Finding Windows and Program Files directories <nnickee@nnickee.com>
How to make CPAN CD? (was: Where to get) nobull@mail.com
Re: how to reset open file limit from perl on UNIX? <gellyfish@gellyfish.com>
Re: I need to get better at Perl <gellyfish@gellyfish.com>
Re: Internet Programmers Wanted! <gellyfish@gellyfish.com>
Re: Is there a dos htm enviroment for perl ? <dmeyers@panix.com>
Need app to generate perl for windows (IQnegativeOne)
Re: Need app to generate perl for windows <mxusstmm@xoommail.com>
Re: Need app to generate perl for windows <thunderbear@bigfoot.com>
no need to reply, I know the answer now : > <ltlau@yahoo.com>
Re: Novell Server and Perl <gellyfish@gellyfish.com>
Re: Novell Server and Perl <thoren@southern-division.com>
Re: Novell Server and Perl <gellyfish@gellyfish.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 21 Jun 2000 08:29:45 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: [ Regexp ] Curious Behaviour of " last if /(match)/ "
Message-Id: <8ipqt9$fqq$1@orpheus.gellyfish.com>
On Tue, 20 Jun 2000 03:26:57 +0200 TheEx0rcist wrote:
>> Use my(). Don't use local().
>
> The problem with my() is that you get warning messages with perl -w when you
> use it inside loops ("my" variable masks earlier declaration in same scope).
>
> For instance the following code produces the error message ::
> --
> my $a;
> while(1) {
> my $a = ...
> }
>
No it doesnt. The first 'my $a' is not in the same scope as the second.
/J\
--
** This space reserved for venue sponsor for yapc::Europe **
<http://www.yapc.org/Europe/>
------------------------------
Date: 21 Jun 2000 08:23:23 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: [ Regexp ] Curious Behaviour of " last if /(match)/ "
Message-Id: <8ipqhb$fpi$1@orpheus.gellyfish.com>
On Tue, 20 Jun 2000 03:16:26 +0200 TheEx0rcist wrote:
>> The code below prints "bar". With your suggested global $1,
>> it would print "foo":
>>
>> ---------------------------
>> #!/usr/bin/perl -w
>> use strict;
>>
>> $_ = "foo bar baz\n";
>>
>> if ( /(bar)/ ) {
>> my_sub($1);
>> print "$1\n";
>> }
>>
>>
>> # insert a few thousand lines of code here
>>
>>
>> sub my_sub {
>> my($str) = @_;
>>
>> if ( $str =~ /(foo)/ )
>> { return 1 }
>> else
>> { return 0 }
>> }
>> ---------------------------
>
> hmmm I don't think so.
> Be the variable $1 global or not, since /(bar)/ matches $_, the string $1 =
> 'bar' is sent to my_sub(). Then we have $str = 'bar'. /(foo)/ never matches
> 'bar' so the variable $1 is in no way altered. That's why in all case,
> after the if() block, $1 will always equal 'bar'. What in the world would
> make it equal 'foo' since the pattern /(foo)/ in your my_sub block never
> matches anything !
>
>
Go on ignore the actual point why dont you. The lesson is that if $1
*were* global in the manner that you desire then it could be wiped out
in the subroutine perhaps in some module that the programmer has never
seen - *most* people would consider this to be a bad thing.
/J\
--
** This space reserved for venue sponsor for yapc::Europe **
<http://www.yapc.org/Europe/>
------------------------------
Date: Wed, 21 Jun 2000 08:46:03 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: [ Regexp ] Curious Behaviour of " last if /(match)/ "
Message-Id: <fh%35.500$My4.47576@news.dircon.co.uk>
On Mon, 19 Jun 2000 23:02:22 +0200, TheEx0rcist Wrote:
>> Learn to use the documentation that comes with the Perl distribution.
>>
>> This behavior (assuming you correct your filehandle problem) is clearly
>> documented in perlvar.
>
>
> "clearly"?
>
> hmm ... that documentation is many pages long. And as far as I can see, it
> mostly documents all special variables ($|, $&, etc..)
>
Yes but $<digit> *is* a special variable.
> It is nice you are pointing me to the perlvar documentation but it would be
> even better you you could quote the part of this documentation that I need.
>
You want to search for '$<digits>' in the document.
/J\
------------------------------
Date: Wed, 21 Jun 2000 09:07:48 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: A Computer Programmers Profile
Message-Id: <39528586.792842@news.skynet.be>
Jerome O'Neil wrote:
>Killing your children is oft accomplished in Perl.
No.... perl is very bad in killing it's own children.
--
Bart.
------------------------------
Date: Wed, 21 Jun 2000 05:42:22 GMT
From: "Dave Godwin" <no@spam.net>
Subject: Re: Average Salary?
Message-Id: <2BY35.22522$FC6.508251@newsread1.prod.itd.earthlink.net>
Here in silicon valley you can't hire a good dead cat for under 90K.
"Clinton A. Pierce" <clintp@geeksalad.org> wrote in message
news:DmW15.1019$fR2.14665@news1.rdc1.mi.home.com...
> [Posted and mailed]
>
> In article <8i98mg$q82$1@nnrp1.deja.com>,
> paul_maas@my-deja.com writes:
> > I am trying to find out the average salary of a Web Developer
> > (CGI/PERL) and Database Administrator. So one person.
> >
> > I have seen people asking/offering from $63,000 to $84,000.
> > Is that about right?
>
> Depends on where. Around here, you can't swing a dead cat without
> hitting a "web developer". Actually, I've beaten a few web developers
> with dead cats. Poor cats.
>
>
> --
> Clinton A. Pierce Teach Yourself Perl in 24 Hours!
> clintp@geeksalad.org for details see http://www.geeksalad.org
> "If you rush a Miracle Man,
> you get rotten Miracles." --Miracle Max, The Princess Bride
>
------------------------------
Date: 21 Jun 2000 09:10:09 +0200
From: Andreas Kutschera <Andreas.Kutschera@bln.siemens.de>
Subject: Re: Building perl 5.6 on Linux Mandrake
Message-Id: <8ippoh$6r5$1@de1bc6hd.bln.siemens.de>
In comp.lang.perl.misc you write:
>I'm trying to build perl 5.6 on my Linux workstation (Mandrake 7.0),
>/usr/include/linux/param.h:4: asm/param.h: No such file or directory
>and so on for about 4 different other files (but dozens of occurances).
>I seem to have copies of all the appropriate missing '.h' files, but
>they're not where the Makefile is expecting them. Has anyone
>successfully built 5.6 on such a configuration? Is there an appropriate
>response to the configuration process that will tell 'make' where to
>look?
This has nothing to do with perl. It's a typical Linux problem and it
used to come from updating a 2.0 kernel to a 2.2 kernel.
There's a symlink missing.
/usr/include/linux is usually a symlink to <linux-sources>/include
and <linux-sources>/include/asm is a symlink to the correct asm
directory for your processor (e.g. asm-i386 for Intel).
If these symlinks aren't there, either create them by hand or get a
fresh kernel from ftp.kernel.org (or your favourite mirror).
That should solve your problem.
Of course, I could be totally wrong, but since you didn't tell us
where the copies of param.h et al. are, that's all I can do :-)
ciao
--
Andreas Kutschera, Siemens Business Services DS, Tel. 030/386-28089
Nonnendammallee 101, D-13629 Berlin Fax 030/386-22934
email: Andreas.Kutschera@bln.siemens.de
A "NOSPAM" in the subject line will definitely pass my SPAM-blocker :-)
------------------------------
Date: 21 Jun 2000 08:34:51 GMT
From: eric@fruitcom.com (Eric Smith)
Subject: Re: compiling a decryption module for Perlfilter
Message-Id: <slrn8l0vha.a92.eric@plum.fruitcom.com>
Thanx Tom
Tom Phoenix posted
> > I am using the Perl Source filter module to encrypt source code
>
> <sigh> If you must....
Yeah, I agree I dont like locking doors either, maybe we will (all) be open
source one day (hopefully)
>
> > I have much experience with PerlApp.pl to exe's but none with creating
> > either COM objects or Perl controls and "no" C knowledge (in case of
> > suggestions to use a compiled C decrypto).
>
> It sounds as if you're going to need to learn. Or to hire someone who
> knows!
I guess my real question should be which one? - the COM or the CTRL -
to me the perl ctrl that creates a .dll looks the best.
( Skill acquisition is just a function of time ;) )
--
Eric Smith
eric@fruitcom.com
------------------------------
Date: 20 Jun 2000 22:41:12 -0800
From: yf110@vtn1.victoria.tc.ca (Malcolm Dew-Jones)
Subject: Re: concerned about flock()
Message-Id: <39505578@news.victoria.tc.ca>
Larry Rosler (lr@hpl.hp.com) wrote:
: In article <3949ABD1.3423@modulus.com.au> on Fri, 16 Jun 2000 14:23:45
: +1000, Peter Hill <phill@modulus.com.au> says...
: > Clinton A. Pierce wrote:
: ...
: > > I've used flock() on a variety of Unix and Windows systems. Where
: > > it works (Unix with local filesystems, NT with local filesystems) it
: > > works OK. Where it's not supported (Win9x) it's not needed. Where it
: >
: > Win9x is a single-user multi-tasking OS - the lack of flock on Win9x is
: > unfortunate, as it is needed where multiple tasks might conflict.
: But on Win9x one task cannot open a file that is already opened by
: another task, so there can be no conflict, so no need for file locking.
: In essence, the operating system imposes mandatory locking.
Is this correct? All file opens eventually get mapped to the CreateFile
function, which takes a variety of locking related parameters, including
"fdwShareMode" which accepts various values including FILE_SHARE_WRITE.
I was under the impression that this mode allowed multiple tasks to open
the same file for write access at the same time.
------------------------------
Date: Wed, 21 Jun 2000 10:50:12 +0200
From: Abe Timmerman <abe@ztreet.demon.nl>
Subject: Re: Current time minus file's datestamp time
Message-Id: <dulvks8i6oruogloa7pootvf0pbmo32g38@4ax.com>
On 20 Jun 2000 12:48:33 GMT, Steffen Beyer <sb@muccpu1.muc.sdm.de>
wrote:
> [Mailed && posted]
>
> In article <hgdskssvmvg91m1ugtat38bis0ph8gt0fh@4ax.com>,
> Abe Timmerman <abe@ztreet.demon.nl> wrote:
>
> > ...
> >> use Date::Calc qw(:all);
> > ...
> >> @date = (localtime($time))[5,4,3,2,1,0];
> >> $date[0] += 1900;
> >> $date[1]++;
> >> @diff = Delta_DHMS(@date,Today_and_Now());
> >> $diff = ((((($diff[0] * 24) + $diff[1]) * 60) + $diff[2]) * 60) + $diff[2];
^^^
> >> next FILE if ($diff < 3600) # 3600 secs = 1 hour
>
> > That looks like _huge_ overkill for this (and a typo):
>
> > next if time()-$time < 3600;
>
...
> About the typo: Oh yeah, sorry, a semicolon was missing!
Nope, I don't have Date::Calc, but it looks to me you should be adding
$diff[3], it doesn't make sense otherwise.
> And why do you think that this doesn't answer the original poster's question?
> Where did I understand him wrong?
I think you understood him right.
Obviously you can't run a loop like :
my $the_file = 'test.txt';
my $interval = 3600;
while (1) {
update($the_file)
if time - (stat $the_file)[9] >= $interval;
}
Putting sleep() in the while may make it a little better, but that seems
to depend on the load of your system.
I think this is a job for some scheduling mechanism that probably is on
a system already and nows about the time.
--
Good luck,
Abe
------------------------------
Date: 21 Jun 2000 07:31:38 GMT
From: Steffen Beyer <sb@muccpu1.muc.sdm.de>
Subject: Re: Date time comparisons?
Message-Id: <8ipr0q$9ff$1@solti3.sdm.de>
In article <sl06f9b4e7f75@corp.supernews.com>, jrn <jrn@borgcollective.org> wrote:
> I am writing a Perl script that needs to compare file access times
> to a given date to determine if the file is old enough to be deleted.
> What facilities does Perl provide (or a module) that allows one to
> compare date times? I am using the ctime() function to print times.
> But I don't see a difftime() type function anywhere...
> Anybody got some ideas for me?
> Thanks,
> jrn@borgcollective.org
#!perl -w
use strict;
my $days = shift || 1;
my $item;
my $time;
my $diff;
my @files = ();
my($SCANDIR1,$SCANDIR2) = qw(whatever1 whatever2);
sub weedout
{
my($dir,$days) = @_;
my(@dirs) = ();
unless (opendir(DIR, $dir))
{
warn "Can't read directory '$dir': $!\n";
return;
}
warn "Visiting directory '$dir'.\n";
ITEM:
while (defined ($item = readdir(DIR)))
{
next ITEM if ($item =~ /^\.\.?$/);
$item = "$dir/$item";
if (-d $item)
{
push( @dirs, $item );
}
elsif (-f $item)
{
unless (defined ($time = (stat($item))[9]))
{
warn "Can't stat file '$item': $!\n";
next ITEM;
}
$diff = int((time - $time) / 86400);
next ITEM if ($diff < $days);
push( @files, $item );
}
}
unless (closedir(DIR))
{
warn "Can't close directory '$dir': $!\n";
}
foreach $item (@dirs)
{
&weedout($item,$days);
}
}
$days = 1 if ($days < 1);
&weedout($SCANDIR1,$days);
&weedout($SCANDIR2,$days);
foreach $item (@files)
{
if (unlink($item))
{
warn "Deleted file '$item'.\n";
}
else
{
warn "Could not delete file '$item': $!\n";
}
}
__END__
Good luck!
--
Steffen Beyer <sb@engelschall.com>
http://www.engelschall.com/u/sb/whoami/ (Who am I)
http://www.engelschall.com/u/sb/gallery/ (Fotos Brasil, USA, ...)
http://www.engelschall.com/u/sb/download/ (Free Perl and C Software)
------------------------------
Date: Wed, 21 Jun 2000 09:58:20 +0530
From: "Debjit" <debjit@oyeindia.com>
Subject: DBI::rows() problem
Message-Id: <8iql8l$6np$1@news.vsnl.net.in>
I have a problem with DBI, the rows() method returns 0 though rows are
there. Subsequent fetchrow() fetches the rows. Database is Oracle 8i , Perl
5.00503 DBI 1.13
$sth =$dbh->prepare($select_query) or die "$DBI::errstr";
$sth->execute() or die "$DBI::errstr";
my $rows = $sth->rows;
if($rows) {
print "Rows are there"; #strangely this does not get printed($rows is 0)
}
while (my(@row_array) = $sth->fetchrow) {
print "@row_array", "<BR>"; # Here it prints all the rows
}
------------------------------
Date: Wed, 21 Jun 2000 14:50:20 +1000
From: bigiain@mightymedia.com.au (Iain Chalmers)
Subject: Re: DBI::rows() problem
Message-Id: <bigiain-2106001450200001@bigman.mighty.com.au>
In article <8iql8l$6np$1@news.vsnl.net.in>, "Debjit" <debjit@oyeindia.com>
wrote:
>I have a problem with DBI, the rows() method returns 0 though rows are
>there. Subsequent fetchrow() fetches the rows. Database is Oracle 8i , Perl
>5.00503 DBI 1.13
>$sth =$dbh->prepare($select_query) or die "$DBI::errstr";
>$sth->execute() or die "$DBI::errstr";
>my $rows = $sth->rows;
>if($rows) {
>print "Rows are there"; #strangely this does not get printed($rows is 0)
>}
> while (my(@row_array) = $sth->fetchrow) {
> print "@row_array", "<BR>"; # Here it prints all the rows
>}
Thats 'cause rows() dowsn't do what you think it does :-) Your
$select_query affected 0 rows, so $sth->rows returned 0. If you call
rows() _after you do my(@row_array) = $sth->fetchrow, _then_ you'll get
the number of rows that were selected.
from DBI.pm pod:
rows
$rv = $sth->rows;
Returns the number of rows affected by the last row affecting
command, or -1 if not known or not available.
Generally you can only rely on a row count after a non-select execute
(for some specific operations like update and delete) or after
fetching all the rows of a select statement.
For select statements it is generally not possible to know how many
rows will be returned except by fetching them all. Some drivers will
return the number of rows the application has fetched so far but
others may return -1 until all rows have been fetched. So, use of
the rows method, or $DBI::rows, with select statements is not
recommended.
cheers
Iain
------------------------------
Date: 21 Jun 2000 09:20:57 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: debugging an already running program
Message-Id: <8iptt9$fv8$1@orpheus.gellyfish.com>
On Tue, 20 Jun 2000 04:11:40 -0700 warrenb10 wrote:
> Running 5.005-02 on Linux 2.0.35
>
> I've got a program which is run hundreds of times a day, it
> hangs once a day or so, haven't been able to find any way to get
> it to hang on demand.
>
> If I had this problem with a C program, I'd generate a core dump
> and look at it with the debugger (or debug a running process if
> the debugger on that system supported it). Is there a way to do
> something similar with the Perl debugger? I read the doc, looks
> like you have to start the program in the debugger.
>
> If this can't be done, I'd settle for a stack trace (of my Perl
> program, not of the interpreter).
>
Perhaps you should recompile your Perl for debugging (-DDEBUGGING) and
then you can use -D<flags> to get various debugging info at runtime -
see the perlrun manpage for more on what information you can get.
>
> Got questions? Get answers over the phone at Keen.com.
> Up to 100 minutes free!
> http://www.keen.com
>
If one of my posts turns up with this on the bottom then I'll know there
is something going on.
/J\
--
** This space reserved for venue sponsor for yapc::Europe **
<http://www.yapc.org/Europe/>
------------------------------
Date: Tue, 20 Jun 2000 23:28:42 -0500
From: Nnickee <nnickee@nnickee.com>
Subject: Re: Finding Windows and Program Files directories
Message-Id: <1DB02DC253A5A433.509285662C29E954.558A98E050D6C0AA@lp.airnews.net>
On Wed, 21 Jun 2000 03:03:09 GMT, someone claiming to be Jeff Helman
<jhelman@wsb.com> said:
>tsackett@iname.com wrote:
>> In a script for Win32, how can I find out the path to the Windows
>> directory and the "Program Files" directory?
>Windows directory is easy. Try using the $ENV{'WINDIR'} construct. As
>far as I know, it works on all Win32 variants (tested on 95, 98 and
>NT4).
>As for Program Files...well, good luck. There's no consistent key in
>%ENV for that. Maybe someone else will have a better idea, but the best
>I can come up with would be to search the registry for something that
>you know would be installed there (IE comes to mind) and look for a Reg
>value with a directory specified.
IE doesn't *have* to be installed there. Mine's installed to
F:\Program Files\Internet Explorer, but I could have just as easily
installed it to G:\IE or C:\what\a\poc or anywhere else (windows
itself is installed on D) .... and fwiw, I have 5 seperate Program
Files directories on my system.
Just wanted to point out that there may not be *a* Program Files
directory on the target system. Might be several, might be none at
all.
Nnickee
------------------------------
Date: 21 Jun 2000 09:55:43 +0100
From: nobull@mail.com
Subject: How to make CPAN CD? (was: Where to get)
Message-Id: <u9n1kfxvjk.fsf@wcl-l.bham.ac.uk>
phr@netcom.com (Paul Rubin) writes:
> >Some enterprising soul could consider running a CPAN mirror and, upon
> >request, burning a CD-R of it and FedExing it to the customer, but it
> >would probably be too expensive for most people to use.
>
> I don't mind if the CD is a few months behind. I know that companies
> like cheapbytes get CD's out to customers within a few weeks of having
> the bits ready. So a quarterly release would be fine with me. At
> that point downloading updates from a cpan mirror wouldn't be so slow.
OK this is a wee bit off topic
Interesting point CPAN is heavily symlinked. If you burn a CD using
ISO9660+RR then it's OK on Unix but useless on Windows.
Last time I burnt a CPAN CD for my own use I modified mkisofs so that
the under the Joliet filesystem (or the pure ISO9660 filesystem) the
links were followed at creation (and potentially each directory was
stored several times) but under the ISO9660+RR filesystem the links
were symbolic.
I thought this was really nifty so I submitted it as a patch.
I don't think it was accepted because it was not considered useful
enough although. I still maintain that it's useful for people wanting
to burn CPAN CDs. Anyone wish to back me up?
ftp://ftp.wcl.bham.ac.uk/pub/bam/patches/mkisofs/mkisofs-1.12b5-bam.diff
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: 21 Jun 2000 08:00:26 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: how to reset open file limit from perl on UNIX?
Message-Id: <8ipp6a$fnb$1@orpheus.gellyfish.com>
On 20 Jun 2000 11:30:24 -0400 Jim Anderson wrote:
> I'm getting bitten by the open file limit on UNIX and haven't managed
> to figure out how to reset it from within a perl script.
>
It entirely depends on what particular flavour of Unix you have as it is
likely that it is different from OS to OS, you should find out how you
would do it from the documentation for your OS and then everything should
flow from there. If you have any difficulty determining this information
you would be better off asking in some newsgroup specific to your OS.
>
> (Please e-mail me directly, since workload precludes me monitoring
> this group.)
>
Please monitor the group since workload precludes me mailing anyone
directly.
/J\
--
** This space reserved for venue sponsor for yapc::Europe **
<http://www.yapc.org/Europe/>
------------------------------
Date: Wed, 21 Jun 2000 08:23:15 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: I need to get better at Perl
Message-Id: <TX_35.497$My4.47576@news.dircon.co.uk>
On 20 Jun 2000 10:08:04 -0700, Mike Coffin Wrote:
>
> Avoid this newsgroup; it's a
> very poor place to get help. Very few people here will take the time
> to help you, unless you consider admonitions to RTFM helpful.
>
I'm sure you will be following your own advice then. I dont see many of
your posts here trying to remedy this.
/J\
------------------------------
Date: Wed, 21 Jun 2000 08:48:54 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Internet Programmers Wanted!
Message-Id: <Wj%35.501$My4.47576@news.dircon.co.uk>
On Tue, 20 Jun 2000 17:43:51 +0200, Daniel Sander Wrote:
>> You have found lots of mediocre programmers. That's nice.
>>
>> (The truly Good programmers get paid for their work)
>
> So it's only shite programmers who publish their code and useful
> scripts for free on the many good resource-sites throughout the
> Internet? ;-)
>
If one was to arrive from another planet and see <http://www.cgi-resources.com>
first you would certainly be forgiven for thinking so.
> Personally, I'd give 5 stars to those quality programmers who do so.
> By sharing code, you share knowledge.
>
And by sharing crap code you hinder development.
/J\
------------------------------
Date: 21 Jun 2000 00:16:06 -0400
From: David Meyers <dmeyers@panix.com>
Subject: Re: Is there a dos htm enviroment for perl ?
Message-Id: <yob7lbjpt2x.fsf@panix3.panix.com>
"smile773" <smile773@bigfoot.com> writes:
Smile, your questions don't exactly make sense...
> Is there a dos html enviroment that I can input data from ?
Do you mean a web browser? There are several which run
under windows.
> I would like to use cgi dynamic htm to get info from so that
> the perl script writes the info.dat ?
If you mean to ask if there's a means by which you can run
cgi programs under Windows such that you can write your
cgi programs in perl, the answer is that there are several,
including apache, IIS, etc. But that's not exactly a perl
question. Look into a web server. Then you can use your
web browser to talk to your web server which will, in turn,
be able to run cgi programs for you.
However, if all you want to do is use perl to write data files,
you don't need either a browser or web server for that -- just
perl and maybe a command line. As far as getting perl for
your windows machine, see www.activestate.com
I don't think the other person who responded to your
question was intending to make fun - just that your
question isn't so clear.
--d
------------------------------
Date: 21 Jun 2000 09:16:44 GMT
From: iqnegativeone@aol.com (IQnegativeOne)
Subject: Need app to generate perl for windows
Message-Id: <20000621051644.28979.00002453@ng-fg1.aol.com>
I bought the Perl Black Book. Great book. However, I would like to take a
shortcut. Perhaps there are perl apps, that will generate perl.pl files. A
language as cryptic as Perl should have a Win98 interface. Checkboxes, radio
buttons and such. Surely this question has been asked a thousand time. Any
pointers would be a great help.
sincerely, Rivertide
------------------------------
Date: Wed, 21 Jun 2000 05:21:24 -0700
From: "mxusstmm" <mxusstmm@xoommail.com>
Subject: Re: Need app to generate perl for windows
Message-Id: <_R%35.1082$u3.8926@news2.tor.primus.ca>
Why would you want this?
Open EDIT.COM in a DOS maximized DOS window @ 800x600.
Then just enjoy.
I must admit, GUIs helped HTML.ala Dreamweaver and the like.
But PERL, man, plain text only.
My only quam is a font that makes {}, [] and () look less similar @ 4:00am
IQnegativeOne <iqnegativeone@aol.com> wrote in message
news:20000621051644.28979.00002453@ng-fg1.aol.com...
> I bought the Perl Black Book. Great book. However, I would like to take a
> shortcut. Perhaps there are perl apps, that will generate perl.pl files. A
> language as cryptic as Perl should have a Win98 interface. Checkboxes,
radio
> buttons and such. Surely this question has been asked a thousand time. Any
> pointers would be a great help.
> sincerely, Rivertide
------------------------------
Date: Wed, 21 Jun 2000 11:56:01 +0200
From: =?iso-8859-1?Q?Thorbj=F8rn?= Ravn Andersen <thunderbear@bigfoot.com>
Subject: Re: Need app to generate perl for windows
Message-Id: <39509131.4A19E043@bigfoot.com>
IQnegativeOne wrote:
>
> I bought the Perl Black Book. Great book. However, I would like to take a
> shortcut. Perhaps there are perl apps, that will generate perl.pl files. A
> language as cryptic as Perl should have a Win98 interface. Checkboxes, radio
> buttons and such. Surely this question has been asked a thousand time. Any
> pointers would be a great help.
If you say this regarding writing CGI applications in perl, you might
want to check the "perldoc CGI" documentation.
--
Thorbjørn Ravn Andersen "...plus...Tubular Bells!"
http://bigfoot.com/~thunderbear
------------------------------
Date: Wed, 21 Jun 2000 14:51:30 +0800
From: "JL" <ltlau@yahoo.com>
Subject: no need to reply, I know the answer now : >
Message-Id: <39506618@news02.imsbiz.com>
no need to reply, I know the answer now...Thx.
JL <ltlau@yahoo.com> wrote in message news:39503c8e@news02.imsbiz.com...
> Hi,
>
> I would like to ask about what is "expires" use for in the cookie?
> After the cookie expired, will the cookie removed from the client
> automatically?
>
> Or the expires date is just use for the server to know is the cookie
expire
> or not? I mean the cookie is still in the client computer, and the server
> just read the expire date from the client. Then check does it expired, if
> so, then quit the program somethings like this?
>
> Also, the expire date is base on client's computer time or server time?
>
>
>
>
>
>
------------------------------
Date: 21 Jun 2000 09:08:54 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Novell Server and Perl
Message-Id: <8ipt6m$ftj$1@orpheus.gellyfish.com>
On Tue, 20 Jun 2000 13:17:21 +0200 Thoren Johne wrote:
> what's up with novell?
>
> i'd like to promote the german boy/girl scout organization (BDP) with some
> perl programming to publish their archive online.
>
> we've got free server space on a system running novell 5.1 with netscape
> enterprise webserver and now the local administrator prodly told me that he
> installed the latest release of perl for netware, which is from may 2000.
>
> perl -v on this system gives me now:
> 5.003_07 (Netware build #334)
>
> is this a very bad dream or just the real truth?
>
I'm afraid its true. Their port is based on the Activeware perl of the same
build number. There have been vague hints that a port of a more recent
version was being worked on for a couple of years now. But this has never
materialized.
Maybe someone ought to hassle Novell to release the patches for their port
so someone could bring it up to date - I'm sure that it wouldnt be too
difficult. Hey I'm sure if they offered an active Perl Porter a highly
paid job they would get an up to date port lickety split.
Alternatively, perhaps Activestate could do the port to assuage those
unconvinced of their independence from Microsoft.
Or Netscape could sponsor the port - it would be in their interest for
people to have a reson to stick with their application on all the platforms
it runs.
> of course i'd like to use some modules like CGI.pm but i don't think they
> will run with 5.003_07
>
You might find that CGI.pm will run after you have removed the
'require 5.004' ... on the other hand it might not.
> any comments or hints?
If this is the only platform you have and no-one is going to do an up to date
port then your are going to have to live with it - there are other
platforms which are stuck with a Perl of similar vintage.
--
** This space reserved for venue sponsor for yapc::Europe **
<http://www.yapc.org/Europe/>
------------------------------
Date: Wed, 21 Jun 2000 10:08:13 +0200
From: "Thoren Johne" <thoren@southern-division.com>
Subject: Re: Novell Server and Perl
Message-Id: <8iptqm$qrm$13$1@news.t-online.com>
Tom Phoenix <rootbeer@redcat.com> wrote in message
news:Pine.GSO.4.10.10006201727340.29843-100000@user2.teleport.com...
> Folks who are savvy about Novell should start work to get 5.6 to work for
> them, or they'll be left way behind. Unless using Novell means that you're
> way behind already. :-)
ever talked to a proud novell administrator about his system? i think i'm
going to avoid that risk (i'm not rex cramer).
i think i will find some other server plays for the scouts - on a decent
system.
gruß
thoren
8#X
--
----------------------------------------------------------------------
Thoren Johne - 8#X - thoren@southern-division.com
Southern Division Classic Bikes - www.southern-division.com
------------------------------
Date: Wed, 21 Jun 2000 08:41:07 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Novell Server and Perl
Message-Id: <Dc%35.499$My4.47576@news.dircon.co.uk>
On 21 Jun 2000 09:08:54 +0100, Jonathan Stowe Wrote:
> On Tue, 20 Jun 2000 13:17:21 +0200 Thoren Johne wrote:
>>
>> perl -v on this system gives me now:
>> 5.003_07 (Netware build #334)
>>
>
>> of course i'd like to use some modules like CGI.pm but i don't think they
>> will run with 5.003_07
>>
>
> You might find that CGI.pm will run after you have removed the
> 'require 5.004' ... on the other hand it might not.
From the Novell site it says that these modules are included :
Carp
File::Copy
SDBM_File
CGI
FileCache
SelectSaver
Config
Getopt::Long
Socket
Dynaloader
Getopt::Std
strict
English
Help
Symbol
Env
IO::File
Text::Soundex
Exporter
IO::Handle
Text::Tabs
Fatal
IO::Seekable
Text::Wrap
Fcntl
Math::BigInt
Tie::Hash
File::Basename
overload
UCSExt
File::CheckTree
ProdInfo
vars
DBI
DBD::ODBC
So you shouldnt have a problem using CGI.pm though it is almost certainly an
older version. Check out <http://developer.novell.com/ndk/perl5.htm> for
more information or look at the Novell private newsgroup on Perl matters.
<news://devforums.novell.com/novell.devsup.perl> .
Hope that helps.
/J\
------------------------------
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 3437
**************************************
