[18147] in Perl-Users-Digest
Perl-Users Digest, Issue: 315 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Feb 19 11:05:47 2001
Date: Mon, 19 Feb 2001 08:05:08 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <982598708-v10-i315@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 19 Feb 2001 Volume: 10 Number: 315
Today's topics:
Re: How to get ProcesID <miha.andrejasic@ijs.si>
Re: How to get ProcesID <beable@my-deja.com>
Re: How to get ProcesID <miha.andrejasic@ijs.si>
Re: Invisible code? (Jim Kroger)
kill unix process <jlee8@irix1.gl.umbc.edu>
Re: Linux, Perl, CommPort - 28800 baud (Neil Cherry)
New posters to comp.lang.perl.misc <gbacon@cs.uah.edu>
Re: newbie regex linebreaks problem <tom@power.net.uk>
passing a variable with a checkbox? emelin@my-deja.com
Re: passing a variable with a checkbox? <bmb@ginger.libs.uga.edu>
perl DBI cron problem <jtkelly@usadatanet.net>
perl irc channel <a.v.a@home.nl>
Re: perl irc channel (Randal L. Schwartz)
Re: perl irc channel <a.v.a@home.nl>
Re: perl irc channel <a.v.a@home.nl>
simple question <Waarddebon@chello.nl>
Re: simple question <tony_curtis32@yahoo.com>
Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
Re: striping HTML <dontspamthewebmaster@webdragon.net>
Re: striping HTML <dontspamthewebmaster@webdragon.net>
Re: striping HTML <dontspamthewebmaster@webdragon.net>
Re: three-part form submission using CGI.pm <dontspamthewebmaster@webdragon.net>
Re: three-part form submission using CGI.pm <bmb@ginger.libs.uga.edu>
Re: three-part form submission using CGI.pm <dontspamthewebmaster@webdragon.net>
Re: Wanted: Image Magic for dummies <tom_perkin@nospamplease.hotmail.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 19 Feb 2001 13:30:07 +0100
From: Miha Andrejasic <miha.andrejasic@ijs.si>
Subject: Re: How to get ProcesID
Message-Id: <3A9111CF.CBBBDF9C@ijs.si>
--------------67C108953C5D689583B6F99B
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Anno Siegel wrote:
> Miha Andrejasic <miha.andrejasic@ijs.si> wrote in comp.lang.perl.misc:
> >-=-=-=-=-=-
> >
> >Hello!
> >
> >I got one simple question. If I start a background process with one of
> >my perl scripts using command 'system',
> >how can I get a PID (process ID) of that process.
>
> You can't and you don't need to. system() only returns when the
> background process has terminated, so the PID would be useless
> once you get it.
>
OK! But what about this line:
system ("$exe --user $uid --project $project > /dev/null &");
With this line I start a script from my CGI script and this new script runs
in background regardless of what
am I doing with CGI.
>
> > I would need that if I
> >would like to terminate that
> >process using perl script.
>
> You don't get a chance to do so. If you want to control a process
> while it is running, use fork or an equivalent open. These *do* give
> you the PID.
I would appreciate just a line or two of this tip.
I mean how do you use fork?
I have never done this before!
Thanx
--
miha
--------------67C108953C5D689583B6F99B
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
Anno Siegel wrote:
<blockquote TYPE=CITE>Miha Andrejasic <miha.andrejasic@ijs.si>
wrote in comp.lang.perl.misc:
<br>>-=-=-=-=-=-
<br>>
<br>>Hello!
<br>>
<br>>I got one simple question. If I start a background process with one
of
<br>>my perl scripts using command 'system',
<br>>how can I get a PID (process ID) of that process.
<p>You can't and you don't need to. system() only returns when the
<br>background process has terminated, so the PID would be useless
<br>once you get it.
<br> </blockquote>
OK! But what about this line:
<br>system ("$exe --user $uid --project $project > /dev/null &");
<p>With this line I start a script from my CGI script and this new script
runs in background regardless of what
<br>am I doing with CGI.
<br>
<blockquote TYPE=CITE>
<br>>
I would need that if I
<br>>would like to terminate that
<br>>process using perl script.
<p>You don't get a chance to do so. If you want to control a process
<br>while it is running, use fork or an equivalent open. These *do*
give
<br>you the PID.</blockquote>
I would appreciate just a line or two of this tip.
<br>I mean how do you use fork?
<br>I have never done this before!
<p>Thanx
<br>
<pre>--
miha</pre>
</html>
--------------67C108953C5D689583B6F99B--
------------------------------
Date: Mon, 19 Feb 2001 14:49:57 GMT
From: Beable van Polasm <beable@my-deja.com>
Subject: Re: How to get ProcesID
Message-Id: <m34rxqohue.fsf@beable.van.polasm.bigpond.net.au>
Miha Andrejasic <miha.andrejasic@ijs.si> writes:
> Anno Siegel wrote:
> > You don't get a chance to do so. If you want to control a process
> > while it is running, use fork or an equivalent open. These *do* give
> > you the PID.
>
> I would appreciate just a line or two of this tip.
> I mean how do you use fork?
> I have never done this before!
#!/usr/bin/perl -w
use strict;
my $child = 0;
$child = fork();
if (! defined $child)
{
die "fork failed";
}
if ($child == 0)
{
print "I am the child\n";
# do child stuff here
while(1)
{
print "LA LA LA LA!\n";
system("perldoc -f fork");
sleep 1;
}
}
else
{
print "I am the parent, child's pid is $child\n";
# do parent stuff here
sleep 7;
kill 9, $child;
}
cheers
Beable van Polasm
--
I'm bloody tired of you nut-jobs always whining about Einstein.
-- Daniel Buettner
IQC 78189333
http://members.nbci.com/_______/index.html
------------------------------
Date: Mon, 19 Feb 2001 16:03:03 +0100
From: Miha Andrejasic <miha.andrejasic@ijs.si>
Subject: Re: How to get ProcesID
Message-Id: <3A9135A7.CF2B7773@ijs.si>
--------------A742A52C7442F5393D2806A9
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Beable van Polasm wrote:
>
> #!/usr/bin/perl -w
>
> use strict;
>
> my $child = 0;
>
> $child = fork();
Thanx
--
miha
--------------A742A52C7442F5393D2806A9
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
Beable van Polasm wrote:
<blockquote TYPE=CITE>
<br>#!/usr/bin/perl -w
<p>use strict;
<p>my $child = 0;
<p>$child = fork();</blockquote>
<p><br>Thanx
<br>
<pre>--
miha</pre>
</html>
--------------A742A52C7442F5393D2806A9--
------------------------------
Date: Mon, 19 Feb 2001 09:42:17 -0500
From: minorseventhSPAMBLOCK@earthlink.net (Jim Kroger)
Subject: Re: Invisible code?
Message-Id: <minorseventhSPAMBLOCK-1902010942170001@tritone.csbmb.princeton.edu>
In article <3A90B97C.458A36A3@stomp.stomp.tokyo>, "Godzilla!"
<godzilla@stomp.stomp.tokyo> wrote:
> Jim Kroger wrote:
>
> > Kira wrote:
> > > Jim Kroger wrote:
>
> > > (snippage)
>
> > > > I have spent a couple days staring at this code, trying to
understand why
> > > > my while loop is passed over. This happens with or without the debugger.
>
> > > > open(DATA, "file");
> > > > open(SPLIT, ">airfilelist");
> > > > while (<DATA>) { <
> > > > $temp = "func_an/${_}"; <
> > > > @ffile = (@ffile, $temp); <
> > > > } <
> > > > @ffile = ($ffile[0], @ffile);
> > > > print SPLIT @ffile;
>
> > > Why did you post code with fatal syntax errors?
>
> > > "Unterminated <> operator at...."
>
>
> > Huh? That was a excerpt from my program.
>
>
> Uh huh. Your use of 'DATA' and your use of 'SPLIT'
> are both innocent inclusions as well, right?
>
> Never try to con a con.
>
> Godzilla!
I have no idea what you're talking about, but I'm sure you're having a
good time with yourself, so I'll let you two be.
Jim
--
Remove SPAMBLOCK to reply
------------------------------
Date: 19 Feb 2001 14:09:19 GMT
From: Ji Lee <jlee8@irix1.gl.umbc.edu>
Subject: kill unix process
Message-Id: <96r9ef$s0r$1@news.umbc.edu>
here is my code:
exec "/usr/bin/ksh", "-c", <<EOF;
ps -ef|grep slapd |grep -v grep |awk '{print $2}'|xargs kill -9
sleep 2
I will to convert the above line to perl. can anyone help?
thanks
------------------------------
Date: Mon, 19 Feb 2001 14:50:45 GMT
From: njc@CC47532-A.ewndsr1.nj.home.com (Neil Cherry)
Subject: Re: Linux, Perl, CommPort - 28800 baud
Message-Id: <slrn992csl.44s.njc@CC47532-A.ewndsr1.nj.home.com>
On Mon, 19 Feb 2001 14:59:42 +0100, Jacek Chmielewski wrote:
>Witam Mam problem, jak pod Linuxem w Perlu ustawic szybkosc portu na
>28800 bodow? setserial czy stty pozwalaja na ustawienie tylko
>standardowych predkosci i 28800 nie przyjmuja... Poza tym potrzebowalbym
>konstukcji pozwalajacej na stworzenie waktu oczekujacego i odbierajacego
>przychodzace na port dane.
>
>Hi
>
>How to set comm port (serial, RS) speed to 28800 baud.
>'setserial' & 'stty' allow only to choose standard speeds, but no 28800.
>
>I'm using RedHat 7.0
You don't need to use 28800, you can use a high rate such as 38400 or
56000 or 11500. The 28800 is the rate at which your modem sends the
compressed data. I hope that helps.
--
Linux Home Automation Neil Cherry ncherry@home.net
http://members.home.net/ncherry (Text only)
http://meltingpot.fortunecity.com/lightsey/52 (Graphics)
http://linuxha.sourceforge.net/ (SourceForge)
------------------------------
Date: Mon, 19 Feb 2001 15:03:39 -0000
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: New posters to comp.lang.perl.misc
Message-Id: <t92debq2gvs9fb@corp.supernews.com>
Following is a summary of articles from new posters spanning a 7 day
period, beginning at 12 Feb 2001 15:02:23 GMT and ending at
19 Feb 2001 14:21:10 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^\s{0,3}(?:>|:|\S+>|\+\+)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" email address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Find the News-Scan distribution on the CPAN!
<URL:http://www.perl.com/CPAN/modules/by-module/News/>
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
- Copyright (c) 2001 Greg Bacon.
Verbatim copying and redistribution is permitted without royalty;
alteration is not permitted. Redistribution and/or use for any
commercial purpose is prohibited.
Totals
======
Posters: 136 (39.8% of all posters)
Articles: 240 (23.7% of all articles)
Volume generated: 440.1 kb (23.0% of total volume)
- headers: 187.0 kb (3,883 lines)
- bodies: 248.0 kb (7,974 lines)
- original: 184.4 kb (6,068 lines)
- signatures: 5.0 kb (127 lines)
Original Content Rating: 0.744
Averages
========
Posts per poster: 1.8
median: 1.0 post
mode: 1 post - 87 posters
s: 1.8 posts
Message size: 1877.9 bytes
- header: 797.7 bytes (16.2 lines)
- body: 1057.9 bytes (33.2 lines)
- original: 786.9 bytes (25.3 lines)
- signature: 21.2 bytes (0.5 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
12 26.2 ( 9.4/ 14.7/ 14.4) "Scott R. Godin" <dontspamthewebmaster@webdragon.net>
7 14.5 ( 4.4/ 10.0/ 2.4) "Montego" <perldomo@hotmail.com>
6 9.0 ( 5.1/ 3.9/ 2.6) Alexandra <lanaS55nospam@hotmail.com>
6 11.8 ( 3.9/ 7.9/ 5.3) "Copenhagen" <copenhagen@copenhagen.com>
5 8.6 ( 4.0/ 4.6/ 3.6) "Jeff Fletcher" <jeff_fletcher@pacbell.net>
5 13.1 ( 4.8/ 8.3/ 3.2) "Egon" <egon.vennik@wanadoonl>
5 6.4 ( 3.8/ 2.7/ 2.0) "Martijn Mulder" <soso@open.net>
5 6.6 ( 4.1/ 2.5/ 1.9) Paul <pmckenna@writeme.com>
4 7.8 ( 3.3/ 4.4/ 2.0) Jim Kroger <minorseventhSPAMBLOCK@earthlink.net>
4 6.9 ( 3.6/ 3.3/ 1.5) holger.marzen@sik-gmbh.de
These posters accounted for 5.8% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
31.5 ( 0.9/ 30.6/ 30.6) 1 Scott <sgregory@caci.com>
26.2 ( 9.4/ 14.7/ 14.4) 12 "Scott R. Godin" <dontspamthewebmaster@webdragon.net>
14.5 ( 4.4/ 10.0/ 2.4) 7 "Montego" <perldomo@hotmail.com>
13.1 ( 4.8/ 8.3/ 3.2) 5 "Egon" <egon.vennik@wanadoonl>
11.8 ( 3.9/ 7.9/ 5.3) 6 "Copenhagen" <copenhagen@copenhagen.com>
9.0 ( 5.1/ 3.9/ 2.6) 6 Alexandra <lanaS55nospam@hotmail.com>
8.7 ( 3.1/ 5.6/ 3.8) 4 hefe@in-time.se
8.6 ( 4.0/ 4.6/ 3.6) 5 "Jeff Fletcher" <jeff_fletcher@pacbell.net>
7.8 ( 3.3/ 4.4/ 2.0) 4 Jim Kroger <minorseventhSPAMBLOCK@earthlink.net>
7.0 ( 3.0/ 3.1/ 2.1) 3 "Bertilo Wennergren" <bertilow@chello.se>
These posters accounted for 7.2% of the total volume.
Top 10 Posters by OCR (minimum of three posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
1.000 ( 2.9 / 2.9) 3 tim leung <m_010@yahoo.com>
0.981 ( 14.4 / 14.7) 12 "Scott R. Godin" <dontspamthewebmaster@webdragon.net>
0.970 ( 1.5 / 1.5) 4 "DaveP" <DavePerkins@bigfoot.com>
0.897 ( 1.3 / 1.4) 3 Another Way <anotherway83@aol.com>
0.890 ( 2.4 / 2.7) 4 Falc2199 <falc2199@aol.comNOJUNK>
0.838 ( 1.0 / 1.2) 3 Todd Shoenfelt <tshoenfe@cisco.com>
0.782 ( 3.6 / 4.6) 5 "Jeff Fletcher" <jeff_fletcher@pacbell.net>
0.776 ( 1.9 / 2.5) 5 Paul <pmckenna@writeme.com>
0.772 ( 2.1 / 2.7) 3 "Brian McCann" <bmccann@naisp.net>
0.732 ( 2.3 / 3.1) 4 LXQ <lxq79@REMOVE.CAPITALS.hotmail.com>
Bottom 10 Posters by OCR (minimum of three posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.677 ( 2.1 / 3.1) 3 "Bertilo Wennergren" <bertilow@chello.se>
0.677 ( 2.6 / 3.9) 6 Alexandra <lanaS55nospam@hotmail.com>
0.676 ( 1.5 / 2.2) 3 "henroc" <henroc@mindspring.com>
0.669 ( 3.8 / 5.6) 4 hefe@in-time.se
0.496 ( 1.7 / 3.3) 3 ted <tlav1@mediaone.net>
0.459 ( 1.5 / 3.3) 4 holger.marzen@sik-gmbh.de
0.452 ( 2.0 / 4.4) 4 Jim Kroger <minorseventhSPAMBLOCK@earthlink.net>
0.447 ( 1.6 / 3.5) 3 "Joe Moore" <joemoore@att.net>
0.393 ( 3.2 / 8.3) 5 "Egon" <egon.vennik@wanadoonl>
0.239 ( 2.4 / 10.0) 7 "Montego" <perldomo@hotmail.com>
22 posters (16%) had at least three posts.
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
18 comp.lang.perl
18 comp.lang.perl.modules
15 alt.perl
8 comp.lang.tcl
7 comp.lang.python
5 comp.lang.lisp
4 alt.comp.perlcgi.freelance
3 de.comp.lang.perl.cgi
2 alt.perl.sockets
1 comp.os.linux.misc
Top 10 Crossposters
===================
Articles Address
-------- -------
6 "Egon" <egon.vennik@wanadoonl>
4 Mindfield <mindfield@badgers.emulationnet.com>
3 Rainer Klier <Rainer.Klier@erl.sbs.de>
3 "Steve D. Perkins" <stevedperkins@NOSPAM.hotmail.com>
3 Sheila King <sheila@spamcop.net>
2 Hartmann Schaffer <hs@paradise.nirvananet>
2 "Mark Bakker" <mark@mediamedia.nl>
1 "Ian Shaughnessy" <conraduno@binxdsign.com>
1 Ilmari Karonen <usenet11372@itz.pp.sci.fi>
1 rhoge@nmr.mgh.harvard.edu
------------------------------
Date: Mon, 19 Feb 2001 14:35:55 +0000
From: Tom Scheper <tom@power.net.uk>
Subject: Re: newbie regex linebreaks problem
Message-Id: <gmb29tofhsrjsvcgt3vh238lfajokqoe17@4ax.com>
On Mon, 19 Feb 2001 07:28:31 -0500, Jason Goodrow <"goodrow"@opencity.
com> shed a beam of light on us:
>Hey Newsgroup -
>
>Sorry if this should be in comp .... cgi but it seems more perl (and
>they
>respond less to newbies) - apologies also if this is sitting in front of
>me in a FAQ
>(my eyes have crossed)
>
>Feeding <textarea> field from form into .cgi to update html.
>Line breaks are killing me.
>On submit browser sends -
>
>the.cgi?input=hello%0D%0Aworld
>(POST doesn't help)
>
>I've tried s/%0D%0A/<br>/ and lots of variations.
>
>viewing output in vi reveals a ^M which I can't get rid of or match.
>Camel books says "To match a caret, don't put it first."
>I pulled
>$mess =~ s/([^\w\s])/<br>/ge;
>out of a FAQ but still can't get rid of ^M
>I'm lost
>(thanks for any help)
>
>newbie@opencity.com
>
You can do one of two things here:
1)
$mess=~s/^M/<br>/gs;
To make sure you get the correct ^M in there, type CTRL-V and then
CTRL-M
2)
$mess=~s/\r\n/<br>/gs;
Make sure you have the s on the end of the line, otherwise it will
never match an eol character on a single line.
-=Cornelis
------------------------------
Date: 19 Feb 2001 14:02:03 GMT
From: emelin@my-deja.com
Subject: passing a variable with a checkbox?
Message-Id: <96r90r$tdt$1@news.netmar.com>
Hi,
I'm trying to do something in perl/cgi that lets you search through a csv
stocklist. I want to send the search result to another cgi, and I've tried to
do this with a checkbox with the value $partnr. The problem is that the value
gets sent as "$partnr" (literally), and not the current value of the
variable.
I am using CGI qw(import_names); to fetch the info.
How can I do this?
thankful for help,
(i haven't found anything in the docs that makes sense to me)
emelin
Part of code from search cgi below.
open (STOCK, "stock.csv") or die "The database could not be accessed, please
try again later.\n";
@stock = <STOCK>;
foreach $item (@stock) {
if ($item =~ /$FORM::part/ig) {
($partnr,$quantity,$manufacturer,$datecode,$package) = split(/,/, $item);
if ($partnr =~ /$FORM::part/ig) {
print "<td><font face=verdana size=1>$partnr</td>";
print "<td><font face=verdana size=1>$quantity</td>";
print "<td><font face=verdana size=1>$manufacturer</td>";
print "<td><font face=verdana size=1>$datecode</td>";
print "<td><font face=verdana size=1>$package</td>";
print '<td><form action="rfq.cgi" method="post"><input type="checkbox"
name="rfq" value="$partnr"><input type="submit"
######### $partnr is sent as "$partnr", not the value of the variable!
value="RFQ"></form></td>';
print "<tr>";
}
}
}
----- Posted via NewsOne.Net: Free (anonymous) Usenet News via the Web -----
http://newsone.net/ -- Free reading and anonymous posting to 60,000+ groups
NewsOne.Net prohibits users from posting spam. If this or other posts
made through NewsOne.Net violate posting guidelines, email abuse@newsone.net
------------------------------
Date: Mon, 19 Feb 2001 09:43:39 -0500
From: Brad Baxter <bmb@ginger.libs.uga.edu>
Subject: Re: passing a variable with a checkbox?
Message-Id: <Pine.A41.4.21.0102190938280.16492-100000@ginger.libs.uga.edu>
On 19 Feb 2001 emelin@my-deja.com wrote:
> print '<td><form action="rfq.cgi" method="post"><input type="checkbox"
> name="rfq" value="$partnr"><input type="submit"
>
> ######### $partnr is sent as "$partnr", not the value of the variable!
>
> value="RFQ"></form></td>';
Your parameter to print is in single quotes. You need double quotes for
variable interpolation. You have about three typical alternatives. I
suggest using here doc syntax.
Brad
------------------------------
Date: Mon, 19 Feb 2001 10:40:52 +0500
From: "john kelly" <jtkelly@usadatanet.net>
Subject: perl DBI cron problem
Message-Id: <3a913eb9_2@news5.newsfeeds.com>
Can anyone give any reason to this.
We have been running several perl programs on a HP10.x system using perl
5 with ORACLE DBI without any problems. Theses programs have been
connecting to a 7.3.4 DB fine. We just migrated one of our databases to
8.1.6. Here's the problem.. The perl programs runs fine interactively,
but when we run it from CRON we get a core file during the connect.
Changing the tnsnames alias to point back to a 7.3.4 and everything works
fine (interactively and batch(CRON)).
I'm going to upgrade everything (SQLNET, PERL, and DBI modules) but I'm
still confused as to why everything runs fine interactively, fine for
7.3.4 databases by CRON and core's for 8.1.6 by CRON only.
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com - The #1 Newsgroup Service in the World!
-----== Over 80,000 Newsgroups - 16 Different Servers! =-----
------------------------------
Date: Mon, 19 Feb 2001 15:01:45 GMT
From: AvA <a.v.a@home.nl>
Subject: perl irc channel
Message-Id: <3A90FF2A.E34D71EE@home.nl>
there is a young perl channel on irc.
irc.xchat.org #perl (port 6667).
for everyone who likes to talk about perl..or other things.
------------------------------
Date: 19 Feb 2001 07:52:44 -0800
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: perl irc channel
Message-Id: <m1y9v2vfeb.fsf@halfdome.holdit.com>
>>>>> "AvA" == AvA <a.v.a@home.nl> writes:
AvA> there is a young perl channel on irc.
AvA> irc.xchat.org #perl (port 6667).
AvA> for everyone who likes to talk about perl..or other things.
There's pretty much a #perl channel on nearly every IRC network.
Why is this one worth mentioning?
:-)
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Mon, 19 Feb 2001 15:52:16 GMT
From: AvA <a.v.a@home.nl>
Subject: Re: perl irc channel
Message-Id: <3A910B02.7ED78732@home.nl>
because we intend to be a very user and newbie friendly channel,
something one cant say about alot of other perl cahnnels randall.
comae and visit us one day randall and do a guest performance, we would
appreciate it
"Randal L. Schwartz" wrote:
> >>>>> "AvA" == AvA <a.v.a@home.nl> writes:
>
> AvA> there is a young perl channel on irc.
> AvA> irc.xchat.org #perl (port 6667).
>
> AvA> for everyone who likes to talk about perl..or other things.
>
> There's pretty much a #perl channel on nearly every IRC network.
> Why is this one worth mentioning?
>
> :-)
>
> --
> Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
> <merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
> Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
> See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Mon, 19 Feb 2001 15:54:58 GMT
From: AvA <a.v.a@home.nl>
Subject: Re: perl irc channel
Message-Id: <3A910BA3.4360B331@home.nl>
my grammar was poor on that last msg..aswell i typed ur name wrong randal..sorry
(tired)
AvA wrote:
> because we intend to be a very user and newbie friendly channel,
> something one cant say about alot of other perl cahnnels randall.
> comae and visit us one day randall and do a guest performance, we would
> appreciate it
>
> "Randal L. Schwartz" wrote:
>
> > >>>>> "AvA" == AvA <a.v.a@home.nl> writes:
> >
> > AvA> there is a young perl channel on irc.
> > AvA> irc.xchat.org #perl (port 6667).
> >
> > AvA> for everyone who likes to talk about perl..or other things.
> >
> > There's pretty much a #perl channel on nearly every IRC network.
> > Why is this one worth mentioning?
> >
> > :-)
> >
> > --
> > Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
> > <merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
> > Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
> > See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Mon, 19 Feb 2001 14:52:12 GMT
From: "Waarddebon" <Waarddebon@chello.nl>
Subject: simple question
Message-Id: <wqak6.1514120$%C1.19200309@Flipper>
How come this doesn't work out ?
In my html file I have:
<form action="http://oostwijk.hypermart.net/cgi-bin/rangeit.pl?mm&eu"
method="post">
These 2 parameters I want to read out with:
$ARGV[0] =~ s/\W//g;
$ARGV[1] =~ s/\D//g;
But only the $ARGV[0] parameter contains a value namely mm.
Why doesn't the $ARGV[1] get the second parameter eu ???
Thanks in advance
------------------------------
Date: 19 Feb 2001 08:56:24 -0600
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: simple question
Message-Id: <871ysu67s7.fsf@limey.hpcc.uh.edu>
>> On Mon, 19 Feb 2001 14:52:12 GMT,
>> "Waarddebon" <Waarddebon@chello.nl> said:
> How come this doesn't work out ? In my html file I
> have: <form
> action="http://oostwijk.hypermart.net/cgi-bin/rangeit.pl?mm&eu"
> method="post">
> These 2 parameters I want to read out with: $ARGV[0] =~
> s/\W//g; $ARGV[1] =~ s/\D//g; But only the $ARGV[0]
> parameter contains a value namely mm. Why doesn't the
> $ARGV[1] get the second parameter eu ???
CGI doesn't pass parameters through the command-line:
perldoc CGI
I suggest continuing this thread in
comp.infosystems.www.authoring.cgi because you really have
CGI questions (fups set) that are not perl-specific.
hth
t
--
The avalanche has already started.
It is too late for the pebbles to vote.
------------------------------
Date: Mon, 19 Feb 2001 15:03:35 -0000
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <t92de76ocgb5fa@corp.supernews.com>
Following is a summary of articles spanning a 7 day period,
beginning at 12 Feb 2001 15:02:23 GMT and ending at
19 Feb 2001 14:21:10 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^\s{0,3}(?:>|:|\S+>|\+\+)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" email address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Find the News-Scan distribution on the CPAN!
<URL:http://www.perl.com/CPAN/modules/by-module/News/>
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
- Copyright (c) 2001 Greg Bacon.
Verbatim copying and redistribution is permitted without royalty;
alteration is not permitted. Redistribution and/or use for any
commercial purpose is prohibited.
Excluded Posters
================
perlfaq-suggestions\@(?:.*\.)?perl\.com
faq\@(?:.*\.)?denver\.pm\.org
Totals
======
Posters: 342
Articles: 1013 (384 with cutlined signatures)
Threads: 290
Volume generated: 1914.2 kb
- headers: 816.0 kb (16,312 lines)
- bodies: 1042.4 kb (34,691 lines)
- original: 669.3 kb (24,098 lines)
- signatures: 54.9 kb (1,182 lines)
Original Content Rating: 0.642
Averages
========
Posts per poster: 3.0
median: 2.0 posts
mode: 1 post - 166 posters
s: 4.7 posts
Posts per thread: 3.5
median: 3.0 posts
mode: 1 post - 69 threads
s: 3.1 posts
Message size: 1935.0 bytes
- header: 824.8 bytes (16.1 lines)
- body: 1053.7 bytes (34.2 lines)
- original: 676.6 bytes (23.8 lines)
- signature: 55.5 bytes (1.2 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
34 68.0 ( 25.1/ 42.9/ 20.8) Anno Siegel <anno4000@lublin.zrz.tu-berlin.de>
33 60.0 ( 28.3/ 31.4/ 20.0) "Godzilla!" <godzilla@stomp.stomp.tokyo>
33 65.3 ( 30.8/ 27.9/ 24.7) abigail@foad.org
22 50.9 ( 17.9/ 28.0/ 18.5) Joe Schaefer <joe+usenet@sunstarsys.com>
21 61.7 ( 12.4/ 46.4/ 31.7) Chris Stith <mischief@velma.motion.net>
21 41.5 ( 18.4/ 16.9/ 8.5) Uri Guttman <uri@sysarch.com>
18 35.5 ( 17.0/ 18.2/ 8.2) Bob Walton <bwalton@rochester.rr.com>
17 26.6 ( 14.6/ 11.9/ 7.2) Bart Lateur <bart.lateur@skynet.be>
17 25.1 ( 14.3/ 9.4/ 6.5) Jonathan Feinberg <jdf@pobox.com>
15 23.5 ( 11.8/ 9.6/ 5.9) Gwyn Judd <tjla@guvfybir.qlaqaf.bet>
These posters accounted for 22.8% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
68.0 ( 25.1/ 42.9/ 20.8) 34 Anno Siegel <anno4000@lublin.zrz.tu-berlin.de>
65.3 ( 30.8/ 27.9/ 24.7) 33 abigail@foad.org
61.7 ( 12.4/ 46.4/ 31.7) 21 Chris Stith <mischief@velma.motion.net>
60.0 ( 28.3/ 31.4/ 20.0) 33 "Godzilla!" <godzilla@stomp.stomp.tokyo>
50.9 ( 17.9/ 28.0/ 18.5) 22 Joe Schaefer <joe+usenet@sunstarsys.com>
41.5 ( 18.4/ 16.9/ 8.5) 21 Uri Guttman <uri@sysarch.com>
35.5 ( 17.0/ 18.2/ 8.2) 18 Bob Walton <bwalton@rochester.rr.com>
31.5 ( 0.9/ 30.6/ 30.6) 1 Scott <sgregory@caci.com>
27.7 ( 9.8/ 17.3/ 7.3) 13 Chris Fedde <cfedde@fedde.littleton.co.us>
27.4 ( 14.4/ 13.0/ 7.8) 14 "Frank Miller" <no@email.com>
These posters accounted for 24.5% of the total volume.
Top 10 Posters by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.981 ( 14.4 / 14.7) 12 "Scott R. Godin" <dontspamthewebmaster@webdragon.net>
0.884 ( 24.7 / 27.9) 33 abigail@foad.org
0.802 ( 6.1 / 7.6) 6 "Jody Fedor" <Jodyman@usa.net>
0.784 ( 6.5 / 8.3) 5 Kira <callgirl@la.znet.com>
0.782 ( 3.6 / 4.6) 5 "Jeff Fletcher" <jeff_fletcher@pacbell.net>
0.776 ( 1.9 / 2.5) 5 Paul <pmckenna@writeme.com>
0.740 ( 6.7 / 9.1) 5 Clinton A. Pierce <clintp@geeksalad.org>
0.731 ( 2.0 / 2.7) 5 "Martijn Mulder" <soso@open.net>
0.714 ( 4.2 / 5.8) 5 Terrence Monroe Brannon <terrence.brannon@oracle.com>
0.704 ( 7.9 / 11.2) 6 "Kurt Stephens" <kstep@pepsdesign.com>
Bottom 10 Posters by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.438 ( 3.6 / 8.3) 7 efflandt@xnet.com
0.421 ( 7.3 / 17.3) 13 Chris Fedde <cfedde@fedde.littleton.co.us>
0.412 ( 1.6 / 3.9) 6 blah@blah.blah.invalid
0.404 ( 1.9 / 4.7) 8 Tony Curtis <tony_curtis32@yahoo.com>
0.393 ( 3.2 / 8.3) 5 "Egon" <egon.vennik@wanadoonl>
0.329 ( 5.0 / 15.2) 8 "Perl" <c_clarkson@hotmail.com>
0.327 ( 0.9 / 2.7) 5 Todd Anderson <todd@mrnoitall.com>
0.272 ( 2.6 / 9.5) 7 "nowayandnohow" <nowayandnohow@hotmail.com>
0.239 ( 2.4 / 10.0) 7 "Montego" <perldomo@hotmail.com>
0.156 ( 0.5 / 2.9) 5 "John W. Krahn" <krahnj@acm.org>
51 posters (14%) had at least five posts.
Top 10 Threads by Number of Posts
=================================
Posts Subject
----- -------
27 striping HTML
21 regex experts
15 Why can't I grab this URL?
15 Invisible code?
13 Replacing single-letter words doesn't work
13 (OFF TOPIC) Re: This is driving me nuts and I need a guru
12 three-part form submission using CGI.pm
11 FAQ 4.24: How do I reformat a paragraph?
11 Multi-dimensioned arrays
10 Hashes of Arrays
These threads accounted for 14.6% of all articles.
Top 10 Threads by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Subject
-------------------------- ----- -------
51.2 ( 24.5/ 24.6/ 15.9) 27 striping HTML
34.9 ( 16.3/ 17.4/ 10.1) 13 (OFF TOPIC) Re: This is driving me nuts and I need a guru
33.1 ( 17.0/ 14.6/ 8.2) 21 regex experts
31.5 ( 0.9/ 30.6/ 30.6) 1 DBD::Oracle Unresolved Symbol error with make test on HPUX 10.20
30.7 ( 12.5/ 16.8/ 7.2) 15 Invisible code?
27.6 ( 4.7/ 22.1/ 15.6) 6 the best solution?
25.4 ( 11.2/ 13.4/ 7.1) 15 Why can't I grab this URL?
25.0 ( 11.7/ 11.5/ 6.6) 13 Replacing single-letter words doesn't work
24.4 ( 7.4/ 16.3/ 10.1) 10 How to scan spaces from a string of characters?
23.6 ( 10.1/ 12.7/ 9.3) 12 three-part form submission using CGI.pm
These threads accounted for 16.1% of the total volume.
Top 10 Threads by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.837 ( 9.6/ 11.4) 9 How bad is that Jeopardy post?
0.786 ( 6.9/ 8.8) 11 Multi-dimensioned arrays
0.754 ( 1.6/ 2.1) 7 comp.infosystems.www.authoring.cgi
0.748 ( 1.4/ 1.8) 5 Limit ?
0.737 ( 9.3/ 12.7) 12 three-part form submission using CGI.pm
0.737 ( 3.0/ 4.1) 5 localtime -> reverse -> localtime
0.727 ( 4.3/ 6.0) 7 Strings and pointers in Perl?
0.714 ( 5.1/ 7.1) 10 Hashes of Arrays
0.714 ( 4.3/ 6.0) 6 Proper sorting - alphanumeric values?
0.705 ( 15.6/ 22.1) 6 the best solution?
Bottom 10 Threads by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.480 ( 3.9 / 8.0) 6 Net::Ping problems
0.479 ( 3.2 / 6.7) 7 Help Running Perl Scripts from a web-page
0.479 ( 1.6 / 3.4) 7 string math
0.477 ( 1.2 / 2.6) 5 Problem with browser timeout
0.475 ( 6.8 / 14.2) 10 Help with script
0.459 ( 0.5 / 1.0) 5 calling clock !
0.443 ( 1.8 / 4.1) 7 Perl 5 and graphics
0.441 ( 1.5 / 3.3) 5 Linda, this is cool!
0.425 ( 7.2 / 16.8) 15 Invisible code?
0.356 ( 1.8 / 5.0) 6 Screen with - screen height
70 threads (24%) had at least five posts.
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
18 comp.lang.perl
18 comp.lang.perl.modules
15 alt.perl
8 comp.lang.tcl
7 comp.lang.python
5 comp.lang.lisp
4 alt.comp.perlcgi.freelance
3 de.comp.lang.perl.cgi
2 alt.perl.sockets
1 comp.os.linux.misc
Top 10 Crossposters
===================
Articles Address
-------- -------
11 "Jeremia d." <jdb@ga.prestige.net>
6 "Egon" <egon.vennik@wanadoonl>
4 Robert Rothenburg <wlkngowl@unix.asb.com>
4 Chris Stith <mischief@velma.motion.net>
4 Mindfield <mindfield@badgers.emulationnet.com>
3 "Frank Miller" <no@email.com>
3 Eric Edlin <eedlin@cadence.com>
3 "Dave Brondsema" <brondsem@my-deja.com>
3 Tom Phoenix <rootbeer&pfaq*finding*@redcat.com>
3 "Steve D. Perkins" <stevedperkins@NOSPAM.hotmail.com>
------------------------------
Date: 19 Feb 2001 14:32:38 GMT
From: "Scott R. Godin" <dontspamthewebmaster@webdragon.net>
Subject: Re: striping HTML
Message-Id: <96raq6$2ph$2@216.155.32.167>
In article <KgCj6.437223$U46.12848308@news1.sttls1.wa.home.com>, "Frank
Miller" <no@email.com> wrote:
| It's really sad that I come onto
| this group to try and get help and am just flamed by people like you.
You weren't flamed. If you continue top-posting you'll eventually either
get flamed (at which point you will be enlightened, and will then know
the difference.), or you will get killfiled by whomever and will thus
unable to benefit from that person's experience.
This newsgroup prefers to adhere to certain Usenet posting conventions,
being a technical group. If you can't handle that, don't post.
Jumping to the end before starting to reply is usually a single
keystroke. Editing and trimming your post to NOT include the entire post
you are replying to requires some thought-process and judicious use of
the <DELTETE> key.
Neither of these things is a difficult as programming in Perl, but the
way a few people whinge about it, you'd think we'd asked you to climb
Mount Everest with your hands and feet tied together.
It's a long-standing Usenet Posting convention that this group prefers,
and which does not convey oupon the poster anything more difficult than
a few keystrokes, and some forethought. If you don't have those (: or
can't be arsed, then don't bother posting. We've educated you; whether
you use the knowledge or continue in your head-blindedness is up to you.
--
unmunge e-mail here:
#!perl -w
print map {chr(ord($_)-3)} split //, "zhepdvwhuCzhegudjrq1qhw";
# ( damn spammers. *shakes fist* take a hint. =:P )
------------------------------
Date: 19 Feb 2001 14:40:41 GMT
From: "Scott R. Godin" <dontspamthewebmaster@webdragon.net>
Subject: Re: striping HTML
Message-Id: <96rb99$2ph$3@216.155.32.167>
In article <3A8EBFCC.5AABD7E5@mrnoitall.com>, Todd Anderson
<todd@mrnoitall.com> wrote:
| Frank Miller wrote:
|
| > I have a website where users can post text replies to questions.
| > I don't want them to be able to enter HTML in the messages,
| > because that messes up my pages when I print the replies.
| >
| > Is there a good perl sub that will strip any HTML tags they put in
| > the message? It would be nice if they could do simple ones like
| > <br>, <b> and other text formatting. I don't want pictures,
| > tables and font changes.
| >
| > Frank
|
| $val =~ s/<([^>]|\n)*>//g;
in what may be a final attempt to educate this person if his posting
format doesn't change (not you, Frank)
use CGI qw(:standard);
print escapeHTML($val);
this "html-izes" the HTML that people attempt to put in form fields. :-)
makes it look funny, but if you warn them ahead of time that it will
happen, and give them a chance to 'validate their response, or edit it
further' they will generally remove it when they see what happens.
--
send mail to webmaster (at) webdragon (dot) net instead of the above address.
this is to prevent spamming. e-mail reply-to's have been altered
to prevent scan software from extracting my address for the purpose
of spamming me, which I hate with a passion bordering on obsession.
------------------------------
Date: 19 Feb 2001 15:12:19 GMT
From: "Scott R. Godin" <dontspamthewebmaster@webdragon.net>
Subject: Re: striping HTML
Message-Id: <96rd4j$2ph$4@216.155.32.167>
In article <96rb99$2ph$3@216.155.32.167>, "Scott R. Godin"
<dontspamthewebmaster@webdragon.net> wrote:
| in what may be a final attempt to educate this person if his posting
| format doesn't change (not you, Frank)
Gah, I definitely have not had enough coffee.. I meant to say "not you,
Todd" as Frank was the original offender, but this point as now moot, as
I see from another post that Frank has seen the light to sticking with
the group's standards for certain things. ;) (Thanks, Frank :)
meanwhile, I'll be back after the coffee finishes *PeRk*ing.
--
unmunge e-mail here:
#!perl -w
print map {chr(ord($_)-3)} split //, "zhepdvwhuCzhegudjrq1qhw";
# ( damn spammers. *shakes fist* take a hint. =:P )
------------------------------
Date: 19 Feb 2001 14:21:16 GMT
From: "Scott R. Godin" <dontspamthewebmaster@webdragon.net>
Subject: Re: three-part form submission using CGI.pm
Message-Id: <96ra4s$2ph$1@216.155.32.167>
In article
<Pine.A41.4.21.0102170955140.17264-100000@ginger.libs.uga.edu>, Brad
Baxter <bmb@ginger.libs.uga.edu> wrote:
| On 17 Feb 2001, Scott R. Godin wrote:
| > I could probably reduce the regexes to:
| >
| > $fixee =~ s|\n\n|<br>|g;
| > $fixee =~ s|\r\r|<br>|g;
| > $fixee =~ s/\n|\r/<br>/g; # just in case
| Scott,
|
| I suspect I'm missing a key point, but what about:
|
| $fixee =~ s/(?:[\r\n]{2})+/<br><br>/g;
I haven't started experimenting with these forms yet -- does this work
under 5.004? And, am I assuming correctly, that this would obviate the
need for the final conversion, which you snipped from your response?
| $fixee =~ s/[\r\n]/<br>/g;
but yes, I could have done it this way.
--
send mail to webmaster (at) webdragon (dot) net instead of the above address.
this is to prevent spamming. e-mail reply-to's have been altered
to prevent scan software from extracting my address for the purpose
of spamming me, which I hate with a passion bordering on obsession.
------------------------------
Date: Mon, 19 Feb 2001 09:50:36 -0500
From: Brad Baxter <bmb@ginger.libs.uga.edu>
Subject: Re: three-part form submission using CGI.pm
Message-Id: <Pine.A41.4.21.0102190944480.16492-100000@ginger.libs.uga.edu>
On 19 Feb 2001, Scott R. Godin wrote:
> In article
> <Pine.A41.4.21.0102170955140.17264-100000@ginger.libs.uga.edu>, Brad
> Baxter <bmb@ginger.libs.uga.edu> wrote:
>
> | On 17 Feb 2001, Scott R. Godin wrote:
> | > I could probably reduce the regexes to:
> | >
> | > $fixee =~ s|\n\n|<br>|g;
> | > $fixee =~ s|\r\r|<br>|g;
> | > $fixee =~ s/\n|\r/<br>/g; # just in case
> | Scott,
> |
> | I suspect I'm missing a key point, but what about:
> |
> | $fixee =~ s/(?:[\r\n]{2})+/<br><br>/g;
>
> I haven't started experimenting with these forms yet -- does this work
> under 5.004? And, am I assuming correctly, that this would obviate the
> need for the final conversion, which you snipped from your response?
Um, yes ... I think. You'll have to try it. But then, as a previous note
pointed out, this may not be the real issue.
Brad
------------------------------
Date: 19 Feb 2001 15:19:38 GMT
From: "Scott R. Godin" <dontspamthewebmaster@webdragon.net>
Subject: Re: three-part form submission using CGI.pm
Message-Id: <96rdia$2ph$5@216.155.32.167>
In article
<Pine.A41.4.21.0102190944480.16492-100000@ginger.libs.uga.edu>, Brad
Baxter <bmb@ginger.libs.uga.edu> wrote:
| > | $fixee =~ s/(?:[\r\n]{2})+/<br><br>/g;
| >
| > I haven't started experimenting with these forms yet -- does this work
| > under 5.004? And, am I assuming correctly, that this would obviate the
| > need for the final conversion, which you snipped from your response?
|
| Um, yes ... I think. You'll have to try it. But then, as a
| previous note pointed out, this may not be the real issue.
ok, I'll try it on some short stuff.
as it turns out, this *was* in fact the issue, and not requiring the
other things that the respondent to which you refer was talking about.
It's the double-whammy of using a three-step single CGI script. My
biggest problem was not completely understanding what was happening to
the resultant output, which I now do (a return in the textarea field was
being converted into two somewhere during processing by CGI.pm, but via
which when converted BACK just prior to output, somehow
mysteriously becomes two \n's or two \r's ), and had coded those regexes
to catch. If your suggestions are more efficient (and can work for me
under 5.004), I believe I owe you some thanks. :)
--
unmunge e-mail here:
#!perl -w
print map {chr(ord($_)-3)} split //, "zhepdvwhuCzhegudjrq1qhw";
# ( damn spammers. *shakes fist* take a hint. =:P )
------------------------------
Date: Mon, 19 Feb 2001 14:21:10 -0000
From: "Tom Perkin" <tom_perkin@nospamplease.hotmail.com>
Subject: Re: Wanted: Image Magic for dummies
Message-Id: <96r9vq$qpi$1@pegasus.csx.cam.ac.uk>
Hi,
I have never installed imagemagick (or perl for that matter) on win32, so
I am afraid that I can't help you with that.
As for documentation:
1. The imagemagick site points to http://www.oreilly.com/catalog/prowg/ if
you want a book. Given that it's O'Reilly it's probably excellent, though
I have not read it myself.
2. The perl interface to the libraries is called perlmagick. See
http://www.imagemagick.org/www/perl.html for details. You might need to
get hold of it from CPAN.
3. The manual is probably available as a .pdf on
ftp://ftp.simplesystems.org
I reccomend that you have a look at that first, though it isn't that
helpful.
> I develop HTA applications with PerlScript
Incidentally, what's an HTA application?
> I only want to install this and to know how to
> open, resize, cut from x,y to x,y, save picture
> nothing more.
These are dealt with in the manual.
Good Luck,
Tom
--
Tom Perkin > Pembroke College > tom_perkin@NOSPAMPLEASEhotmail.com
"Freedom is the by-product of economic surplus" - Aneurin Bevan
------------------------------
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 V10 Issue 315
**************************************
