[11708] in Perl-Users-Digest
Perl-Users Digest, Issue: 5308 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Apr 6 10:06:43 1999
Date: Tue, 6 Apr 99 07:00:27 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Tue, 6 Apr 1999 Volume: 8 Number: 5308
Today's topics:
A Perl Inference Engine 0.02 Release Available <mcleand@pop500.gsfc.nasa.gov>
an IDE for perl program developing <jinsy@iname.com>
ANNOUNCE: DbFramework-1.08 <paul@miraclefish.com>
ANNOUNCE: DBIx::Recordset-0.19 <richter@ecos.de>
Announce: Parse-Yapp-0.30 released <desar@club-internet.fr>
Re: array question (Dmitry Epstein)
can't open file from script <kamrani@ifi.uio.no>
chmod - setting permissions with perl? <tim@pixelfilm.de>
devide a formular into two html-pages (Maik Wiege)
Re: flocking question - worried <jdf@pobox.com>
Re: HELP! How do I pass variables? <johan.schon@capgemini.se>
How can i install modules on ActivePerl? agniora@usa.net
How to add modules to ActivePerl? agniora@usa.net
Re: How to add modules to ActivePerl? (Jonathan Stowe)
Re: How to check for benchmark speed of a program? (Larry Rosler)
Re: htpasswd.pl <emanwar@aucegypt.edu>
Re: Installed Perl 5.005_02, what are the paths? mikecard@my-dejanews.com
Is Perl the right tool for the job <wsanns@pog.ufl.edu>
Modification of a DNS File by WWW ... do you know a scr (The Cameleon)
Perl2Exe and GD.pm michielsel@my-dejanews.com
Perl2Exe and GD.pm michielsel@my-dejanews.com
Phonetic comparison of strings (possibly in German) <cosmas.lang@uni-mainz.de>
Re: Premature end of script headers <kimmel00@marvin.informatik.uni-dortmund.de>
Problem with perl2exe when using GD.pm <leo.michielsen@sd.be>
Problems posting with Net::NNTP <joaob@despodata.pt>
Re: Q: Error: No child processes <brectanu@vt.edu>
Regexp question <stefan@consilia.aland.fi>
Re: Regexp question <brectanu@vt.edu>
Re: Regexp question <zim@ou.edu>
Save as Text carlos.alvarez@one.at
Re: search .pl file, where I can send email for Win32 o <kimmel00@marvin.informatik.uni-dortmund.de>
Re: This proverbial "perldoc". <camerond@mail.uca.edu>
Web-DB integration - how was it for you? <isabelle@shalloon.demon.co.uk>
WebMerger CGI parser <administrator@sodertalje.se>
Re: WebMerger CGI parser <EZCum_EZGo@antispam.yahoo.com>
Where can i find Net::SMTP for ActivePerl agniora@usa.net
Where can i find Net::SMTP module? agniora@usa.net
Re: XMODEM Protocol From Perl (Bbirthisel)
YAPC 99 CFP: Yet Another Perl Conference <lenzo@cs.cmu.edu>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 6 Apr 1999 13:29:43 GMT
From: David McLean <mcleand@pop500.gsfc.nasa.gov>
Subject: A Perl Inference Engine 0.02 Release Available
Message-Id: <7ed287$7a9$1@play.inetarena.com>
PIE.pm 0.02 is now available for download at
http://lambda.gsfc.nasa.gov/dl/dl.html
The trace option of PIE.pm has been enhance for greater readability.
The API has also been changed to include KB specification during
initilization.
PIE-0.02 (3/17/99) fixes a number of bugs in CALC and in remembering
ifacts.
A simple "explanation" feature has been implemented.
Also available at this site are A Plan Executor (APE.pm) and
A Centroid CLassifier (CCL.pm).
------------------------------
Date: Tue, 06 Apr 1999 18:16:45 +0800
From: Jin Shunyao <jinsy@iname.com>
Subject: an IDE for perl program developing
Message-Id: <3709DF0A.8788E29B@iname.com>
Hi,
Does there have any tool that can manage perl source code like cscope
for language C?
Pls also reply to this email address mailto:jinsy@iname.com :)
Thanks,
Jin.
------------------------------
Date: 6 Apr 1999 13:30:50 GMT
From: Paul <paul@miraclefish.com>
Subject: ANNOUNCE: DbFramework-1.08
Message-Id: <7ed2aa$7bn$1@play.inetarena.com>
file: $CPAN/authors/id/P/PS/PSHARPE/DbFramework-1.08.tar.gz
size: 32567 bytes
md5: b3e83c94001dd11e4e8a5974ac389569
DbFramework is a collection of classes for manipulating DBI databases.
The classes are loosely based on the CDIF Data Model Subject Area.
This module will help you to
- Present data model objects (tables, columns) as HTML
- Add persistency to your Perl objects
- Manipulate DBI databases through an HTML forms interface
1-04-1999 Paul Sharpe
<paul@miraclefish.com>
--------------------------------------------------
RELEASE 1.08
BUG FIX
- Test database wasn't being created which was causing tests to fail.
------------------------------
Date: 6 Apr 1999 13:30:03 GMT
From: "Gerald Richter" <richter@ecos.de>
Subject: ANNOUNCE: DBIx::Recordset-0.19
Message-Id: <7ed28r$7bj$1@play.inetarena.com>
The URL
ftp://ftp.dev.ecos.de/pub/perl/dbi/DBIx-Recordset-0.19-beta.tar.gz
has entered CPAN as
file: $CPAN/authors/id/GRICHTER/DBIx-Recordset-0.19-beta.tar.gz
size: 57267 bytes
md5: c3ec022a41cd7e1d99ddbc8f0b86fe9b
DBIx::Recordset is a perl module which handles a lot of always repeating
tasks in database access for you.
The goal is to make standard database access (select/insert/update/delete)
easier to handle (e.g. web application or scripts to enter/retrieve
data to/from a database). Special attention is made on web applications to
make
it possible to handle the state-less access and to process the posted data
of formfields.
The programmer only has to supply the absolutely necessary information, the
rest is done by DBIx::Recordset.
The main features of DBIx::Recordset are:
- it has a compact interface, normaly only one function call is necessary
for setup and data retrival/inseration/deletion
- it takes care about type conversion and quoting
- it is able to access/modify tables via arrays and hashs
- it can automaticly create sub-objects for tables which are logical linked
together
- it can automatily create joins based on logical links
- it has input/output filters on a per field/per type basis
- it can create WHERE expression from a hash, which is especially usefull in
a cgi environement, where you can simply pass all paramters posted to your
cgi
script to DBIx::Recordset and DBIx::Recordset creates an corresponding
SELECT.
- it can create previous/next buttons for html output
- it works together with HTML::Embperl for easily genration of HTML output
- it has an own database abtraction class DBIx::Compat which gives all the
necessary information, so that DBIx::Recordset is able to work with
different database systems
- The new class DBIx::Database is able to retrieve and store meta infomation
of the database in a centralised location, which can be used for later
setup. This is also usefull when running under mod_perl, because you can
do
all the setup and configuration work at webserver startup time, speeding
up
your scripts when a actual request is processed.
DBIx::Recordset is currently tested with:
- DBD::mSQL
- DBD::mysql
- DBD::Pg
- DBD::Solid
- DBD::ODBC
- DBD::Oracle (requires DBD::Orcale 0.60 or higher)
- DBD::Sybase (not fully tested)
- DBD::CSV
Changes sinces 0.18:
0.19 30 Mar 1999
- changed order of group by and order by in select. Spotted by
Roman Maeder.
- DBIx::Recordset automaticly tried to determinated links between
tables (see also DBIx::Database)
- DBIx::Recordset will only insert a new record in the DB if
a record contains any data. This avoids inserting a record
that is only created when try to read an non existent record.
- Added new attribute !WriteMode which lets you specify which
write operation to the db are permited and which are not.
- Added new attribute '!LinkName' which will automaticly select
additional fields from links tables (DBMS must support LEFT JOIN)
- Fixed a problem that occurs in cleanup when you use muliple
nested links. (while (($k, $v) = each (%h)) is not reentrant!!)
- Execute will not do a Search after INSERT/UPDATE/DELETE when an
error has occured, so the error message is not overwritten
- use croak instead of die
- SQLDelete accepts empty WHERE, which will delete the whole table
- Added new object DBIx::Database which will parse the metadata of
the database and tried to automaticly determinate links between tables.
All the information is stored for later access by DBIx::Recordset
objects. This makes setup of a DBIx::Recordset object much faster,
especially when you use it in the startup file of your web server.
Also this gives you the possibility to speficy table attributes
only once at startup time.
- New method Links return the links of a DBIx::Recordset object
- New method Link4Field return the link of the specified field if any.
- tied hash now also support DELETE and CLEAR operation on a table.
- Insert now skips undef values, because there is no need to insert
NULL values.
- Update now set undef to NULL, even for database that does not use
placeholders.
- Added Filters. Filters allows you to specify an input and/or an
output function which transforms the correspondig fields before
input/output. This could for example be used to transform database
specific datatypes (e.g. date) to and from a common format, or just
to a human readable format.
- Fieldnames which are given to Update and Insert maybe prefixed with a
\ to avoid any transformation. Suggested by Frank Ridderbusch.
- Update and Insert converts numeric values to vaild numeric format, e.g.
'foo' will be converted to 0 when inserting in an integer field. Use
'\name' => 'foo' to avoid this conversion.
- 'null' and 'not null' now allowed as unary operators in where
expression.
Suggested by Malcolm Cook.
- An value of undef is now allowed as key for the hash access. This is
usefull when your primary key is an autoincrement value. Then you can
add data with undef as key and call Flush to write out the record.
- automaticly finish a statement handle, when all data is fetched to
avoid unneccesaary open statement handles.
- Make all the new features are working with DBD::Orcale. Many thanks
to John Tobey for his help.
- Adapted Compat.pm entries for DBD::Sybase. Help and testing from
Malcolm Cook and Aaron Ross.
- $DBIx::Recordset::Debug now allows more values, so you can better
control what's being logged.
- Added !LongNames parameter which forces the hash keys to the form
table.field.
- Added methods for begin/commit/rollback to make sure DBIx::Recordset
internal data are correctly updated. Suggested by John Tobey.
---
Gerald Richter
ECOS Electronic Communication Services
Internet - Faxabruf - Infodatenbanken
E-Mail: richter@ecos.de
WWW: http://www.ecos.de
Tel: +49-6133/925151
Fax: +49-6133/925152
Faxabruf: +49-6133/93910100
------------------------------
Date: 6 Apr 1999 13:30:24 GMT
From: Francois Desarmenien <desar@club-internet.fr>
Subject: Announce: Parse-Yapp-0.30 released
Message-Id: <7ed29g$7bk$1@play.inetarena.com>
Parse-Yapp-0.30 has just been uploaded to CPAN. It should be
available soon on your nearest CPAN mirror.
Aside of a major restructuration of the modules, this version
adds the source file line numbers embbeded in the parser module,
so finding compile time errors is easier.
The front-end script is now called yapp, instead of yapp.pl and
has a new pod in it, so there is now a yapp(1) man page.
If you have ideas on how to improve Parse::Yapp, don't hesitate
to email me.
Enjoy,
Frangois Disarminien
Here is the README file:
Parse::Yapp - Parse::Yapp Yet Another Perl Parser compiler
Compiles yacc-like LALR grammars to generate Perl OO parser modules.
COPYRIGHT
(c) 1998-1999 Francois Desarmenien, all rights reserved.
(see the Copyright section in Yapp.pm for usage and distribution rights)
IMPORTANT NOTES
THIS IS BETA SOFTWARE.
Though it has been tested a lot, there are probably bugs in it ;-)
The BETA status does not reflect the quality of the code, but the possible
changes in the generated parser modules.
I need FEEDBACK for every problem or bug you could encounter so I can fix
them in the next release. Comments are welcome too.
But I also need FEEDBACK if you use it and have it work fine so I can step
to production releases. Just drop me a mail.
The Parse::Yapp pod section is the main documentation and it assumes
you already have a good knowledge of yacc. If not, I suggest the GNU
Bison manual which is a very good tutorial to LALR parsing and yacc's
grammar syntax.
The documentation is only a draft and should be rewritten (I think).
Any help on this issue would be very welcome.
DESCRIPTION
This is the alpha release 0.30 of the Parse::Yapp parser generator.
It lets you create Perl OO fully reentrant LALR(1) parser
modules (see the Yapp.pm pod pages for more details) and has
been designed to be functionnaly as close as possible to yacc,
but using the full power of Perl and opened for enhancements.
REQUIREMENTS
Requires perl5.004 or better :)
It is written only in Perl, with standard distribution modules,
so you don't need any compiler nor special modules.
INSTALLATION
perl Makefile.PL
make
make test
make install
WARRANTY
This software comes with absolutly NO WARRANTY of any kind.
I just hope it can be useful.
FEEDBACK
Send feedback, comments and bug reports to:
Francois Desarmenien
desar@club-internet.fr
------------------------------
Date: Tue, 06 Apr 1999 09:54:40 GMT
From: mitiaNOSPAM@nwu.edu (Dmitry Epstein)
Subject: Re: array question
Message-Id: <3709d8c3.71305451@news.acns.nwu.edu>
On 6 Apr 1999 05:37:27 GMT, sholden@pgrad.cs.usyd.edu.au (Sam Holden)
wrote:
>>$file_extention = /\..*?$/; # (Assuming that $_ is the file name)
>
>You sure you just want to set it to 1 if the file has a . in it?
>
>If you meant to capture the result then maybe some ()s and a look in
>$1 would be useful.
>
>It's wrong anyway, in that it given the filename 'foo.bar.txt' it matches :
>'.bar.txt'.
Oops! What was I thinking?! OK, the following works (in both cases):
($file_ext) = /\.([^.\/]*)$/;
------------------------------
Date: Tue, 06 Apr 1999 15:38:28 +0200
From: Kamran <kamrani@ifi.uio.no>
Subject: can't open file from script
Message-Id: <370A0E54.4E27@ifi.uio.no>
Hi
sorry if this sounds elementary or misappropriate.
I need to open a file for writing on a disk mounted on my workstation
from inside a perl script. While I can write a file on the disk
manually,
I fail to do that from the script. I have checked the user id and it
is ok. Do I have to set additional property bit on the script ?
Thanks in advance
Kamran
------------------------------
Date: Tue, 06 Apr 1999 15:45:57 +0000
From: Tim Lotz <tim@pixelfilm.de>
Subject: chmod - setting permissions with perl?
Message-Id: <370A2B11.C835ACFD@pixelfilm.de>
hi,
i'm trying to change the permissions from a file in my www-directory
from 0600 to 0755.
i tired the following script (plus thousand different scripts):
chmod(0755, '../test.jpg');
print "done";
it doesn't work.
does anybody knows why?
my book says, that this is the way to do it. does it lie:)?
thanx for your help.
sunny greetings from hamburg!
tim
------------------------------
Date: 6 Apr 1999 13:08:54 GMT
From: 101.48179@germanynet.de (Maik Wiege)
Subject: devide a formular into two html-pages
Message-Id: <7ed116$3tq$1@newshost.germany.net>
I want to devide my long form into two small forms on two html-pages.
On the second page the CGI-Perl-program needs to recognise, from whom the second data was sended and the program must concat the new data with the data sended on the first page.
My idea is to do this using cookies to save the data of the first page on the host and than send the stored data and the data of the seond data to the program. But I do not want to use JavaScript and Cookies. Is there any other way to do this. Is ist possible to get the IP-Adress of the Host, to identify his computer?
Thank you very much
Maik
Maik Wiege
Berlin
MSWiege@gmx.de
http://members.aol.com/langeness
http://www.spsberlin.de
------------------------------
Date: 06 Apr 1999 08:50:53 -0400
From: Jonathan Feinberg <jdf@pobox.com>
Subject: Re: flocking question - worried
Message-Id: <m367796hg2.fsf@joshua.panix.com>
"Chris Denman" <c-denman@dircon.co.uk> writes:
> The flocking side of things is not a problem, I am just worried what
> happens when a file is locked and the server crashes before the file
> is unlocked.
If your web server crashes often enough that this is an issue, you
have *much* bigger problems than your hit counter.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf
------------------------------
Date: Tue, 6 Apr 1999 10:51:25 +0200
From: "johan schoen" <johan.schon@capgemini.se>
Subject: Re: HELP! How do I pass variables?
Message-Id: <7echot$g70$1@news.capgemini.se>
Dear mr Potato Head,
You should learn more about CGI before trying to write CGI-scripts; try this
link:
http://hoohoo.ncsa.uiuc.edu/cgi/
# schoen
mr_potato_head@my-dejanews.com wrote in message
<7ebgok$klb$1@nnrp1.dejanews.com>...
>Hi,
> I know how to pass perl variables at the command line but I don't know
how
>from a web page. I have the following code in my link on my web page:
[DELETED]
>Everytime I run this it only gives me a directory listing of my cgi-bin.
Can
>anyone tell or show me how to pass my variables from my link to my cgi
script?
>Thanks in advance...
>
>-----------== Posted via Deja News, The Discussion Network ==----------
>http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Tue, 06 Apr 1999 10:51:18 GMT
From: agniora@usa.net
Subject: How can i install modules on ActivePerl?
Message-Id: <7ecov5$ko0$1@nnrp1.dejanews.com>
I am running ActivePerl on a Windows NT platform. Does anyone know how i can
add external modules to my perl. i dont have any C++ and i dont have enough
hdd space for it either. Does that mean ill have to live without external
modules??
--@--
agniora
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Tue, 06 Apr 1999 09:33:50 GMT
From: agniora@usa.net
Subject: How to add modules to ActivePerl?
Message-Id: <7eckdu$hed$1@nnrp1.dejanews.com>
Does anyone know how i can add external modules to my ActivePerl. I dont have
VC++ or Borland C++.
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Tue, 06 Apr 1999 11:03:55 GMT
From: gellyfish@gellyfish.com (Jonathan Stowe)
Subject: Re: How to add modules to ActivePerl?
Message-Id: <3709e9bf.11444204@news.dircon.co.uk>
On Tue, 06 Apr 1999 09:33:50 GMT, agniora@usa.net wrote:
>Does anyone know how i can add external modules to my ActivePerl. I dont have
>VC++ or Borland C++.
>
By using the Perl Package Manager (PPM) that comes with it.
/J\
------------------------------
Date: Tue, 6 Apr 1999 06:55:24 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: How to check for benchmark speed of a program?
Message-Id: <MPG.1173b226d828684e989846@nntp.hpl.hp.com>
[Posted and a courtesy copy sent.]
In article <7ecadf$983$1@nnrp1.dejanews.com> on Tue, 06 Apr 1999
06:42:56 GMT, agniora@usa.net <agniora@usa.net >says...
> If i want to check how long it takes to do a certain task for a program, how
> can i do it? eg to test the total time taken of the following program : $_ =
> 'This is a text'; print tr/ //;
You can do it yourself by bracketing substantial pieces of code between
calls to time() [for wall-clock time] or times() [for CPU time, etc.].
The resolution is typically 10 milliseconds.
For small snippets such as yours, you need to time a loop and subtract
out the loop overhead. The Benchmark module makes that fairly
straightforward.
perldoc Benchmark
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Tue, 06 Apr 1999 11:09:23 +0200
From: Emad Ragy Anwar <emanwar@aucegypt.edu>
Subject: Re: htpasswd.pl
Message-Id: <3709CF42.FD43770F@aucegypt.edu>
Jon wrote:
> Hello all!
>
> I have been banging my head against a wall for the past few days and I am
> hoping that someone here can shed some light on a problem I am having.
>
> Here's my problem:
>
> I have a section of my site that I need to password protect and I am using
> the .htaccess file to get it done. I know how to add new user names and
> passwords to the .htpasswd using Telnet, but I really need a script that
> will do this for me.
>
> I have the "Special Edition Using CGI" book copyright 96, that provides a
> script to do just this, but even though I have set everything up right its
> unable to write to the .htpasswd file. The Script can read the .htpasswd
> file, I know that much, because it will tell you if you enter a username
> that is already taken. But It will not write to the .htpasswd file no matter
> how I set the permissions!
>
> Is there a security issue that has changed since the book was released that
> will not allow a script to make changes to the .htpasswd that I am unaware
> of? Or am I just setting the permissions wrong? I get no errors, it even
> takes me to the conformation page to tell me that the user name and password
> has been added. But when you try to enter using the password/username its
> unable to find either...
>
> Any help would be GREATLY appreciated :)
>
> Thanks!
> Jon
Check this site http://www.cgi-world.com/protect_it.html
I hope you find what you are looking for .. good luck
--Emad
------------------------------
Date: Tue, 06 Apr 1999 13:13:37 GMT
From: mikecard@my-dejanews.com
Subject: Re: Installed Perl 5.005_02, what are the paths?
Message-Id: <7ed19s$req$1@nnrp1.dejanews.com>
"WebMaster of WebKnights.com" <webmaster@webknights.com> wrote:
> Hello! I installed Perl 5.005 and I don't have any clue what the paths
> are. I installed Perl into C:\Perl if that helps. I need to know all of
> the most commonly used paths, pleeeease. Also, when I run a Perl script
> using my webserver (MS WebServer, which is running on my local hard
> drive, not on the web), but the browser doesnt seem to want to run it.
> It wants to download it! Please help!
> Please send replies to: webmaster@webknights.com
I am having this very same problem. if anybody emailed this guy the answers
could you also please post them here because this is driving me nuts
mike cardeiro
>
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Tue, 06 Apr 1999 09:41:32 -0400
From: William Sanns <wsanns@pog.ufl.edu>
Subject: Is Perl the right tool for the job
Message-Id: <370A0F0C.50A9931B@pog.ufl.edu>
I've just come from a "microsoft" shop and am now managing a web based
remote data entry system. We have a Java front end and Oracle (V7.3.4)
on the back end. We are currently running on AIX but will migrate to
Linux within the next 3 months. Java is working fine for most of the
client work, but there are many instances where I would just like to
present the user with a "report" from the database in html format (I
would have used ASP in my "previous life"). From what I've seen, Perl
looks like its easy to pick up, but is it capable of creating a "dynamic
length" html page (the page would have anywhere from 0 to n number of
records returned to the user based on their selections). We are
considering PHP, but Perl seems more widely supported.
Thanks in advance
Bill
------------------------------
Date: 6 Apr 1999 09:53:47 GMT
From: cameleon@editions-paradyse.com (The Cameleon)
Subject: Modification of a DNS File by WWW ... do you know a script ?
Message-Id: <7ecljb$7iq$2@jaydee.iway.fr>
Hi
i am search a script for modification of a DNS File.
I use Named on Linux and Perl 5, for all domaines that i have, i use
one file per domaine.
I am search a www interface for modification of this file !
Thanks for your help
------------------------------
Date: Tue, 06 Apr 1999 12:09:44 GMT
From: michielsel@my-dejanews.com
Subject: Perl2Exe and GD.pm
Message-Id: <7ecti4$oae$1@nnrp1.dejanews.com>
Hi,
When I compile the folowwing script with Perl2Exe :
use GD;
....
no error occurs, but when I run the executable an
unknown exception occurs
Platform : Win NT 4.0 & standard Perl 5.004
Greetings,
Leo
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Tue, 06 Apr 1999 12:15:57 GMT
From: michielsel@my-dejanews.com
Subject: Perl2Exe and GD.pm
Message-Id: <7ecttp$ont$1@nnrp1.dejanews.com>
When I 'compile' the following lines with Perl2Exe :
use GD.pm
print "hello" ;
Nothing goes wrong, but when I try to run the executable, an unknown
exception is thrown by Win NT. The script works fine when I use the standard
perl interpreter ( version 5.004)
Any comments are welcome !
Greetings,
Leo
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Tue, 06 Apr 1999 15:43:33 +0200
From: Cosmas Lang <cosmas.lang@uni-mainz.de>
Subject: Phonetic comparison of strings (possibly in German)
Message-Id: <370A0F85.4BE33FB@uni-mainz.de>
Hi,
does anybody know of a perl module or at least an algorithm for
a bit more exact comparison of strings than the standard
soundex?
Soundex sees 'M=FCller' and 'Milre' as the same, or 'Lang' and 'Lonke',
and that's too simple for german usage. What I need is something to
distinguish
only slight typing errors of names in a database.
Any help appreciated!
---------
Cosmas Lang (Cosmas.Lang@Uni-Mainz.DE)
***************************************************************
* Homepage: http://www.Uni-Mainz.DE/~langc/my_homepage.html *
***************************************************************
------------------------------
Date: Tue, 06 Apr 1999 13:11:50 +0200
From: Sascha Kimmel <kimmel00@marvin.informatik.uni-dortmund.de>
Subject: Re: Premature end of script headers
Message-Id: <3709EBF6.E371876F@marvin.informatik.uni-dortmund.de>
solidice@my-dejanews.com wrote:
>
> I'm trying to get this guestbook CGI script to work. I've put the script in
> it's own directory called guestbook along with the .htm files and images.
> I've chmod 755 guest.cgi the script. Then went to the add.htm so I could see
> if it would work. I get a 500 Internal Server Error saying this
>
> Internal Server Error
>
> The server encountered an internal error or misconfiguration and was unable to
> complete your request.
>
> Please contact the server administrator, electron@electronicparty.com and
> inform them of the time the error occurred, and anything you might have done
> that may have caused the error.
>
> Premature end of script headers:
> /home/electron/public_html/guestbook/guest.cgi
I noticed that nobody has really focused on the real problem and that is
exactly this I think.
Premature end of script headers just means that there are not enough or
malformed headers the server gets back from your Perl Script.
Normally in Perl it looks like this:
#!/usr/local/bin/perl
print "Content-type: text/html\n\n";
print <<EOF;
<html>
<head>
<title>Test</title>
</head>
<body>
<h1>Welcome to this testpage</h1>
</body>
</html>
EOF
Please have a look @ the correct writing of the Content-type header.
Does your script produce more HTTP-Headers *except* content-type?
The error you reported is in the most cases caused by a missing "\n\n"
at the end of the headers (see above).
I hope this helps, maybe you could insert a bit of your code here?
regards,
Sascha Kimmel
------------------------------
Date: Tue, 06 Apr 1999 12:23:15 +0200
From: Leo Michielsen <leo.michielsen@sd.be>
Subject: Problem with perl2exe when using GD.pm
Message-Id: <3709E091.915C1E37@sd.be>
Hi,
Perl2Exe works fine for all my scripts that don't include gd.pm.
When I include gd.pm , the script can be made executable with perl2exe,
but when i run the executable I get an application error.
I'm using NT4.0 & standard Perl 5.004
Leo
____________________________________________
Leo Michielsen
Software Engineer
ZENO - Information Reengineering & Retrieval
Brouwersvliet 5
2000 Antwerpen
Belgium
leo.michielsen@sd.be
http://www.zeno.be
____________________________________________
------------------------------
Date: Tue, 06 Apr 1999 12:05:09 +0100
From: =?iso-8859-1?Q?Jo=E3o?= Bonina <joaob@despodata.pt>
Subject: Problems posting with Net::NNTP
Message-Id: <3709EA65.4C31E13F@despodata.pt>
This is a multi-part message in MIME format.
--------------117A856122D5615B4C75737F
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
--------------117A856122D5615B4C75737F
Content-Type: message/rfc822
Content-Transfer-Encoding: 8bit
Content-Disposition: inline
X-Mozilla-Status2: 00000000
Message-ID: <3709DA32.581EA4B9@despodata.pt>
Date: Tue, 06 Apr 1999 10:56:02 +0100
From: =?iso-8859-1?Q?Jo=E3o?= Bonina <joaob@despodata.pt>
X-Mailer: Mozilla 4.5 [en] (X11; I; Linux 2.0.36 i686)
X-Accept-Language: en
MIME-Version: 1.0
Newsgroups: comp.lang.perl.modules
Subject: Problems posting with Net::NNTP
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Hi!
I'm writing a perl script for posting and using the Net::NNTP module.
According to Perl Cookbook, all I would need was
$newsserver->post( @lines )
or die "Can't post: $!\n";
but I always get the "Can't post" error message and no errno value.
The @lines table goes like this:
$linhas[0] ="Relay-Version: version 0.1; site mysite.pt";
$linhas[1] ="Posting-Version: version 0.1; site mysite.pt";
$linhas[2] ="From: joaob\@despodata.pt (Joco Bonina)";
$linhas[3] ="Date: $data";
$linhas[4] ="Newsgroups: alt.test";
$linhas[5] ="Subject: test-pl";
$linhas[6] ="Reply-To: joaob\@despodata.pt";
$linhas[7] ="Organization: myorg";
$linhas[8] =" ";
$linhas[9] ="This is";
$linhas[10] ="a test";
$linhas[11] =".";
If anyone had the patience to get to this point so far, please would
you tell me what am I missing here? Thanks in advance!
--------------117A856122D5615B4C75737F--
------------------------------
Date: Tue, 06 Apr 1999 09:24:52 -0400
From: Brian Rectanus <brectanu@vt.edu>
To: anna@water.ca.gov
Subject: Re: Q: Error: No child processes
Message-Id: <370A0B24.23574849@vt.edu>
anna@water.ca.gov wrote:
>
> Can you help with this error? Prior to last week, our script worked. Now, it
> throws an error, although it still seems to work.
>
> The script determines whether a file exists and prints it by calling lp.
>
> Here's the snippet of code:
> --------------------------
>
> system "/usr/bin/lp -d$dest $fullfile > /dev/null 2>&1"; if ($?) { print
> "<h1>? ! ?</h1> The print command returned an error number $?. This may be
> the problem: $!<br>\n"; print "Print command: /usr/bin/lp -d$dest
> $fullfile<br>\n";
>
> Here's the error output:
> ------------------------
>
> ? ! ?
>
> The print command returned an error number -1. This may be the problem: No
> child processes Print command: /usr/bin/lp -dhydroq1
> /db2/iodir/PRECIPSUM.1999
>
Perhaps you are picking up a previous assignment to $?
try:
$? = 0;
before the system command.
--
Brian Rectanus
brectanu@vt.edu
------------------------------
Date: Tue, 6 Apr 1999 08:41:23 -0200
From: <stefan@consilia.aland.fi>
Subject: Regexp question
Message-Id: <Pine.SOL.3.95.990406083826.15940A-100000@lucas>
Hi there!
Can somebody please help me with this one:
I need to parse as string to see if it contains a sentence starting with
@@ and then ends with @@ and if so I need to remove those @@'s and store
the string between the @@'s in a variable.
Rgds, Stefan
------------------------------
Date: Tue, 06 Apr 1999 09:09:16 -0400
From: Brian Rectanus <brectanu@vt.edu>
Subject: Re: Regexp question
Message-Id: <370A077C.23229A42@vt.edu>
#!/usr/bin/perl
$line1 = '@@Some sentence here.@@'; # No whitespace before/after
$line2 = ' @@Some sentence here.@@ '; # Some whitespace before/after
$line3 = ' blah @@Some sentence here.@@ blah '; # Anything before/after
# Get rid of the @@'s
$line1 =~ s/^@@(.*)@\@$/$1/;
$line2 =~ s/^\s*@@(.*)@@\s*$/$1/;
$line3 =~ s/^.*@@(.*)@@.*$/$1/;
print "'$line1'\n";
print "'$line2'\n";
print "'$line3'\n";
Here is a simple way of doing it. It will not work if there are
multiple sentences in a string (ie -- '@@Sentence 1.@@ @@Sentence 2.@@')
That is left as an exercise for the user :)
These are quite simple regular expressions. Get a good book, like the
camel book, "Programming Perl", from O'Reilly.
-Brian
--
Brian Rectanus
brectanu@vt.edu
stefan@consilia.aland.fi wrote:
>
> Hi there!
>
> Can somebody please help me with this one:
>
> I need to parse as string to see if it contains a sentence starting with
> @@ and then ends with @@ and if so I need to remove those @@'s and store
> the string between the @@'s in a variable.
>
> Rgds, Stefan
------------------------------
Date: Tue, 06 Apr 1999 08:09:10 -0500
From: "B. Zimmerman" <zim@ou.edu>
Subject: Re: Regexp question
Message-Id: <370A0776.2D71404A@ou.edu>
Am I missing something about this question?
#!/usr/bin/perl -w
while (<>) {
if (/\x40\x40(.*)\x40\x40/) {
push @vals,$1;
}
}
will this not do the job?
--
B. Zimmerman
zim@ou.edu
------------------------------
Date: Tue, 06 Apr 1999 09:06:05 GMT
From: carlos.alvarez@one.at
Subject: Save as Text
Message-Id: <7ecipr$g78$1@nnrp1.dejanews.com>
Hi,Does anyone know how to save a Word 97 file as plain text?
After creating a word object ($word) using the Win32::OLE library,
I tried something like:
$word->ActiveDocument->SaveAs(FileName=> 'filename',FileFormat =>
'wdFormatText');
but wouldn't work.
If I try:
$word->ActiveDocument->SaveAs('filename');
saves the file as filename, but obviously not as text.
I think there must be something wrong with the sintax while I tried to save
it as text.I'm using version 5.005_02 for MSWin32-x86-object.
Could anyone help?
Thanks in advance,Carlos
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Tue, 06 Apr 1999 13:26:00 +0200
From: Sascha Kimmel <kimmel00@marvin.informatik.uni-dortmund.de>
Subject: Re: search .pl file, where I can send email for Win32 over GMX-Mail Gateway
Message-Id: <3709EF48.2D8AF030@marvin.informatik.uni-dortmund.de>
Rovetto Stefan wrote:
>
> Hello
> I'm looking for a .pl file, where I can send email for Win32 over GMX-Mail
> Gateway or other free gateways.
Hi!
AFAIK GMX *is no free gateway*!
If you have CGI-access on your site (which you might because you are
searching for a perl script) you will simply use sendmail which should
be running on the server.
A perl script (as used @tricos.com) looks like this:
#!/usr/local/bin/perl
require "cgi-lib.cgi";
ReadParse(*in);
$nextpage = "site.cgi?s=success&rn=$in{'rn'}";
$subject="Feedback von tricos.com WebSite";
open (MAIL,"|/bin/sendmail -t -n -oi") || die "There was a problem with
the call to Sendmail";
print MAIL "To: info\@tricos.com$tomail\n";
print MAIL "From: $in{'name'} <$in{'e-mail'}> (unverified)\n";
print MAIL "Subject: $subject\n\n";
print MAIL $in{'body'};
print MAIL "\n\n";
close(MAIL);
print "Location: $nextpage\n\n";
exit;
> Example:
> I have a feedback.htm site. The people fill out this page and press send.
> Now I will resceve an email with all data. I need only two things.
> 1) .pl file (example with description for modification)
> 2) An example of feedback.htm
> Thanks for your tip or adress, where I can find this.
> With kind regards. Steve. (Please post and email me your answer)
> ( designo@gmx.net )
You can find the site using this script at tricos.com (german site!) in
the contact area.
If you have further questions please send them via email to
sk@tricos.com
Regards,
Sascha Kimmel
------------------------------
Date: Tue, 06 Apr 1999 07:51:18 -0500
From: Cameron Dorey <camerond@mail.uca.edu>
To: Gabriel Richards <grichard@uci.edu>
Subject: Re: This proverbial "perldoc".
Message-Id: <370A0346.A4378ABB@mail.uca.edu>
[cc'd to gr]
Gabriel Richards wrote:
>
> > Where are you typing perldoc?
> >
> > If on your Win32 machine, cd to the c:\perl\bin directory and try it
> there.
> >
> > On you *nix machine, type "which perl" go to the directory it gives you
> and
> > try it there.
> >
> No such luck. I've scoured my win32 box and there doesn't exist any file
> named perldoc. "which perl" gives /usr/bin/perl and again nothing. Oh
> well...
If I remember right, perldoc was not included in the 3xx versions by
ActiveState. It was included in the GS port (5.00402) and is in
ActivePerl (509, anyway). So, since you probably should upgrade for
other reasons, anyway, I would suggest upgrading and the command will
become active (providing, of course, you run it in a DOS box).
Cameron
--
Cameron Dorey
camerond@mail.uca.edu
------------------------------
Date: Tue, 6 Apr 1999 11:14:23 +0100
From: isabelle <isabelle@shalloon.demon.co.uk>
Subject: Web-DB integration - how was it for you?
Message-Id: <WyScmPA$5dC3EwFr@shalloon.demon.co.uk>
Hello,
I am a final year student at Leeds Metropolitan University on a Bsc
Information Systems and I am writing my final year dissertation on the
topic of Web-Database Integration.
As part of this, I am carrying out a postal/ email questionnaire to
gather information from companies who have web enabled a database
(whether on an intranet or on the WWW). This questionnaire asks
questions such as tools used, web server used, how was an evaluation
carried out as to what solution was the best, was the existing hardware
set up a limiting factor, difficulties encountered, what benefits to the
company it will bring, etc... It's entirely anonymous - I only ask for
the company name - and, needless to say, all data will be held in
complete confidence.
The questionnaire is available either as a text or a Word 6 document to
filled in electronically and sent back to me via email. Or I could post
it as a paper form (with pre-paid envelope for the answer).
Would anybody who has gone through the experience of web enabling a
database (any database) for his/her company be so kind of web-database
integration for his/her company be so kind as to spend about 10 - 15
minutes filling the questionnaire in ? If yes could you let me know
(either here or via email) so that I can get in touch?
I will make the same request in other database or programming related
newsgroups - I apologise in advance for this: no spam is intended, I
would just like to cast my net as wide as possible.
Thank you in advance for your help.
Isabelle
------------------------------
Date: 6 Apr 99 11:59:01 GMT
From: "B Hahn" <administrator@sodertalje.se>
Subject: WebMerger CGI parser
Message-Id: <01be8025$fd682a00$0349c6c3@worldw2>
This program eases the application building for the web.
For Windows 95/98, NT and RedHat Linux
Very simple to learn and use yet extremely powerful for advanced
applications.
Create:
* Shopping apps
* Conferences
* Counters
* Local search engines
* Searchable databases
* Online training
Just as easy as plain HTML.
Please visit:
http://www.webmerger.com
------------------------------
Date: Tue, 6 Apr 1999 08:47:22 -0400
From: "Mike D." <EZCum_EZGo@antispam.yahoo.com>
Subject: Re: WebMerger CGI parser
Message-Id: <7ecvvi$j4l55@news.diebold.com>
Has anyone had any experience with this program? I am looking to develop a
database application for a website and this seems like it would cut down my
programming time? If anyone can point me to sites using this or put me in
contact with a client I would appreciate it.
Please remove the obvious anti-spam measure if you wish to respond by
e-mail.
B Hahn wrote in message <01be8025$fd682a00$0349c6c3@worldw2>...
>This program eases the application building for the web.
>For Windows 95/98, NT and RedHat Linux
>
>Very simple to learn and use yet extremely powerful for advanced
>applications.
>Create:
>* Shopping apps
>* Conferences
>* Counters
>* Local search engines
>* Searchable databases
SNIP!
------------------------------
Date: Tue, 06 Apr 1999 09:29:12 GMT
From: agniora@usa.net
Subject: Where can i find Net::SMTP for ActivePerl
Message-Id: <7eck53$h45$1@nnrp1.dejanews.com>
To send emails through perl i need the Net::SMTP module, but it doesnt come
with the standard distribution, does anyone know where i can find it ?
agniora
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Tue, 06 Apr 1999 10:55:58 GMT
From: agniora@usa.net
Subject: Where can i find Net::SMTP module?
Message-Id: <7ecp7s$l2e$1@nnrp1.dejanews.com>
I need to send emails from my windows NT ActivePerl. Does anyone know where
and how i can get the Net::SMTP module, cause thats what the example in the
activeperl documentation talks about. thanks
--@--
agniora
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 6 Apr 1999 12:56:33 GMT
From: bbirthisel@aol.com (Bbirthisel)
Subject: Re: XMODEM Protocol From Perl
Message-Id: <19990406085633.10570.00002740@ng-fd1.aol.com>
Hi Garth:
Well, I've thought about doing it. And I have
both C-code and the XMODEM spec handy.
Only time is missing. But I would be happy
to help.
Contact me directly (off the newsgroup) and
we can work out a plan. I have not heard
of any previous implementations using
Win32::SerialPort for this.
If someone DOES have snippets, earlier
attempts, etc., comtributions would be very
welcome.
-bill
(author of Win32::SerialPort)
Making computers work in Manufacturing for over 25 years (inquiries welcome)
------------------------------
Date: Tue, 06 Apr 1999 08:51:23 -0400
From: Kevin Lenzo <lenzo@cs.cmu.edu>
Subject: YAPC 99 CFP: Yet Another Perl Conference
Message-Id: <370A034B.263D6368@cs.cmu.edu>
***************** CALL FOR PARTICIPATION ******************
Yet Another Perl Conference (YAPC) '99
http://www.cs.cmu.edu/~lenzo/yapc/
Thursday and Friday, June 24-25, 1999
at
Carnegie Mellon University
Pittsburgh, Pennsylvania
Yet Another Perl Conference (YAPC) is an inexpensive ($60) perl
users and developers conference, with a mix of tutorials and
technical talks. The conference is set in Pittsburgh,
Pennsylvania, and so is relatively accessible from both the East
and the Midwest.
YAPC began as a grassroots users conference, from discussions
among Perl Mongers, and has grown from there. We would like
to invite you to join us for two days of Perl, people, and
demonstrations, at a price that shouldn't hurt your wallet.
A number of members of the Perl community are contributing to this
event, including:
* Larry Wall, on whatever he'd like to talk about :)
* Peter Braam, on the Coda File system
* Mark-Jason Dominus, with a half-day Regex Tutorial and the
Perl Hardware Store
* Jonathan Eisenzopf, Demystifying XML
* Joseph Hall, on Idiomatic Perl and Object-Oriented Perl
* Chris Nandor, on MacPerl and the Elements of the Wild
* Randal Schwartz, giving a whole-day Llama course on learning
Perl and half-day on Reducing Business
Risk using Perl
* ... and YOU! See the CALL FOR PAPERS below!
Look to the main web page for more details.
** Dorm rooms **
A limited number of inexpensive dorm rooms are available at
Carnegie Mellon, that will be given preferentially to students,
but more generally on a first-come basis. This is to further
reduce the cost for those with limited resources, especially
students, who we are trying to encourage the most.
You can ask to be considered for dorm space on the Registration
page, which is available from the main page.
Registration information is available from the main page at
http://www.cs.cmu.edu/~lenzo/yapc/
*********** CALL FOR PAPERS ***********
Potential presenters should submit a 200-300 word abstract to
lenzo+abstract@cs.cmu.edu
in plain ASCII text or HTML by April 30th for consideration.
We would like that your materials be available online, but
it is not required. If you have materials to include in
the proceedings, or course notes, please let us know your
requirements the abstract. If you have any special presentation
needs, please include them also.
Topics are unlimited, but some suggestions include:
* Groupware, Agents, and Bots
* Perl for Speech and Language
* Text and Document Processing
* Machine Learning in Perl
* HTML, XML, and Markup Languages
* CGI and Web programming in Perl
* Internet Programming
* Database Interation and Access with Perl
* Scientific Computing (e.g. with PDL)
* Practical Perl Programming
* Module guts and usage on any particular Module.
* Tutorials of all stripes: Modules, Objects, CPAN
* Visionary or position papers on Perl, the past,
the present, and the future
* Anything cool :)
Conference fees will be waived for presenters at yapc, so
another way to reduce your costs is to give a good talk
on something you're excited about.
** YAPC '99 ** http://www.cs.cmu.edu/~lenzo/yapc/ ********
***************** CALL FOR PARTICIPATION ******************
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 5308
**************************************