[28284] in Perl-Users-Digest
Perl-Users Digest, Issue: 9648 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Aug 26 03:05:49 2006
Date: Sat, 26 Aug 2006 00:05:07 -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 Sat, 26 Aug 2006 Volume: 10 Number: 9648
Today's topics:
Re: Match regular expression from LEFT to right robic0
new CPAN modules on Sat Aug 26 2006 (Randal Schwartz)
Re: Prevent multiple instances of a script to launch <trwww@sbcglobal.net>
Re: regular expression variables under debugger <wlcna@nospam.com>
Re: regular expression variables under debugger <wlcna@nospam.com>
Re: regular expression variables under debugger <uri@stemsystems.com>
Re: regular expression variables under debugger <wlcna@nospam.com>
Re: regular expression variables under debugger <uri@stemsystems.com>
Re: warnings (was Re: Most useful standard module?) <tadmc@augustmail.com>
Re: warnings <rvtol+news@isolution.nl>
Re: WinNT ActiveState STDERR and STDOUT <addinall@addinall.org>
Re: xslt ? <surfunbear@yahoo.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 25 Aug 2006 17:03:47 -0700
From: robic0
Subject: Re: Match regular expression from LEFT to right
Message-Id: <io2ve2t4jaeh9rqhj5tkljtdqi9t9deiga@4ax.com>
On 25 Aug 2006 06:49:33 -0700, "fritz-bayer@web.de" <fritz-bayer@web.de> wrote:
>Hi,
>
>lets say I have the following string:
>
><tr> dfsdfre <tr>fsdsfd35gd <tr>khf758 <tr>afdga654jhuotj <input
>type="text"> 67kfbs356</tr>sh tu65 </tr> hbrubs</tr>
>
>and I would like to capture the text before the <input...> until the
>first <tr> and the text after until the first <tr> so that I get
>
><tr>afdga654jhuotj <input type="text> 67kfbs356</tr>
>
>How would I do this?
>
>=~ m!<tr>.*?<input type="text">.*?<tr>!
>
>will only work capturing the first <tr> after the <input..>. The
>problem is that I have to find a expression, which starts looking from
>the right to the left of <input...>.
>
>Fritz
Finding text from the phrase back to the keyword is indeed hard since
searches procede left to right in general.
Html/Xml is indeed easier to parse because of its mark-up, and indeed
one of the hardest things to do corectly.
Some other alternatives:
- Method 1 is is a negative character class with one character '<'.
<> are very powerfull delimeters.
- Method 2 is an alternative to a negative assertion construct (?!...)
i believe was mentioned by another poster. I believe the method below to
be a close proximity to negative assertions.
I'm not at all comfortable with negative assertions, however, logically it is the only way.
I made all the tags start tags, and narrowed down the regex to the range
of interest, the start/end text;
use strict;
use warnings;
my $string =
'<tr> dfsdfre <tr>fsdsfd35gd <tr>khf758 <tr>afdga654jhuotj <input type="text"> 67kfbs356<tr>sh tu65 <tr> hbrubs<tr>';
# -- method 1 --
my ($capt) = $string =~ m!(<tr>[^<]*<input type="text">)!;
print "found: $capt\n";
# -- method 2 --
while ($string =~ /<tr>(.*?)(?:(<tr>)|<input type="text">)/g)
# 1 1( 2 2| )
{
if (defined $2)
{
pos($string) = pos($string) - 4;
next;
}
print "found: $1\n";
}
__END__
found: <tr>afdga654jhuotj <input type="text">
found: afdga654jhuotj
------------------------------
Date: Sat, 26 Aug 2006 04:42:12 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Sat Aug 26 2006
Message-Id: <J4L92C.20Ir@zorch.sf-bay.org>
The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN). You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.
Algorithm-C3-0.05
http://search.cpan.org/~blblack/Algorithm-C3-0.05/
A module for merging hierarchies using the C3 algorithm
----
App-Cmd-0.006
http://search.cpan.org/~rjbs/App-Cmd-0.006/
write command line apps with less suffering
----
App-Cmd-0.007
http://search.cpan.org/~rjbs/App-Cmd-0.007/
write command line apps with less suffering
----
App-SimpleScan-1.21
http://search.cpan.org/~mcmahon/App-SimpleScan-1.21/
simple_scan's core code
----
Audio-File-0.11
http://search.cpan.org/~flora/Audio-File-0.11/
Audio file abstraction library
----
CORBA-JAVA-2.49
http://search.cpan.org/~perrad/CORBA-JAVA-2.49/
----
CORBA-Python-0.28
http://search.cpan.org/~perrad/CORBA-Python-0.28/
----
Catalyst-Plugin-FormBuilder-1.04
http://search.cpan.org/~nwiger/Catalyst-Plugin-FormBuilder-1.04/
Catalyst FormBuilder Plugin
----
Class-C3-0.13
http://search.cpan.org/~blblack/Class-C3-0.13/
A pragma to use the C3 method resolution order algortihm
----
Encode-EUCJPMS-0.07
http://search.cpan.org/~naruse/Encode-EUCJPMS-0.07/
Microsoft Compatible Encodings for Japanese
----
HTML-Dojo-0.0301
http://search.cpan.org/~cfranks/HTML-Dojo-0.0301/
Provides the Dojo JavaScript / AJAX distribution 0.3.0 files.
----
HTML-Dojo-0.0301.1
http://search.cpan.org/~cfranks/HTML-Dojo-0.0301.1/
Provides the Dojo JavaScript / AJAX distribution 0.3.1 files.
----
HTML-Perlinfo-1.43
http://search.cpan.org/~accardo/HTML-Perlinfo-1.43/
Display a lot of Perl information in HTML format
----
Handel-0.99_06
http://search.cpan.org/~claco/Handel-0.99_06/
Simple commerce framework with AxKit/TT/Catalyst support
----
Mail-DomainKeys-0.86
http://search.cpan.org/~anthonyu/Mail-DomainKeys-0.86/
A perl implementation of DomainKeys
----
Mail-SpamCannibal-0.71
http://search.cpan.org/~miker/Mail-SpamCannibal-0.71/
A tool to stop SPAM
----
Mail-Summary-Tools-0.03
http://search.cpan.org/~nuffin/Mail-Summary-Tools-0.03/
Tools for mailing list summarization.
----
MediaWiki-1.08
http://search.cpan.org/~spectrum/MediaWiki-1.08/
OOP MediaWiki engine client
----
Net-Flickr-API-1.5
http://search.cpan.org/~ascope/Net-Flickr-API-1.5/
base API class for Net::Flickr::* libraries
----
Net-Flickr-Backup-2.91
http://search.cpan.org/~ascope/Net-Flickr-Backup-2.91/
OOP for backing up your Flickr photos locally
----
Net-Flickr-RDF-1.91
http://search.cpan.org/~ascope/Net-Flickr-RDF-1.91/
a.k.a RDF::Describes::Flickr
----
Net-Traceroute-PurePerl-0.10_02
http://search.cpan.org/~ahoying/Net-Traceroute-PurePerl-0.10_02/
----
SIL-Shoe-1.33
http://search.cpan.org/~mhosken/SIL-Shoe-1.33/
Module for interacting with SIL Shoebox and SIL Toolbox files
----
SVN-Mirror-0.70
http://search.cpan.org/~clkao/SVN-Mirror-0.70/
Mirror remote repository to local Subversion repository
----
Shell-EnvImporter
http://search.cpan.org/~dfaraldo/Shell-EnvImporter/
Perl extension for importing environment variable changes from external commands or shell scripts
----
Shell-EnvImporter-1.00
http://search.cpan.org/~dfaraldo/Shell-EnvImporter-1.00/
Perl extension for importing environment variable changes from external commands or shell scripts
----
Shell-EnvImporter-1.01
http://search.cpan.org/~dfaraldo/Shell-EnvImporter-1.01/
Perl extension for importing environment variable changes from external commands or shell scripts
----
Tcl-Tk-0.90
http://search.cpan.org/~vkon/Tcl-Tk-0.90/
Extension module for Perl giving access to Tk via the Tcl extension
----
Term-Menus-1.18
http://search.cpan.org/~reedfish/Term-Menus-1.18/
Create Powerful Terminal, Console and CMD Enviroment Menus
----
Test-NoTabs-0.2
http://search.cpan.org/~sock/Test-NoTabs-0.2/
Check the presence of tabs in your project
----
VCP-Dest-svk-0.29
http://search.cpan.org/~clkao/VCP-Dest-svk-0.29/
svk destination driver
----
WebService-YouTube-0.01
http://search.cpan.org/~yoshida/WebService-YouTube-0.01/
Perl interfece to YouTube
----
Win32-PerlExe-Env-0.01
http://search.cpan.org/~thw/Win32-PerlExe-Env-0.01/
Get environment informations of Win32 Perl executables
----
XML-DOM-Lite-0.13
http://search.cpan.org/~rhundt/XML-DOM-Lite-0.13/
Lite Pure Perl XML DOM Parser Kit
----
XML-DOM-Lite-0.14
http://search.cpan.org/~rhundt/XML-DOM-Lite-0.14/
Lite Pure Perl XML DOM Parser Kit
----
XML-Liberal-0.13_01
http://search.cpan.org/~miyagawa/XML-Liberal-0.13_01/
Super liberal XML parser that parses broken XML
----
XML-Liberal-0.13_02
http://search.cpan.org/~miyagawa/XML-Liberal-0.13_02/
Super liberal XML parser that parses broken XML
----
XML-Liberal-0.13_03
http://search.cpan.org/~miyagawa/XML-Liberal-0.13_03/
Super liberal XML parser that parses broken XML
----
dvdrip-0.98.1
http://search.cpan.org/~jred/dvdrip-0.98.1/
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
http://www.stonehenge.com/merlyn/LinuxMag/col82.html
print "Just another Perl hacker," # the original
--
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: Fri, 25 Aug 2006 23:04:10 GMT
From: "Todd W" <trwww@sbcglobal.net>
Subject: Re: Prevent multiple instances of a script to launch
Message-Id: <KlLHg.51$6R7.30@newssvr24.news.prodigy.com>
"Philipp" <sicsicsic@freesurf.ch> wrote in message
news:1156492918_2998@sicinfo3.epfl.ch...
> Is there an easy way to prevent these new copies to start and instead
> queue the corresponding files in an already running script? (so they get
> executed sequentially and not in parallel)
You could use File::Pid to implement some of the other suggestions in this
thread:
http://search.cpan.org/~cwest/File-Pid-1.01/
Todd W.
------------------------------
Date: Sat, 26 Aug 2006 01:48:10 GMT
From: "wlcna" <wlcna@nospam.com>
Subject: Re: regular expression variables under debugger
Message-Id: <uLNHg.763$Cq4.444@newssvr25.news.prodigy.net>
Here's code and debugger executions, this is under perl 5.8.2.
------------------------------------
#!/usr/bin/perl
use strict;
use LWP::UserAgent;
use HTML::TreeBuilder;
use XML::TreeBuilder;
my $strUrl = 'http://rss.news.yahoo.com/rss/us';
# retrieve
my $ua = new LWP::UserAgent;
$ua->timeout( 45 );
my $req = new HTTP::Request GET => $strUrl;
my $res = $ua->request( $req );
my $strHtml = $res->content;
# parse the data retrieved.
my $t = new XML::TreeBuilder;
$t->parse( $strHtml );
$t->eof;
my $str = $t->content->[1]->content->[5]->as_text;
$str =~ /([0-9]*)$/;
my $testPart = $1;
my $testWhole = $&;
my $breakpoint = 3;
print "testPart: $testPart, testWhole: $testWhole\n";
------------------------------------
Here's debugger execution showing the problem:
main::(tester:8): my $strUrl = 'http://rss.news.yahoo.com/rss/us';
DB<1> c 22
main::(tester:22): my $str =
$t->content->[1]->content->[5]->as_text;
DB<2> n
main::(tester:23): $str =~ /([0-9]*)$/;
DB<2> n
main::(tester:24): my $testPart = $1;
DB<2> n
main::(tester:25): my $testWhole = $&;
DB<2> n
main::(tester:26): my $breakpoint = 3;
DB<2> n
main::(tester:27): print "testPart: $testPart, testWhole:
$testWhole\n";
DB<2> n
testPart: , testWhole:
------------------------------------
Here's another run showing the problem a different way:
main::(tester:8): my $strUrl = 'http://rss.news.yahoo.com/rss/us';
DB<1> c 22
main::(tester:22): my $str =
$t->content->[1]->content->[5]->as_text;
DB<2> n
main::(tester:23): $str =~ /([0-9]*)$/;
DB<2>
main::(tester:24): my $testPart = $1;
DB<2>
main::(tester:25): my $testWhole = $&;
DB<2> n
main::(tester:26): my $breakpoint = 3;
DB<3> $str =~ /([0-9]*)$/; print $1;
718
------------------------------
Date: Sat, 26 Aug 2006 03:15:53 GMT
From: "wlcna" <wlcna@nospam.com>
Subject: Re: regular expression variables under debugger
Message-Id: <J1PHg.18$tU.4@newssvr21.news.prodigy.com>
"Henry Law" <news@lawshouse.org> wrote in message
news:1156517403.19827.0@damia.uk.clara.net...
> wlcna wrote:
>> "Tad McClellan" <tadmc@augustmail.com> wrote in message
>> news:slrneesp5j.mcs.tadmc@magna.augustmail.com...
>>> Then the problem is probably in the part that made you use
>>> the "essentially" qualifier... :-)
>>
>> :) Of course, but not really in this case. The offending code is
>> essentially IDENTICAL to what I posted. But the "inessential" that
>> is the key is *I think* WHERE THE INPUT IS COMING FROM, see my other
>> post.
>
> Oh for heaven's sake, man: post some runnable code that, when _that_
> _exact_ _code_ is run, shows your problem in your environment. If
> someone else runs it and gets the problem then they can help debug it;
> if they don't then you have an environment or a procedural problem and
> we'll help debug it.
>
It's there, see my other post to your neighbor in this thread.
That's complete runnable code that reproduces the problem, for me of
course, every time, and two sets of debugger executions showing the
problem of the regex failing for no apparent reason.
That run includes all the anomalies I've previously mentioned, including
that the first time through the identical regex does not work, second
time through it does work even though all inputs are the same. That's
what happens for me and the code shows the precisely necessary steps to
reproduce it on my system. I didn't post this sooner BECAUSE I DID NOT
HAVE IT yet.
------------------------------
Date: Sat, 26 Aug 2006 00:11:12 -0400
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: regular expression variables under debugger
Message-Id: <x73bbk5e73.fsf@mail.sysarch.com>
>>>>> "w" == wlcna <wlcna@nospam.com> writes:
<snip of useless code for this problem>
w> my $str = $t->content->[1]->content->[5]->as_text;
w> $str =~ /([0-9]*)$/;
w> my $testPart = $1;
w> my $testWhole = $&;
why do you think $& will be different than $1?
why do you think you have a match??
YOU NEVER CHECK THE RESULT OF THE REGEX!!!!
you claim you know the data in $str. WHY DON'T YOU PRINT IT!!! i bet it
has no number string and so you have undefined values in $1 and $&.
w> my $breakpoint = 3;
w> print "testPart: $testPart, testWhole: $testWhole\n";
i see NO OUTPUT from that. it proves nothing since we don't know what
was in $str or what this actually printed.
w> ------------------------------------
w> Here's debugger execution showing the problem:
w> main::(tester:8): my $strUrl = 'http://rss.news.yahoo.com/rss/us';
w> DB<1> c 22
w> main::(tester:22): my $str =
w> $t->content->[1]->content->[5]->as_text;
where is the rest of the code in the debugger?
w> DB<2> n
w> main::(tester:23): $str =~ /([0-9]*)$/;
w> DB<2> n
WHAT IS IN $str???? if you had a clue you would have just printed it
first. then you could have written 5 lines of code that would show (or
not show) the problem. but you have to claim stuff without any data to
prove it.
w> main::(tester:24): my $testPart = $1;
w> DB<2> n
w> main::(tester:25): my $testWhole = $&;
w> DB<2> n
w> main::(tester:26): my $breakpoint = 3;
w> DB<2> n
w> main::(tester:27): print "testPart: $testPart, testWhole:
w> $testWhole\n";
w> DB<2> n
w> testPart: , testWhole:
so?? that means YOU DIDN'T MATCH ANYTHING. you NEVER CHECKED FOR MATCH
SUCCESS IN EITHER CASE. YOU DIDN'T PRINT $str BEFORE THE MATCH.
your code is useless to show anything. i never thought you had found a
real problem and now i am positive you haven't. this was a simple issue
that you dragged out for way too long and then you finally show crap
code that proves nothing since you don't print the critical info and
don't do basic logic tests that any perl hacker would do.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Sat, 26 Aug 2006 04:42:59 GMT
From: "wlcna" <wlcna@nospam.com>
Subject: Re: regular expression variables under debugger
Message-Id: <njQHg.12960$kO3.5577@newssvr12.news.prodigy.com>
"Uri Guttman" <uri@stemsystems.com> wrote in message
news:x73bbk5e73.fsf@mail.sysarch.com...
>>>>>> "w" == wlcna <wlcna@nospam.com> writes:
>
> <snip of useless code for this problem>
I must say a good number of you perl programmers seem like wusses. I'm
not primarily a perl programmer but just gotta say that. Not all of
you, but a whole bunch.
Dude, why don't you try to run the code before you talk out of your rear
end. This is some kind of bug in perl, I have other things to do than
hand-hold you wusses when I've pressed your faces into the wreaking
problem like 5x. Try to run the code, if you don't see the behavior I
see and you have a more current version, then hopefully it's fixed in
the latest.
First you wusses ask for code in addition to my initial code plus
detailed explanations, I give it to you plus debugger stuff showing the
problem, then you, wuss, tell me that the code doesn't show anything
which you've figured out before even trying it.
Anyway, you haven't read any of the important parts of this thread so I
don't even know why I'm responding to you and I'm certainly not
addressing any of your moronic points that I've addressed like 2 or 3
times already.
Read, wuss.
Run code, wuss.
------------------------------
Date: Sat, 26 Aug 2006 00:53:28 -0400
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: regular expression variables under debugger
Message-Id: <x7ac5s3xo7.fsf@mail.sysarch.com>
>>>>> "w" == wlcna <wlcna@nospam.com> writes:
w> "Uri Guttman" <uri@stemsystems.com> wrote in message
w> news:x73bbk5e73.fsf@mail.sysarch.com...
>>>>>>> "w" == wlcna <wlcna@nospam.com> writes:
>>
>> <snip of useless code for this problem>
w> Dude, why don't you try to run the code before you talk out of your rear
w> end. This is some kind of bug in perl, I have other things to do than
w> hand-hold you wusses when I've pressed your faces into the wreaking
w> problem like 5x. Try to run the code, if you don't see the behavior I
w> see and you have a more current version, then hopefully it's fixed in
w> the latest.
w> First you wusses ask for code in addition to my initial code plus
w> detailed explanations, I give it to you plus debugger stuff showing the
w> problem, then you, wuss, tell me that the code doesn't show anything
w> which you've figured out before even trying it.
you didn't do the correct thing in two places. i can't fix that. i have
no idea what was IN THE VARIABLE $str. i am not going to install some
html parser to run this. if you just printed the value you could see the
problem.
w> Anyway, you haven't read any of the important parts of this thread
w> so I don't even know why I'm responding to you and I'm certainly
w> not addressing any of your moronic points that I've addressed like
w> 2 or 3 times already.
you haven't done anything you were asked by me. when you finally posted
real code you didn't reduce it to a minimal script. the lwp and parse
stuff have nothing to do with your supposed bug. so if you just print
that value, set a variable to it, match it AND TEST THE MATCH RESULTS,
then you could show something we call evidence. but you don't seem to
get the train of logic here. you have been left at the station.
i don't run useless code. the onus is on you to prove a bug and you
haven't done diddly to do it nor do you get why you haven't.
enuff said,
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Fri, 25 Aug 2006 18:32:39 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: warnings (was Re: Most useful standard module?)
Message-Id: <slrneev24n.pg7.tadmc@magna.augustmail.com>
Chris Richmond - MD6-FDC ~ <crichmon@filc9283.fm.intel.com> wrote:
> We treat warnings as fatal
> errors.
So do I.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Sat, 26 Aug 2006 01:06:57 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: warnings
Message-Id: <eco74s.e8.1@news.isolution.nl>
Chris Richmond - MD6-FDC ~ schreef:
> We treat warnings as fatal
> errors. They *have* to be fixed or the code doesn't get released.
Have you grepped all source for blocks with
local $^W
or
no warnings
in them? Or are those accepted fixes?
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: 25 Aug 2006 20:44:19 -0700
From: "addinall" <addinall@addinall.org>
Subject: Re: WinNT ActiveState STDERR and STDOUT
Message-Id: <1156563859.791969.52650@m73g2000cwd.googlegroups.com>
Thomas Kratz wrote:
> addinall wrote:
> > I'm having a problem and wondered if anyone else
> > has come across something like this.
> >
> > I have a customer with a legacy NT4.0 system.
> > A requirement came up to run several jobs in
> > the background and capture the output of STDOUT
> > and STDERR for later analysis.
> >
> > Code (example only)
> >
> > HELLO.BAT
> > echo Hello World this is STDOUT
> > This line will produce an error to STDERRR
> > echo
> >
> > posix.pl
> > #! perl -w
> >
> > use Proc::Background qw( timeout_system ) ;
> > print("Hello World STDOUT from Perl") ;
> > my @t = timeout_system( 5, "c:\\Perl\\bin\\HELLO.BAT") ;
>
> As I understand from a quick glance at the docs for Proc::Background,
> background processes are created through Win32::Process::Create like this:
>
> Win32::Process::Create(
> $os_obj,
> $args[0],
> "@args",
> 0,
> NORMAL_PRIORITY_CLASS,
> '.'
> );
>
> The 0 as 4th parameter means "don't inherit handles from callin process",
> which means this process will not inherit STDOUT and STDERR from perl or
> eventually the shell your script is running in.
>
> Change this to use the standard system() function and it will.
Can I specify a timeout under system()? I have read the code and it
doesn't seem so.
>
> But you can specify a different log file as
>
> my @t = timeout_system( 5, 'c:\Perl\bin\HELLO.BAT >log2 2>&1') ;
Thanks for your response. I really appreciate it.
I tried fudging it to a different log file (before I read this
actually) and it seems that under this particular OS (NT4)
NO file redirection works under a process that has dup()ed
a handle. log2 doesn't even get created... Grrrr.....
It all seems to work fine under Windows 2000, yet to test 2003,
although like I mentioned, Windows is a whole new ball game
for me.
>
> Or you could file a change request to the author of Proc::Background to
> make the flag configurable.
I might make that suggestion. Perhaps at the same time we could
make the priority flag configurable as well? It would be good
for me, bad for fork() bombs!
Thanks for your time.
Mark.
>
> Thomas
>
> --
> $/=$,,$_=<DATA>,s,(.*),$1,see;__END__
> s,^(.*\043),,mg,@_=map{[split'']}split;{#>J~.>_an~>>e~......>r~
> $_=$_[$%][$"];y,<~>^,-++-,?{$/=--$|?'"':#..u.t.^.o.P.r.>ha~.e..
> '%',s,(.),\$$/$1=1,,$;=$_}:/\w/?{y,_, ,,#..>s^~ht<._..._..c....
> print}:y,.,,||last,,,,,,$_=$;;eval,redo}#.....>.e.r^.>l^..>k^.-
------------------------------
Date: 25 Aug 2006 17:02:10 -0700
From: "surf" <surfunbear@yahoo.com>
Subject: Re: xslt ?
Message-Id: <1156550530.313450.49910@74g2000cwt.googlegroups.com>
Tad McClellan wrote:
> surf <surfunbear@yahoo.com> wrote:
> >
> > Tad McClellan wrote:
> >> surf <surfunbear@yahoo.com> wrote:
> >>
> >>
> >> > I'm not sure why anyone would want
> >> > to write a program of any sort in XML anyway ?
> >>
> >>
> >> One Reason:
> >>
> >> XSLT is optimized for machines rather than for humans.
> >>
> >>
> >>
> >> Let's haul this back on-topic:
> >>
> >> Contrast that with Perl, which is optimized for humans at the
> >> expense of the machine (throwing cycles and memory at a problem).
> >>
> >>
> >
> > I'm not an xslt expert, but you need to elaborate on that.
> ^^^^
> ^^^^
> No I don't.
>
>
> > Obviously
> > programming in assembly language is not very popular, although it might
> > be optimized for machines.
>
>
> I don't need to elaborate on what I said.
>
> I might need to elaborate on why XSLT is popular though.
>
> Here's my stab at it: platform independence.
>
>
> --
There has not been allot of response from perl users here, I'm not
sure if perl programmers have much interest in xml ...
Here's something I found at
http://www.kuro5hin.org/story/2002/1/15/1562/95011
"However, this integration comes at a cost: Verbosity. Terrible
verbosity. The signal-to-noise ratio of XSLT transformations is
shameful, easily among the worst of all computer languages in
widespread use. Non-trivial XSLT transformations almost appear
obfuscated."
------------------------------
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 9648
***************************************
