[7668] in Perl-Users-Digest
Perl-Users Digest, Issue: 1294 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Nov 10 00:07:31 1997
Date: Sun, 9 Nov 97 21:00:24 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sun, 9 Nov 1997 Volume: 8 Number: 1294
Today's topics:
"Perl Embedded HTML" Page Cache <pritikin@mindspring.com>
ANNOUNCE: CGI::MozSniff 0.06 Posted. (Jason Costomiris)
ANNOUNCE: IO-stringy uploaded to CPAN <eryq@zeegee.com>
ANNOUNCE: libnet-1.06 <gbarr@pobox.com>
ANNOUNCE: Win32::AdminMisc 971022 <rothd@roth.netX>
Re: By value or reference <leurmy@akula.com>
Re: ever stick a scalar into windows clipboard? <billc@tibinc.com>
Generating .DBF (DBIII) files in perl ? <meditec@mbox.vol.it>
Re: HELP NEEDED: Why won't my script work? (Martien Verbruggen)
Re: Help/newtoPERL/Input files <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Re: How do I create a random number with Perl? (brian d foy)
How to Subscribe to The Perl Journal (Jon Orwant)
Re: Need to speed up s/ / /; (brian d foy)
ObjStore 1.19 (Haloween Edition) <pritikin@mindspring.com>
Re: Timezone conversion (brian d foy)
Re: Updating current HTML page with Perl CGI... HELP!! <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
WWW::Search 1.012 released <johnh@ISI.EDU>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 10 Nov 1997 04:42:42 GMT
From: Joshua Pritikin <pritikin@mindspring.com>
Subject: "Perl Embedded HTML" Page Cache
Message-Id: <6463c2$410$1@news1.teleport.com>
This module requires FastCGI or Apache/mod_perl. If you are not using
one of these packages, investigate that first.
* Easier than HTML::Embperl
* Does not require a separate binary like eperl
Accepts page source code that looks like this:
<body bgcolor="#ffffff" text="#000000" link="#000000" vlink="#000000" >
<center><h1><big>
<: small_caps("Mondo Server") :>
</big></h1></center>
<p>
Perl source code is quoted between <: and :> symbols. These quotes
are matched at the beginning/end of lines. Your PHTML code is
rewritten into a single block, so you can declare lexical variables or
loops and continue them further down the page.
It's all very simple and easy.
Get it from http://www.perl.com/CPAN/authors/id/JPRIT/!
------------------------------
Date: 10 Nov 1997 04:41:11 GMT
From: jcostom@sjis.com (Jason Costomiris)
Subject: ANNOUNCE: CGI::MozSniff 0.06 Posted.
Message-Id: <646397$3tl$1@news1.teleport.com>
The first public release of CGI::MozSniff has been released. It can be
obtained from your friendly neighborhood CPAN.
What does it do?
Have you ever been annoyed by the fact that certain browsers, particularly
those originating from the Pacific Northwest corner of the US, call
themselves "Mozilla", despite the fact that they are nothing of the kind?
This module parses $ENV{HTTP_USER_AGENT}, and returns various results
indicating what browser is *really* hitting your pages.
I consider it of Alpha quality at this point, not due to bugginess of code
(it does work fine), but due to lack of completeness. I've accounted for
all versions of Netscape Navigator and Communicator, M$ IE 3.x and 4.x,
as well as the IE3/AOL browser. I'm sure there are others that call
themselves "Mozilla", and I'd be interested in those user agent strings.
It's available as: $CPAN/modules/by-module/CGI/MozSniff-0.06.tar.gz.
--
Jason Costomiris <>< | "VMS is about as secure as a poodle
jcostom@sjis.com | encased in a block of lucite....
http://www.jasons.org/~jcostom/ | .... about as useful, too."
#include <disclaimer.h> | --some guy I read on Usenet
------------------------------
Date: 10 Nov 1997 04:40:26 GMT
From: Eryq <eryq@zeegee.com>
Subject: ANNOUNCE: IO-stringy uploaded to CPAN
Message-Id: <64637q$3t7$1@news1.teleport.com>
This distribution has been uploaded to the authors/Eryq directory
on CPAN, and contains several modules:
IO::Scalar - IO::Handle I/O to/from scalar variables.
TIEHANDLE supported.
IO::ScalarArray - IO::Handle I/O to/from arrays of scalars.
TIEHANDLE supported.
IO::Wrap - wrap old-style filehandles with OO interface
Software also on-line, at:
http://www.enteract.com/~eryq/CPAN/IO-stringy/
Docs too, at:
http://www.enteract.com/~eryq/CPAN/IO-stringy/docs/IO/
Everything is in Alpha, so if you have problems or bones to
pick, now's the time to let me know!
Enjoy.
--
___ _ _ _ _ ___ _ Eryq (eryq@zeegee.com)
/ _ \| '_| | | |/ _ ' / http://www.enteract.com/~eryq
| __/| | | |_| | |_| | http://www.zeegee.com/
\___||_| \__, |\__, |___/\ Visit STREETWISE, Chicago's newspaper by/
|___/ |______/ of the homeless: http://www.streetwise.org
------------------------------
Date: 10 Nov 1997 04:40:55 GMT
From: Graham Barr <gbarr@pobox.com>
Subject: ANNOUNCE: libnet-1.06
Message-Id: <64638n$3ti$1@news1.teleport.com>
I have just uploaded to PAUSE a new release of the libnet distribution,
it should appear on CPAN mirror sites soon
This release contains a lot of changes from the previous release,
probably
too many, I would strongly suggest testing any scripts with this release
before you install it.
Please also read the RADME.config file in the distribution.
libnet is a collection of perl modules which encapsulate the usage
of various protocols used in the internet community. These include
Net::FTP (RFC959)
Net::SMTP (RFC821)
Net::Netrc
Net::Cmd
Net::Domain
Net::Telnet (RFC854)
Net::Time (RFC867 & RFC868)
Net::NNTP (RFC977)
Net::POP3 (RFC1939)
Net::SNPP (RFC1861)
Net::PH
Net::Config
To install libnet you ***MUST*** have the following modules installed
IO::Socket
This release contains the following changes to the previous release
*** Release 1.06
Fri Oct 31 1997 <gbarr@pobox.com> (Graham Barr)
Net::FTP
- Fixed undef warning in login() when $ruser does not exist in .netrc
- Added new supported() method
- DESTORY now sends quit command
- corrected OOB commands sent prior to an abort command
- close will call abort unless eof seen
- documentation updates
Net::FTP::datacon
- abort() will read a byte if non have been read
Net::FTP::A
- read was using arg#3 as an offset ?? change to use as timeout, this
now matches Net::FTP::I::read and the docs
- speedup to read()
Fri Sep 26 1997 <gbarr@pobox.com> (Graham Barr)
Net::Cmd
- modified ->response() to return CMD_ERROR if ->getline() returns
undef
Sun Sep 14 1997 <gbarr@pobox.com> (Graham Barr)
Small tweak to Makefile,PL to remove requirement for Data::Dumper
Wed Oct 1 1997
Net::PH
- re-wrote crypt code. now should be 2-3x faster.
Net::SNPP
- added _SITE method
- added parse_response, so that SNPP style multi-line responses
can be caught.
Net::SNPP::HylaFax
- new module added, defines methods that HylaFax uses. Implemented
using _SITE -- *** NOTE there is no docs for this module yet!!!!
Thu Sep 11 1997
- Removed Net::Telnet, users should now use Net::Telnet by Jay Rogers.
Configure, Makefile.PL
- More changes to make Configure more robust (I hope :-)
t/nntp.t
- Removed the call to ->list(), which was an insane thing to
do anyway (Thanks Tom C.).
Net::FTP
- Modified pasv_xfer to use ->stor instead of ->stou
- Fix responce typo in sub cmd
- Modified to use AutoLoader to speed up load time
Net::PH
- Fixed _arg_hash to pass "" when the value is empty
Net::POP3
- Added apop and uidl methods
It should be avaliable on mirror sites soon from
http://www.perl.com/CPAN/authors/Graham_Barr/
Comments are always very welcome.
Copyright 1996 Graham Barr. All rights reserved.
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.
Share and Enjoy!
Graham <gbarr@pobox.com>
------------------------------
Date: 10 Nov 1997 04:40:09 GMT
From: "Dave Roth" <rothd@roth.netX>
Subject: ANNOUNCE: Win32::AdminMisc 971022
Message-Id: <646379$3t4$1@news1.teleport.com>
Yes, there is a new version of Win32::AdminMisc now available. It's
version 971022 and it is available at:
ftp://ftp.roth.net/pub/ntperl/adminmisc/971022/adminmisc.zip
It will also be available soon on CPAN.
The .zip archive contains the Intel binary for build 310 and the Core
distribution.
There is a build for ActiveState build 307 available on my FTP site as
well.
There are a slew of new functions in this new version including functions
that:
-manage scheduled jobs
-read/write .ini files
-rename a user account
-set the password for any account without knowledge of current password
-get list of available drives
-get space information for a drive (bytes free and total)
-get drive type (network, local, removable, cdrom, etc)
-get OS, memory, processor & disk drive stats
-force windows to shutdown or logoff the current user
-Get/Set environmental variables for the System or User (not just the
current
process).
Also the CreateProcessAsUser() has been modified and supports a bunch of
new options.
dave
================================================================
Dave Roth ...glittering prizes and
Roth Consulting endless compromises, shatter
rothd@roth.nXeXt the illusion of integrity
My email address is disguised to fool automailers. Remove the
'X's to send me email.
****************************************************************
Use of this message or email address for commercial purposes
(including "junk" mailings) is strictly prohibited and protected
under current international copyright laws and United States
Code, Title 47, Chapter 5, Subchapter II.
------------------------------
Date: Sun, 09 Nov 1997 23:26:56 -0500
From: Francois <leurmy@akula.com>
Subject: Re: By value or reference
Message-Id: <34668D10.D72A78B2@akula.com>
I got the answer.
I must use eq rather than == for string comparisons. That's what was
actually causing the problem.
Francois wrote:
> Is it possible to assign the value of a variable to another variable and
> that this new variable keeps that same value even if the first variable
> changes its value?
>
> I'm trying to parse a "multipart/form-data" form but it seems that all
> the variables to which I assigned a value thru a same variable (but at
> different times with different values) at the end get one same value..
>
> I have a While loop that reads the <STDIN>...and a @data_stream that
> gets the value from the form for each field.
>
> if ($field_name == "your_name") {
> $self{'your_name'} = join ("", @data_stream);
> } elsif ($field_name == "language") {
> $self{'language'} = join ("", @data_stream);
> } elsif ($field_name == "program_cb") {
> $self{'program_cb'} = join ("", @data_stream);
> }
>
> While I would expect each $self{'....'} variable to get different
> values, it seem s that they all have the same value.
>
> Thanks,
> Francois
------------------------------
Date: Sun, 09 Nov 1997 23:09:38 -0500
From: Bill Cowan <billc@tibinc.com>
To: Hank <htaylor@nospam.mit.edu>
Subject: Re: ever stick a scalar into windows clipboard?
Message-Id: <34668902.D200EEBF@tibinc.com>
Hank wrote:
>
> has anyone ever tried to stick a scalar ($foo) into the windows
> clipboard? is this possible in perl? if you know how, please email
> me at htaylor@mit.edu, i'd love to know.
>
See http://www.perl.com/CPAN/authors/Aldo_Calpini/ for a module to get
from and put to clipboard.
-- Bill
------------------------------
Date: Mon, 10 Nov 1997 01:17:10 +0100
From: Roberto Congiu <meditec@mbox.vol.it>
Subject: Generating .DBF (DBIII) files in perl ?
Message-Id: <34665286.3E33E177@mbox.vol.it>
Hi,
I need a script capable to generate a dbf (dbIII)
database, to download portions of a database from the web.
I've seen in the CPAN, but didn't find anything.
Anyone can (please) help me ????
Thanks!
----------------------------------
Roberto Congiu
E-Mail:congiu@torino.alpcom.it
----------------------------------
------------------------------
Date: 10 Nov 1997 02:41:41 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: HELP NEEDED: Why won't my script work?
Message-Id: <645s95$pnf$1@comdyn.comdyn.com.au>
In article <01bced35$193c8ee0$5632edc1@atticwebdesign>,
"James East" <james@atticwebdesign.demon.co.uk> writes:
> I need help with this perl script. When I try to run it (through the web
> server), I get a "Server Error". What's wrong with it? (OS is Sun Solaris
> 2.5.1)
perlfaq9
My CGI script runs from the command line but not the browser.
Can you help me fix it?
(It DOES run from the command line, doesn't it?)
you can find the perl faq's at www.perl.com.
> begin 600 homework.cgi
Why did you uuencode this? It's sort of hard to read this way.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | If at first you don't succeed, try
Commercial Dynamics Pty. Ltd. | again. Then quit; there's no use being
NSW, Australia | a damn fool about it.
------------------------------
Date: Sun, 9 Nov 1997 20:12:21 -0800
From: "Creede Lambard" <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Subject: Re: Help/newtoPERL/Input files
Message-Id: <6461j0$bfk@bgtnsc02.worldnet.att.net>
Congratulations! You'll find (as perhaps you already have) that MacPerl
solves a lot of the problems created by not having an accessible command
line.
I'd like to help you with this but I don't really have a clear picture of
what you're trying to do. Sometimes I find it useful (as I do with Visual
Basic) to get an idea of both what the program (and/or its data) looks like
at the beginning, and what I want it to end up looking like. For instance,
if your company names file (preA.csv) looks like this:
FirstCo
National Second Company
ThirdCorp
and your data file (tagtxt.ps) looks like this:
FirstCo;my first company
FourCom;this won't be in the list
Amalgamated Five;neither will this
National Second Company;company #2
The Aptly Named Company Not Appearing In This List;owned by Python (Monty)
ThirdCorp;you guessed it, the third company
3Com;very big, but not in this list
and you want to end up with a file looking like this:
"UK","FirstCo","my first company"
"UK","National Second Company","company #2"
"UK","ThirdCorp","you guessed it, the third company"
you might do something like this, which will save you a great deal of time
since you don't have to read the data file every time you look something up:
#!/usr/bin/perl;
%info = ();
open(DESCRIPTIONS,"tagtxt.ps") or die "Can't read from tagtxt.ps";
while(<DESCRIPTIONS>) {
my($input) = $_;
chomp($input);
my($name,$desc) = split(/;/,$input);
$info{$name} = $desc;
}
close DESCRIPTIONS;
open(COMPANIES,"preA.csv") or die "Can't read from preA.csv";
open(OUTPUT,">miketest.csv") or die "Can't write to miketest.csv";
while (<COMPANIES>) {
chomp;
print OUTPUT q!"UK","! , $_ , q!","! , $info{$_} , q!"!, "\n";
}
close OUTPUT;
This reads the lines from the company information file, splits them in two
at the semicolon, and assigns them places in the %info associative array.
Then it "looks up" the descriptions for the company names in your preA file
in this associative array (thereby saving you from having to run through the
file every time) and prints them out.
Hope this helps to point you in the right direction!
-- Creede Lambard
Minister of Irregular Expressions
Programming Republic of Perl
mike rich wrote in message <3465D413.18FFE99B@ibm.net>...
>4 days into Perl - have the camel & llama books - can't find the answer
>to my problem.
>Have used MacPerl to extract clean data from Quark & EPS files - (great
>language!)
>Have two files - one containing company names - the second containing
>company data.
>Want to read a company name from one file/ read the co. data from
>another file
>-combine the two into one record and write it out to a third file.
>Script at moment looks like this:
open(NFILE, "preA.csv");
open(PSFILE, "tagtxt.ps");
open (CSVFILE, ">miketest.csv");
$mark1=0;
while($conam=<NFILE>) {
while(<PSFILE>) {
if($mark1==0){
$/="syzergy";
$desc=$_;
$mark1=2;
}
}
$newlin="\"UK,\"".$conam."\",".$desc;
print CSVFILE "NEWLINE $newlin\n";
$/=";";
$mark1=0;
}
close PSFILE;
close NFILE;
close CSVFILE;
>
>Apart from the cumsiness, obviously missed something blindingly obvious!
>
>What this does - as you all realise - is print the co. names with the
>same bit
>of company detail
>
>Cd some kind soul point me in the right direction.
>
>Many thx.
>
>
>
>
------------------------------
Date: Sun, 09 Nov 1997 23:26:52 -0500
From: comdog@computerdog.com (brian d foy)
Subject: Re: How do I create a random number with Perl?
Message-Id: <comdog-ya02408000R0911972326520001@news.panix.com>
In article <645e6b$kqq@camel21.mindspring.com>, "Eric Phillips" <e.phillips@mindspring.com> wrote:
>Hello all, I have a question about Perl. I am no expert, just an amateur,
>so please explain in detail.
>
>How do I create a random number with Perl, so it can be use later in the
>script?
rather than explain in detail, i'll let you read all about it in the
perlfunc manual page. you might also want to check the perldelta man
page for the slightly new behaviour of rand().
after that, you might want to check the perl FAQs.
good luck :)
--
brian d foy <comdog@computerdog.com>
NY.pm - New York Perl M((o|u)ngers|aniacs)* <URL:http://ny.pm.org/>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
------------------------------
Date: 10 Nov 1997 04:41:58 GMT
From: orwant@fahrenheit-451.media.mit.edu (Jon Orwant)
Subject: How to Subscribe to The Perl Journal
Message-Id: <6463am$409$1@news1.teleport.com>
The Perl Journal is a quarterly, printed magazine
devoted to All Things Perl.
http://tpj.com
Issue #8 is speeding toward press, and will be mailed in
mid-late December. If you want to receive it as part of
your subscription, you'll need to subscribe by November 30.
Some heartfelt testimonials:
"It is the most useful technical publication I have seen."
-Lisa Nyman
"TPJ is the most consistently relevant, content-rich publication
I get, and I get a pile of them. You folks do a great job."
-John Bazik
"Do yourself a favor and subscribe."
-SunExpert magazine
"...a really hot magazine..."
-HotWired, in Packet
"My first issue of The Perl Journal (vol 1 issue 2) is the best
single issue of a technical journal I have read."
-Andrew Duncan
"The Perl Journal outsells WiReD here."
-Quantum Books of Cambridge, MA
Complete Table of Contents
Issue #8 (tentative):
The Java Perl Library
The Perl Wizard's Quiz
Torture Testing Web Servers and CGI Scripts
SWIG (Simpified Wrapper Interface Generator)
The Net::Telnet module
Perl News / New Modules
Win32 Perl: NT Administration
Perl does EBCDIC?
B-Trees
The Great Internet Mersenne Prime Search
Perl Guts: Knee Deep in the Code
Unreal Numbers (arithmetic precision)
Interprocess Communication with MacPerl
Issue #7:
Win32 Perl
PerlScript
Infinite Lists
Just the FAQs: Short Circuits
Regexes: Nibbling with pos()
Perl/Tk: Binding Basics
Obfuscated Perl Contest -- The Winners
Perl News / New Modules
Perfect Programming
A Perl in the Oil Patch
WebPluck
MakeMaker: Doing More While Doing Less
The Stones Contest
Issue #6:
The First Annual Obfuscated Perl Contest
Randomness, Part Two
Using the AutoLoader and AutoSplit modules
Perl/Tk: A Tour of the Nonstandard Widgets
CGI and the Web: Computing Coolness
Just the FAQs: Sorting Tutorial
Making Your Own Sundials with Perl
WebClip: Gathering Data from the Web
A Perl in the Oil Patch
3-D Graphics and Perl
Perl News / New Modules
Information Retrieval and What "pack 'w'" is For
Issue #5:
Programming like you mean it: Pattern Languages
In Sync With Your Data (Understanding Regular Expressions)
DBI - The Database Interface for Perl 5
Perl/Tk: Signals, Sockets, and Pipes
Creating Surreal HTML Pages With The Mangler
Perl News / New Modules
Perl and the X protocol
PDL: The Perl Data Language
Perl And Nuclear Weapons Don't Mix
Issue #4:
A Subjective Look at Object Oriented Programming
Best of Both Worlds: Embedding Perl in C
The LWP Library: CGI Programming
use Lovecraft qw(cthulhu necronomicon)
New Modules
Randomness
Understanding Regular Expressions
The Grid Geometry Manager: Perl/Tk Programming
The Perl Purity Test
Using Usenet from Perl
Issue #3:
Data Hiding
Perl, Politics, and Pairwise Voting
CGI Scripts and Cookies
Penguin: The First Tentative Waddle
New Modules
Perl/Tk: Events and Other Things
FTP: File Transfer Using Perl
Understanding Regular Expressions
The Perl Institute
Obfuscated Perl Contest Results
Issue #2:
How Perl Saved The Human Genome Project
The Perl Compiler
Penguin: Java Done Right
MacPerl
Perl And The Tk Toolkit: The Mouse Odometer
Saving State with CGI.pm
Understanding Regular Expressions
Results of the Prisoner's Dilemma
The Zeroth Obfuscated Perl Contest
Issue #1:
Wherefore Art, Thou?
Perl And The Tk Toolkit
Creating, Processing, And Sending Mail From Perl
HTML Hacking with Regular Expressions
Programming For The Web: CGI.pm
The Prisoner's Dilemma
(Prices in US dollars) US Canada/Mexico Int'l
----------------------------------------------------------------
plain subscription 18 21 25
subscription + all 7 back issues 53 66 70
Individual back issues are $7 ($9 outside the U.S.) and are mailed
first-class/air-mail, so you get 'em quick. All back issues are
in stock.
TPJ accepts checks, money orders, VISA, and MasterCard, but
operates on *prepayment only* -- we have neither the time nor
the money to send out individual invoices. There's an order form at
http://tpj.com/tpj/subscription_form for postal orders. Our address:
The Perl Journal
P.O. Box 54
Boston MA 02101
USA
You can order online at http://tpj.com/tpj/ordering or via fax
at (617) 623-8718.
Enjoy the magazine, and a big thank you to all subscribers, authors,
and advertisers for their support!
-Jon
------------------------------------
Jon Orwant http://tpj.com
Editor & Publisher, The Perl Journal
------------------------------
Date: Sun, 09 Nov 1997 23:21:58 -0500
From: comdog@computerdog.com (brian d foy)
Subject: Re: Need to speed up s/ / /;
Message-Id: <comdog-ya02408000R0911972321580001@news.panix.com>
In article <35743.4307118056luutrangeocitiescom@207.217.241.29>, "Luu Tran" <luutran@geocities.com> wrote:
[snip lots of s/// thingys]
>Problem is this takes a VERY long time for all but very short input. Since
>it's part of a CGI app, it tends to cause the client to time out. Is there
>anything I can do to optimize this?
well, rather than explain everyhting in a huge usenet post, i'll just
point you to the Owls book [1] which will tell you all about it.
good luck :)
[1]
Mastering Regular Expressions
Jeffrey Freidl
ISBN 1-56592-257-3
<URL:http://www.oreilly.com>
--
brian d foy <comdog@computerdog.com>
NY.pm - New York Perl M((o|u)ngers|aniacs)* <URL:http://ny.pm.org/>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
------------------------------
Date: 10 Nov 1997 04:39:26 GMT
From: Joshua Pritikin <pritikin@mindspring.com>
Subject: ObjStore 1.19 (Haloween Edition)
Message-Id: <64635u$3sd$1@news1.teleport.com>
* High performance relational engine using memory-mapped files.
* Precomputes joins between multiple tables to reach over 20000
complex inserts per minute (not using bcp!).
* Terminate and stay resident SQL emulator written in perl.
* Directly memory access 64-bit channels to Sybase, Informix, or Oracle
relational databases.
* Full duplex nested transactions now supported in native mode.
* Automatic schema evolution.
* Internet ready.
Available via http://www.perl.com/CPAN/modules/by-module/ObjStore
see ./INSTALL for hints on installation
see ./UPGRADE to evolve databases from prior releases
see ./TODO for a list of stuff in the queue
see ./CHANGES for a visionary perspective
Perl-ObjectStore mailing list:
majordomo@parallax.co.uk "subscribe perl-objectstore
you@your.company.com"
------------------------------
Date: Sun, 09 Nov 1997 23:30:59 -0500
From: comdog@computerdog.com (brian d foy)
Subject: Re: Timezone conversion
Message-Id: <comdog-ya02408000R0911972330590001@news.panix.com>
In article <645qo3$pem$3@comdyn.comdyn.com.au>, mgjv@comdyn.com.au (Martien Verbruggen) wrote:
>look at time(), localtime() and gmtime().
>
>time always returns the number of seconds since epoch, GMT (except
>maybe on a mac...),
it does for a Mac as well, for certain values of epoch. perhaps
january 1, 1970 deserves to be the proper noun, "Epoch", and then
the usual Apple version "MacEpoch" :)
--
brian d foy <comdog@computerdog.com>
NY.pm - New York Perl M((o|u)ngers|aniacs)* <URL:http://ny.pm.org/>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
------------------------------
Date: Sun, 9 Nov 1997 20:21:14 -0800
From: "Creede Lambard" <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Subject: Re: Updating current HTML page with Perl CGI... HELP!!
Message-Id: <64623l$e12@bgtnsc02.worldnet.att.net>
Even if you can get something like this to work, I don't think you really
want to because if you use ">index.html" to write to the file, it will
destroy the original file (unless that was your intention). I think I'd do
something like have
<!--#include virtual="cgi-bin/foo.cgi"-->
in your original file, and have "foo.cgi" print out whatever part of the
page you are changing, or perhaps have the whole page generated by a perl
script. It would be much less messy.
-- Creede Lambard
Minister of Irregular Expressions
Programming Republic of Perl
Guy Doucet wrote in message <3465479B.CB64E34D@ait.acl.ca>...
>From an HTML page, I am calling a Perl CGI program. I want this Perl
>script to modify the actual HTML file that the script was called from.
>But I get an error when trying to open the file with the > write symbol.
>Probably because the file is currently open. But I tried calling a
>second HTML page from the first one. Then the second HTML page would
>call the Perl script. Unfortunately I still can't open the first HTML
>file to write to it. Can anyone shed some ideas. Thanks for all info.
>
>Guy Doucet
>
------------------------------
Date: 10 Nov 1997 04:41:28 GMT
From: John Heidemann <johnh@ISI.EDU>
Subject: WWW::Search 1.012 released
Message-Id: <64639o$3u1$1@news1.teleport.com>
WWW::Search and AutoSearch
==========================
WHAT IS NEW WITH WWW::Search 1.012?
-----------------------------------
Overview: an alpha release for test-suite testing
- new: for testing, HTTP results can be saved to disk and played back
- new: test scripts (try "make test")
- bug-fix: Lycos works again and is now maintained by John Heidemann
- bug-fix: AltaVista advanced and news searches have been repaired
- bug-fix: some uninitialized value warnings suppressed
(fix suggested by R. Chandrasekar (Mickey))
- new: new back-ends PLweb
- new: documentation for PLweb (contributed by Paul Linder)
- new: new back-ends: Gopher, Simple (contributed by Paul Linder)
- new: WWW::Search mailing list:
to subscribe, send "subscribe info-www-search" as
the body of a message to <info-www-search-request@isi.edu>
WHAT IS WWW::Search?
--------------------
WWW::Search is a collection of Perl modules which provide an API to
WWW search engines. Currently WWW::Search includes back-ends for
variations of AltaVista, Dejanews, Excite, HotBot, Infoseek, and
Lycos. We include two applications built from this library:
AutoSearch (an program to automate tracking of search results over
time), and WebSearch, a small demonstration program to drive the library.
Back-ends for other search engines and more sophisticated clients are
currently under development.
WHAT IS AutoSearch?
-------------------
WWW::Search's primary client is AutoSearch. AutoSearch performs a
web-based search and puts the results set in a web page. It
periodically updates this web page, indicating how the search changes
over time. Sample output from WWW::Search can be found at
<http://www.isi.edu/lsam/autosearch/>. Output format is configurable.
See the man page for AutoSearch details, or Demonstration section
below for the quick-start instructions.
REQUIREMENTS
------------
WWW::Search requires Perl5 and libwww-perl.
For information on Perl5, see <http://www.perl.com>.
For libwww-perl, see <http://www.sn.no/libwww-perl/>.
Both are also available from the Comprehensive Perl Archive
Network (CPAN). Visit <http://www.perl.com/CPAN/> to find a CPAN
site near you.
At this time WWW::Search has been tested with Perl version 5.003.
AVAILABILITY
------------
The latest version of WWW::Search should always be available from
<http://www.isi.edu/lsam/tools/WWW_SEARCH/>.
WWW::Search is also available as part of CPAN. Visit
<http://www.perl.com/CPAN/> to find a CPAN site near you.
Feedback about WWW::Search is encouraged. If you're using it for a
neat application, please let us know. If you'd like to (or have)
implemented a new back-end for WWW::Search, let us know so we don't
duplicate work.
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 1294
**************************************
