[26005] in Perl-Users-Digest
Perl-Users Digest, Issue: 8223 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Jul 3 11:05:40 2005
Date: Sun, 3 Jul 2005 08:05:06 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sun, 3 Jul 2005 Volume: 10 Number: 8223
Today's topics:
Re: <%@ language=PerlScript%> 500 err <ceo@nospam.on.net>
Re: ActiveState license: I can't distribute perl with m <tadmc@augustmail.com>
Re: ActiveState license: I can't distribute perl with m <andy@andyh.co.uk>
Re: ActiveState license: I can't distribute perl with m <nomail@sorry.com>
Re: getting NewsGroup articles, <joe@inwap.com>
Re: How do I implement open(FOO, "foo |") with fork()? <thepoet_nospam@arcor.de>
Re: validating Xml in perl <mirod@mirod.org>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sun, 03 Jul 2005 05:07:53 GMT
From: ChrisO <ceo@nospam.on.net>
Subject: Re: <%@ language=PerlScript%> 500 err
Message-Id: <JoKxe.2367$4m3.2359@newssvr19.news.prodigy.com>
Wayne B wrote:
> ActiveState Perl on XP IIS and iis asp.dll using localhost with .asp doc
> <%@ language=PerlScript%> produces 500 err <script
> language=PerlScript></script> works fine. All other syntax works fine.
<script language="PerlScript"></script> would be client side unless you
specified runat="Server". If that's the case, then maybe you don't have
PerlScript installed as you think you do. You get no error on the
<script> tag because it's client side, and the server side tag <%@
Language=PerlScript %> blows up...? Could be?
Also, you can turn on more information in your logs through the InetMgr
IIS admin control panel to see exactly why you are failing with a 500
error. Generally, 500 errors are pretty specific in the IIS logs with
the proper information enabled in your IIS config.
Did you try to remove and reinstall AS Perl to make sure you are clean?
> Checked FAQ, Docs and searches. All I could find was Permissions set. I
> don't think that is the issue. Also apache server shows html but no server
> side results.What's up?
I don't think Apache runs the IIS ActiveX server engines. Only IIS.
That could be what's up.
-ceo
------------------------------
Date: Sat, 2 Jul 2005 17:21:39 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: ActiveState license: I can't distribute perl with my Windows application?
Message-Id: <slrndce4ri.37q.tadmc@magna.augustmail.com>
Arvin Portlock <nomail@sorry.com> wrote:
> As my audience uses Windows and they have widely varying
> technical skills, I really like to package everything
> up into a single setup script so all they have to do is
> install it and run it. I include a very minimal version
> of ActiveState's perl,
> So I had another look at the ActiveState license, and sure
> enough, it looks like I'm in violation:
> Is my only other
> alternative to use perl2exe?
No, there is another alternative.
ActiveState does not own Perl, they just offer an
already-compiled-for-you Perl.
Decline their offer, and you can compile it for yourself on Windows,
but I don't know how difficult that might be...
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Sun, 03 Jul 2005 12:28:19 +0100
From: Andy Hassall <andy@andyh.co.uk>
Subject: Re: ActiveState license: I can't distribute perl with my Windows application?
Message-Id: <0ihfc1d8g726nb211f951fe9rol0o5ts94@4ax.com>
On Sat, 2 Jul 2005 17:21:39 -0500, Tad McClellan <tadmc@augustmail.com> wrote:
>ActiveState does not own Perl, they just offer an
>already-compiled-for-you Perl.
>
>Decline their offer, and you can compile it for yourself on Windows,
>but I don't know how difficult that might be...
Last time I tried it, I was pleasantly suprised by how easy it was.
Just set the installation directory in win32/Makefile, run "nmake", "nmake
test" and "nmake install" from that directory, and it's done.
README.win32 has instructions for free compilers including the free cutdown MS
compiler, which look more complicated but doable.
--
Andy Hassall / <andy@andyh.co.uk> / <http://www.andyh.co.uk>
<http://www.andyhsoftware.co.uk/space> Space: disk usage analysis tool
------------------------------
Date: Sat, 02 Jul 2005 15:20:42 -0700
From: Arvin Portlock <nomail@sorry.com>
Subject: Re: ActiveState license: I can't distribute perl with my Windows application?
Message-Id: <da73vs$1s5h$1@agate.berkeley.edu>
Randy Kobes wrote:
> Arvin Portlock wrote:
>
> > Brian Wakem wrote:
> >
> >> >So I had another look at the ActiveState license, and sure
> >> >enough, it looks like I'm in violation:
> > I noticed IndigoPerl. Must have slipped by me the last time I was
> > at their website. IndigoPerl *can* be distributed without written
> > agreement, as long as the licenses, etc., are intact.
>
> The current license for IndigoPerl:
> http://www.indigostar.com/indigoperl.htm#License
> might not, in some circumstances, be as simple as that:
>
> 3. You may make and give away verbatim copies of IndigoPerl
> for personal use, or for use within your organization and
> to others outside your organization, provided that you
> duplicate all of the original copyright notices and
> associated disclaimers.
>
> 4. You may not distribute copies of IndigoPerl or components
> derived from IndigoPerl to others outside your organization
> where IndigoPerl is bundled with a commercial product without
> specific prior written permission from IndigoSTAR Software
> except as noted below.
>
> 5. You may distribute copies of IndigoPerl or components
> derived from IndigoPerl to others outside your organization
> where IndigoPerl is bundled with a commercial product as
> long as total sales of the bundled product do not exceed
> $1000 US per year.
Looks like the only sticky point for me is that part about
"verbatim." All of my stuff is non-commercial, distributed
free of charge. Even my windows installation program, Inno
Setup, is free. And including the copyright notices and dis-
claimers is a no-brainer. With a minimal install I can get a
setup file under 2 Mb, not small enough to fit on a floppy,
but dial-up friendly all the same. The Indigo Perl distri-
bution is huge. It includes Apache and mod_perl (very nice!)
and is much bigger than the ActiveState package. If I can't
pare it down that would be a shame. I wonder if "verbatim"
means I can't include non-standard Modules? Nah, that can't
be. Modules don't *have* to go in the perl tree.
Thanks for pointing this out. I thought I was out of the woods.
I've already gone around and removed the scripts that had
packaged ActiveState, I'd hate to have to do it again. I'll
have a close look at the IndigoPerl license, perhaps shoot
them an email asking for clarification/permission. Apache
seems to also make Win32 versions of perl available, though
I haven't had a close look at those yet.
Arvin
------------------------------
Date: Sun, 03 Jul 2005 01:09:00 -0700
From: Joe Smith <joe@inwap.com>
Subject: Re: getting NewsGroup articles,
Message-Id: <BuidnUldaLGDAFrfRVn-vQ@comcast.com>
George wrote:
> Hi All
> I did manage to get articles from NG using modules News::NNTPClient,
> but how to get pictures attached to article , when I try print the
> acrticle I get headers plus all text info , I also get huge gibbrish
> text probably content of picture in txt, so how to convert into real
> picture
AUB (Assemble Usenet Binaries) is written in Perl.
http://yukidoke.org/~mako/projects/aub/
-Joe
------------------------------
Date: Sun, 03 Jul 2005 12:34:08 +0200
From: Christian Winter <thepoet_nospam@arcor.de>
Subject: Re: How do I implement open(FOO, "foo |") with fork()?
Message-Id: <42c7bf11$0$22772$9b4e6d93@newsread2.arcor-online.net>
Anno Siegel wrote:
> Christian Winter <thepoet_nospam@arcor.de> wrote in comp.lang.perl.misc:
>
>>Anno Siegel wrote:
>>
>>> pipe R, W;
>>> defined( my $pid = fork) or die "fork: $!";
>>> if ( $pid ) {
>>> close W;
>>> print while <R>;
>>> } else {
>>> close R;
>>
>>You accidentially left out the vital
>> close STDOUT;
>>here.
>
>
> Opening a file handle implies closing of the current one if it is open.
> When would explicit close of STDOUT make a difference?
Even though "perldoc perlopen" only mentions that for
in-memory files (i.e. scalars) i have experienced that
this also applies to pipes on my platform (testet here
on ActiveState, v5.8.0 built for MSWin32-x86-multi-thread).
If I omit the explicit close, the program will run into
a deadlock.
But I just testet on Linux, and in fact the close
isn't neccessary there.
-Chris
------------------------------
Date: Sun, 03 Jul 2005 00:55:52 +0200
From: Michel Rodriguez <mirod@mirod.org>
Subject: Re: validating Xml in perl
Message-Id: <42c71b78$0$326$5fc30a8@news.tiscali.it>
Vikrant wrote:
> how can i check the xml stored in $sXML variable is valid or not.plz
> suggest any function which return True or False after validation.
>
>
> $sXML = "<?xml version='1.0' ?>
> <ping_monitor>
> <monitor_ip>10.0.0.4</monitor_ip>
> <monitor_ip>10.0.0.2</monitor_ip>
> <ping_monitor>";
I used XML::Parser, but XML::LibXML would be very similar. As many
mentionned before, this will only check well-formedness, not validity of
the XML, see the XML spec itself (
http://www.w3.org/TR/2004/REC-xml-20040204/ ) for more on the difference
between the 2.
#!/usr/bin/perl -w
use strict;
use warnings;
use XML::Parser;
my $sXML=q{<?xml version='1.0' ?>
<ping_monitor>
<monitor_ip>10.0.0.4</monitor_ip>
<monitor_ip>10.0.0.2</monitor_ip>
<ping_monitor>
};
if( is_well_formed( $sXML))
{ print "well formed\n"; }
else
{ print "NOT well formed"; }
sub is_well_formed
{ my( $xml)= @_;
eval { XML::Parser->new( ErrorContext => 1)->parse( $xml) };
if( $@)
{ warn "XML is NOT well-formed: $@\n";
return 0;
}
else
{ return 1; }
}
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
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: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
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 8223
***************************************
