[30839] in Perl-Users-Digest
Perl-Users Digest, Issue: 2084 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Dec 29 18:18:05 2008
Date: Mon, 29 Dec 2008 15:09:10 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Mon, 29 Dec 2008 Volume: 11 Number: 2084
Today's topics:
Re: data access for a hash inside a Perl object <freesoft12@gmail.com>
Re: HTML Correctness and Validators <ang.usenet@gmail.com>
Re: HTML Correctness and Validators <lew@lewscanon.com>
Is there any IDE for perl? mobile.parmenides@gmail.com
Re: Is there any IDE for perl? <RedGrittyBrick@spamweary.invalid>
Re: Is there any IDE for perl? <rui.maciel@gmail.com>
Re: Is there any IDE for perl? <george@example.invalid>
Re: Is there any IDE for perl? sln@netherlands.com
new CPAN modules on Mon Dec 29 2008 (Randal Schwartz)
searching for franken <george@example.invalid>
Re: searching for franken <wahab-mail@gmx.de>
Re: searching for franken (Randal L. Schwartz)
Re: searching for franken <jurgenex@hotmail.com>
Re: searching for franken <tadmc@seesig.invalid>
Re: searching for franken <tadmc@seesig.invalid>
Re: searching for franken <george@example.invalid>
Re: searching for franken (Randal L. Schwartz)
Re: searching for franken <george@example.invalid>
Re: searching for franken <george@example.invalid>
Re: searching for franken sln@netherlands.com
Unit test that checks for "croak" <freesoft12@gmail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 29 Dec 2008 14:46:09 -0800 (PST)
From: "freesoft12@gmail.com" <freesoft12@gmail.com>
Subject: Re: data access for a hash inside a Perl object
Message-Id: <7da4bb4b-afd9-4b7c-8b6e-d628e235fa7f@y1g2000pra.googlegroups.com>
Thanks for your suggestions Ted, Ilya.
This is the first time I've read "perllexwarn.pod". It says that '-w'
switch switches on the warnings in all modules. This might not be
helpful if I am including third-party modules. Since all the modules
in my Perl project are written from scratch (using modules from the
standard Perl installation), I feel that that '-w' switch is the one I
should use.
Regards
John
------------------------------
Date: Mon, 29 Dec 2008 16:14:07 -0000
From: "Aaron Gray" <ang.usenet@gmail.com>
Subject: Re: HTML Correctness and Validators
Message-Id: <6rsbahF33ndvU1@mid.individual.net>
"Xah Lee" <xahlee@gmail.com> wrote in message
news:2fb289be-00b3-440a-b153-ca88f0ba16c5@d42g2000prb.googlegroups.com...
>recently i wrote a blog essay about html correctness and html
>validators, with relations to the programing lang communities. I hope
>programing lang fans will take more consideration on the correctness
>of the doc they produces.
>
>HTML Correctness and Validators
>. http://xahlee.org/js/html_correctness.html
Do you enjoy spamming comp.lang.functional with OT cross-posts ?
Regards,
Aaron
------------------------------
Date: Mon, 29 Dec 2008 08:20:34 -0800 (PST)
From: Lew <lew@lewscanon.com>
Subject: Re: HTML Correctness and Validators
Message-Id: <9eba3125-07e7-42ff-98c0-0b9be6105315@r36g2000prf.googlegroups.com>
Xah Lee wrote...
>> recently [sic] i [sic] wrote a blog essay about html [sic] correctness and html [sic]
>> validators, with relations [sic] to the programing [sic] lang [sic] communities. I hope
>> programing [sic] lang [sic] fans will take more consideration on [sic] the correctness
>> of the doc [sic] they produces [sic].
"Aaron Gray" wrote:
> Do you enjoy spamming comp.lang.functional with OT cross-posts ?
Is that a rhetorical question?
--
Lew
------------------------------
Date: Mon, 29 Dec 2008 04:59:04 -0800 (PST)
From: mobile.parmenides@gmail.com
Subject: Is there any IDE for perl?
Message-Id: <8e168c00-77b8-4699-83f7-70e977e9c54c@s9g2000prg.googlegroups.com>
Hi,
My experience concerning the c programming tell me an IED is very
important for coding and debugging. Is there perl counterpart?
------------------------------
Date: Mon, 29 Dec 2008 13:09:06 +0000
From: RedGrittyBrick <RedGrittyBrick@spamweary.invalid>
Subject: Re: Is there any IDE for perl?
Message-Id: <gjai5p$jv2$1@news.motzarella.org>
mobile.parmenides@gmail.com wrote:
> Hi,
>
> My experience concerning the c programming tell me an IED is very
> important for coding and debugging.
I'd not use an Improvised Explosive Device for coding and debugging but
YMMV.
> Is there perl counterpart?
Have you tried `perlfaq -q ide`
--
RGB
------------------------------
Date: Mon, 29 Dec 2008 14:46:17 +0000
From: Rui Maciel <rui.maciel@gmail.com>
Subject: Re: Is there any IDE for perl?
Message-Id: <4958e2ba$0$6570$a729d347@news.telepac.pt>
mobile.parmenides@gmail.com wrote:
> My experience concerning the c programming tell me an IED is very
> important for coding and debugging. Is there perl counterpart?
As an IDE (short for integrated development environment) is nothing more than a text editor, compiler, build system and debugger bundled in a neat package, why exactly does your experience tells you that you need a package intentionally labeled as an "IDE" to be able to write any code?
Rui Maciel
------------------------------
Date: Mon, 29 Dec 2008 15:04:37 -0700
From: George <george@example.invalid>
Subject: Re: Is there any IDE for perl?
Message-Id: <xjx8yoj2gz2a.1cu5ks8x46c83.dlg@40tude.net>
On Mon, 29 Dec 2008 04:59:04 -0800 (PST), mobile.parmenides@gmail.com
wrote:
> Hi,
>
> My experience concerning the c programming tell me an IED is very
> important for coding and debugging. Is there perl counterpart?
There's komodo from the activestate people. It costs some money and is
likely a very effective tool for persons who can afford it.
Activestate also has a free perl install for windows that has the
all-important package manager. You have to take steps to customize it, and
there's no ide. With an interpreted syntax like perl, I actually prefer
the command line to the ide. It's not like my projects are large.
If there's one thing I miss now that I'm relegated to relying on the free
distros, it's a visual debugger like I had back when I used M$.
--
George
The thing that's wrong with the French is that they don't have a word for
entrepreneur.
George W. Bush
Picture of the Day http://apod.nasa.gov/apod/
------------------------------
Date: Mon, 29 Dec 2008 23:08:22 GMT
From: sln@netherlands.com
Subject: Re: Is there any IDE for perl?
Message-Id: <t1mil4tg2eetcjnie5vgv7gi49gk5ddpbb@4ax.com>
On Mon, 29 Dec 2008 15:04:37 -0700, George <george@example.invalid> wrote:
>On Mon, 29 Dec 2008 04:59:04 -0800 (PST), mobile.parmenides@gmail.com
>wrote:
>
>> Hi,
>>
>> My experience concerning the c programming tell me an IED is very
>> important for coding and debugging. Is there perl counterpart?
>
>There's komodo from the activestate people. It costs some money and is
>likely a very effective tool for persons who can afford it.
>
>Activestate also has a free perl install for windows that has the
>all-important package manager. You have to take steps to customize it, and
>there's no ide. With an interpreted syntax like perl, I actually prefer
>the command line to the ide. It's not like my projects are large.
>
>If there's one thing I miss now that I'm relegated to relying on the free
>distros, it's a visual debugger like I had back when I used M$.
And intellisence.
------------------------------
Date: Mon, 29 Dec 2008 05:42:29 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Mon Dec 29 2008
Message-Id: <KCMIIt.1HIu@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.
Acme-Tools-0.11
http://search.cpan.org/~kjetil/Acme-Tools-0.11/
Lots of more or less useful subs lumped together and exported into your namespace
----
AnyEvent-HTTPD-0.04
http://search.cpan.org/~elmex/AnyEvent-HTTPD-0.04/
A simple lightweight event based web (application) server
----
AnyEvent-XMPP-0.2
http://search.cpan.org/~elmex/AnyEvent-XMPP-0.2/
An implementation of the XMPP Protocol
----
App-PPBuild-0.12
http://search.cpan.org/~exodist/App-PPBuild-0.12/
Perl Project Build System, The low-learning curve simple build system.
----
Binding-0.01
http://search.cpan.org/~gugod/Binding-0.01/
eval with variable binding of caller stacks.
----
Bio-Tools-CodonOptTable
http://search.cpan.org/~shardiwal/Bio-Tools-CodonOptTable/
A more elaborative way to check the codons quality
----
CPAN-Testers-ParseReport-0.0.22
http://search.cpan.org/~andk/CPAN-Testers-ParseReport-0.0.22/
parse reports to www.cpantesters.org from various sources
----
CPAN-WWW-Testers-0.39
http://search.cpan.org/~barbie/CPAN-WWW-Testers-0.39/
Present CPAN Testers data
----
Catalyst-Manual-5.7016
http://search.cpan.org/~hkclark/Catalyst-Manual-5.7016/
The Catalyst developer's manual
----
Catalyst-Model-Akismet-0.03
http://search.cpan.org/~mramberg/Catalyst-Model-Akismet-0.03/
Catalyst model for the Akismet anti-spam protocol
----
Convert-Color-IRC-0.05
http://search.cpan.org/~wolfman/Convert-Color-IRC-0.05/
named lookup for the basic IRC colors
----
Convert-Color-IRC-0.06
http://search.cpan.org/~wolfman/Convert-Color-IRC-0.06/
named lookup for the basic IRC colors
----
DBD-Pg-2.11.8
http://search.cpan.org/~turnstep/DBD-Pg-2.11.8/
PostgreSQL database driver for the DBI module
----
File-Trash-1.01
http://search.cpan.org/~leocharre/File-Trash-1.01/
safe file delete
----
File-Trash-1.04
http://search.cpan.org/~leocharre/File-Trash-1.04/
safe file delete
----
GPS-Point-0.09
http://search.cpan.org/~mrdvt/GPS-Point-0.09/
Provides an object interface for a GPS point.
----
Gtk2-Ex-ListModelConcat-4
http://search.cpan.org/~kryde/Gtk2-Ex-ListModelConcat-4/
concatenated list models
----
HTTP-MobileAttribute-0.12
http://search.cpan.org/~tokuhirom/HTTP-MobileAttribute-0.12/
Yet Another HTTP::MobileAgent
----
KiokuDB-0.16
http://search.cpan.org/~nuffin/KiokuDB-0.16/
Object Graph storage engine
----
Lemonldap-NG-Common-0.91
http://search.cpan.org/~guimard/Lemonldap-NG-Common-0.91/
Common files for Lemonldap::NG infrastructure
----
Locale-Country-Multilingual-0.20
http://search.cpan.org/~graf/Locale-Country-Multilingual-0.20/
mapping ISO codes to localized country names
----
MooseX-Traits-Attribute-CascadeClear-0.01
http://search.cpan.org/~rsrchboy/MooseX-Traits-Attribute-CascadeClear-0.01/
Attribute trait to cascade clearer actions
----
Muldis-D-0.56.0
http://search.cpan.org/~duncand/Muldis-D-0.56.0/
Formal spec of Muldis D relational DBMS lang
----
POE-Component-PubSub-0.02
http://search.cpan.org/~nperez/POE-Component-PubSub-0.02/
A generic publish/subscribe POE::Component that enables POE::Sessions to publish events to which other POE::Sessions may subscribe.
----
Parse-ABNF-0.02
http://search.cpan.org/~bjoern/Parse-ABNF-0.02/
Parse IETF Augmented BNF (ABNF) grammars.
----
Perlwikipedia-Plugin-ImageTester-0.1.2_01
http://search.cpan.org/~dcollins/Perlwikipedia-Plugin-ImageTester-0.1.2_01/
a plugin for Perlwikipedia which contains image copyright checking and analysis for the english wikipedia
----
Scope-Upper-0.02
http://search.cpan.org/~vpit/Scope-Upper-0.02/
Act on upper scopes.
----
Simo-0.0203
http://search.cpan.org/~kimoto/Simo-0.0203/
Very simple framework for Object Oriented Perl.
----
Simo-0.0204
http://search.cpan.org/~kimoto/Simo-0.0204/
Very simple framework for Object Oriented Perl.
----
Sledge-HTTPSession-0.04
http://search.cpan.org/~mikihoshi/Sledge-HTTPSession-0.04/
HTTP::Session to Sledge bindings
----
WWW-MobileCarrierJP-0.25
http://search.cpan.org/~tokuhirom/WWW-MobileCarrierJP-0.25/
scrape mobile carrier information
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/>
Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc.
See http://methodsandmessages.vox.com/ for Smalltalk and Seaside discussion
------------------------------
Date: Sun, 28 Dec 2008 23:07:15 -0700
From: George <george@example.invalid>
Subject: searching for franken
Message-Id: <bi2zybwv27ps.nq537sbuzmim.dlg@40tude.net>
I've written perl programs now for about a year and a half, and they have
usually focused on usenet. In some sense, this one does as well, in that
I'm developing material for my next 'nym shift, but the input from this is
the internet instead, probably an url.
I've never used perl to do this before, so I don't know where to start,
except with
# shebang windows meaningless
use warnings;
use strict;
I would like to test whether
http://www.co-array.org/
contains the following words:
distributed memory
Numerid Ried
OpenMP
Thanks for your comment, and thank you Santa for sending the cowgirls home
with George.
--
George
This way of life is worth defending.
George W. Bush
Picture of the Day http://apod.nasa.gov/apod/
------------------------------
Date: Mon, 29 Dec 2008 11:11:36 +0100
From: Mirco Wahab <wahab-mail@gmx.de>
Subject: Re: searching for franken
Message-Id: <gja7tr$io5$1@mlucom4.urz.uni-halle.de>
George wrote:
> I've written perl programs now for about a year and a half, and they have
> usually focused on usenet. In some sense, this one does as well, in that
> I'm developing material for my next 'nym shift, but the input from this is
> the internet instead, probably an url.
> I've never used perl to do this before, so I don't know where to start,
> except with
> I would like to test whether
> http://www.co-array.org/
> contains the following words:
> distributed memory
> Numerid Ried
> OpenMP
There is a module called LWP::Simple
http://search.cpan.org/~gaas/libwww-perl-5.822/lib/LWP/Simple.pm
which does exactly that, example:
...
use LWP::Simple;
my $url = 'www.co-array.org';
my $html = get 'http://' . $url;
my $what = qr'distributed.*?memory|Numerid.*?Ried|OpenMP';
while($html =~ /$what/mg) { # note the /m modifier
print '...' . substr($html, pos($html)-20, 40) . "...\n"
}
...
If you need to pass headers and cookies to the
site, please study the other libwww functions
(http://search.cpan.org/~gaas/libwww-perl-5.822/lib/Net/HTTP.pm)
or copy/paste the complete http query from your browser
and send it via IO::Socket::INET.
Regards
M.
------------------------------
Date: Mon, 29 Dec 2008 03:11:14 -0800
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: searching for franken
Message-Id: <86abaftewd.fsf@blue.stonehenge.com>
>>>>> "George" == George <george@example.invalid> writes:
George> I would like to test whether
George> http://www.co-array.org/
George> contains the following words:
George> distributed memory
George> Numerid Ried
George> OpenMP
Go to google. Enter:
site:co-array.org ("distributed memory" OR "Numerid Ried" OR OpenMP)
and see the results.
This is not a Perl problem.
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc.
See http://methodsandmessages.vox.com/ for Smalltalk and Seaside discussion
------------------------------
Date: Mon, 29 Dec 2008 04:33:14 -0800
From: Jürgen Exner <jurgenex@hotmail.com>
Subject: Re: searching for franken
Message-Id: <kkghl4h5mkdb2b4o3ikrbhkvlgqel8k2pq@4ax.com>
George <george@example.invalid> wrote:
["searching for franken"]
You can find Franken in the northern part of Bavaria.
>I would like to test whether
>
>http://www.co-array.org/
>
>contains the following words:
>
>distributed memory
>Numerid Ried
>OpenMP
To check if A is an anagram of B you would treat both strings as
multi-sets of characters and check if they are equal.
To check for "contains" simply check for subset instead of equality.
jue
------------------------------
Date: Mon, 29 Dec 2008 08:07:39 -0600
From: Tad J McClellan <tadmc@seesig.invalid>
Subject: Re: searching for franken
Message-Id: <slrnglhmdb.14n.tadmc@tadmc30.sbcglobal.net>
Mirco Wahab <wahab-mail@gmx.de> wrote:
> George wrote:
>> I would like to test whether
>> http://www.co-array.org/
>> contains the following words:
>> distributed memory
>> Numerid Ried
>> OpenMP
> my $what = qr'distributed.*?memory|Numerid.*?Ried|OpenMP';
>
> while($html =~ /$what/mg) { # note the /m modifier
Note that the /m modifier does absolutely nothing for the pattern
being used, and so is not needed at all.
You probably meant the /s modifier instead?
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
------------------------------
Date: Mon, 29 Dec 2008 08:20:43 -0600
From: Tad J McClellan <tadmc@seesig.invalid>
Subject: Re: searching for franken
Message-Id: <slrnglhn5r.14n.tadmc@tadmc30.sbcglobal.net>
George <george@example.invalid> wrote:
>
>
> I've written perl programs now for about a year and a half, and they have
> usually focused on usenet. In some sense, this one does as well, in that
> I'm developing material for my next 'nym shift, but the input from this is
> the internet instead, probably an url.
Errr, usenet is on the "internet" too.
I expect that you meant that the input is to be from a WWW page.
> I've never used perl to do this before, so I don't know where to start,
Start with the Perl Frequently Asked Questions.
Since you are interested in getting an HTML page:
perldoc -q HTML
might hand you the answer in response to this FAQ:
How do I fetch an HTML file?
> I would like to test whether
>
> http://www.co-array.org/
>
> contains the following words:
>
> distributed memory
> Numerid Ried
> OpenMP
--------------------
#!/usr/bin/perl
use warnings;
use strict;
use LWP::Simple;
$_ = get 'http://www.co-array.org/';
print "yes\n" if /distributed/ and /memory/
and /Numerid/ and /Ried/ and /OpenMP/;
--------------------
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
------------------------------
Date: Mon, 29 Dec 2008 14:37:48 -0700
From: George <george@example.invalid>
Subject: Re: searching for franken
Message-Id: <g07iizqh5b4.y31ki1so7c2e.dlg@40tude.net>
On Mon, 29 Dec 2008 03:11:14 -0800, Randal L. Schwartz wrote:
>>>>>> "George" == George <george@example.invalid> writes:
>
> George> I would like to test whether
>
> George> http://www.co-array.org/
>
> George> contains the following words:
>
> George> distributed memory
> George> Numerid Ried
> George> OpenMP
>
> Go to google. Enter:
>
> site:co-array.org ("distributed memory" OR "Numerid Ried" OR OpenMP)
>
> and see the results.
>
> This is not a Perl problem.
Thanks all for replies. It looks like I have some reading to do.
I'm stipulating that this is something I would like to work up in perl, not
that perl is the only means to get it done. I think it could save a hell
of a lot of keystrokes and mouse clicks.
I've got the page open in a browser and have read it, and I think it makes
a good guinea pig for the task.
I did try what you suggest above. Was I to paste in the above where I
would otherwise do a keyword search?
--
George
Leadership to me means duty, honor, country. It means character, and it
means listening from time to time.
George W. Bush
Picture of the Day http://apod.nasa.gov/apod/
------------------------------
Date: Mon, 29 Dec 2008 14:17:26 -0800
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: searching for franken
Message-Id: <86eizqsk21.fsf@blue.stonehenge.com>
>>>>> "George" == George <george@example.invalid> writes:
>> site:co-array.org ("distributed memory" OR "Numerid Ried" OR OpenMP)
George> I did try what you suggest above. Was I to paste in the above where I
George> would otherwise do a keyword search?
Like this:
http://letmegooglethatforyou.com/?q=site%3Aco-array.org+(%22distributed+memory%22+OR+%22Numerid+Ried%22+OR+OpenMP)
Watch and learn.
/me sighs
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc.
See http://methodsandmessages.vox.com/ for Smalltalk and Seaside discussion
------------------------------
Date: Mon, 29 Dec 2008 15:37:19 -0700
From: George <george@example.invalid>
Subject: Re: searching for franken
Message-Id: <1vx7vn9kgyrkt.lxiqm4s1d460.dlg@40tude.net>
On Mon, 29 Dec 2008 11:11:36 +0100, Mirco Wahab wrote:
> There is a module called LWP::Simple
> http://search.cpan.org/~gaas/libwww-perl-5.822/lib/LWP/Simple.pm
>
> which does exactly that, example:
>
> ...
>
> use LWP::Simple;
>
> my $url = 'www.co-array.org';
> my $html = get 'http://' . $url;
>
> my $what = qr'distributed.*?memory|Numerid.*?Ried|OpenMP';
>
> while($html =~ /$what/mg) { # note the /m modifier
> print '...' . substr($html, pos($html)-20, 40) . "...\n"
> }
>
> ...
>
> If you need to pass headers and cookies to the
> site, please study the other libwww functions
> (http://search.cpan.org/~gaas/libwww-perl-5.822/lib/Net/HTTP.pm)
# shebang doesn't work on windows
use strict;
use warnings;
use Net::HTTP;
use LWP::Simple;
my $url = 'www.co-array.org';
my $html = get 'http://' . $url;
my $what = qr'distributed.*?memory|Numerid.*?Ried|OpenMP';
while($html =~ /$what/mg) { # note the /m modifier
print '...' . substr($html, pos($html)-20, 40) . "...\n"
}
my $s = Net::HTTP->new(Host => "www.co-array.org") || die $@;
$s->write_request(GET => "/", 'User-Agent' => "Mozilla/5.0");
my($code, $mess, %h) = $s->read_response_headers;
while (1) {
my $buf;
my $n = $s->read_entity_body($buf, 1024);
die "read failed: $!" unless defined $n;
last unless $n;
print $buf;
}
# perl wahab3.pl
# end script begin abridged output
C:\MinGW\source>perl wahab3.pl
...n distributed memory machines but also o...
...ranslate into OpenMP Fortran</A>
...
...ay Fortran to OpenMP Fortran translator<...
...uivalent SPMD OpenMP Fortran 90/95 progr...
...w.openmp.org">OpenMP Fortran</A> compile...
...tectures
than OpenMP Fortran, programs s...
...anslated into OpenMP as part of the comp...
...ntrinsics for OpenMP is bundled with the...
...anslates into OpenMP Fortran.
<L...
...mp99.ps">SPMD OpenMP vs MPI for Ocean Mo...
...y Fortran and OpenMP Fortran for SPMD Pr...
<HTML>
<HEAD>
<TITLE>Co-Array Fortran</TITLE>
<LINK REL="shortcut icon" HREF="favicon.ico" />
</HEAD>
<BODY BACKGROUND="" BGCOLOR="#ffff99" TEXT="#000000" LINK="#0000ff"
VLINK="#8000
00" ALINK="#ff0000">
<HR WIDTH="30%" ALIGN=CENTER>
<CENTER><B><H1>Co-Array Fortran</H1></B></CENTER>
<HR WIDTH="30%" ALIGN=CENTER>
<P>
Co-array Fortran is a small extension to
Fortran 95.
# end abridged output
Wow, Mirco, with a little guidance, a person can go from square one to
cruising speed *so quickly*. I think this gives me the tools I need to
move my token forward. Thanks so much.
>
> or copy/paste the complete http query from your browser
> and send it via IO::Socket::INET.
>
> Regards
>
> M.
Do you mean that I would use the mouse or imitate the events?
--
George
Great tragedy has come to us, and we are meeting it with the best that is
in our country, with courage and concern for others because this is
America. This is who we are.
George W. Bush
Picture of the Day http://apod.nasa.gov/apod/
------------------------------
Date: Mon, 29 Dec 2008 15:58:29 -0700
From: George <george@example.invalid>
Subject: Re: searching for franken
Message-Id: <14zcicf4wggfq.1ga8bij3y8h2t.dlg@40tude.net>
On Mon, 29 Dec 2008 14:17:26 -0800, Randal L. Schwartz wrote:
>>>>>> "George" == George <george@example.invalid> writes:
>
>>> site:co-array.org ("distributed memory" OR "Numerid Ried" OR OpenMP)
>
> George> I did try what you suggest above. Was I to paste in the above where I
> George> would otherwise do a keyword search?
>
> Like this:
>
> http://letmegooglethatforyou.com/?q=site%3Aco-array.org+(%22distributed+memory%22+OR+%22Numerid+Ried%22+OR+OpenMP)
>
> Watch and learn.
>
> /me sighs
That's hilarious. I'll use that in my other discussion forums where people
are willfully ignorant of facts.
http://i429.photobucket.com/albums/qq15/george196884/fortran40.jpg
It correctly prompts for a respelling of Reid to reflect the person who has
been most identified with making co-arrays part of standard fortran.
Ultimately, it's a google keyword search, and that's not what I'm after.
--
George
Hundreds of thousands of American servicemen and women are deployed across
the world in the war on terror. By bringing hope to the oppressed, and
delivering justice to the violent, they are making America more secure.
George W. Bush
Picture of the Day http://apod.nasa.gov/apod/
------------------------------
Date: Mon, 29 Dec 2008 23:05:19 GMT
From: sln@netherlands.com
Subject: Re: searching for franken
Message-Id: <mrlil4d3fk7plbpg7aoq7hbubajnsr1o8v@4ax.com>
On Mon, 29 Dec 2008 14:17:26 -0800, merlyn@stonehenge.com (Randal L. Schwartz) wrote:
>>>>>> "George" == George <george@example.invalid> writes:
>
>>> site:co-array.org ("distributed memory" OR "Numerid Ried" OR OpenMP)
>
>George> I did try what you suggest above. Was I to paste in the above where I
>George> would otherwise do a keyword search?
>
>Like this:
>
> http://letmegooglethatforyou.com/?q=site%3Aco-array.org+(%22distributed+memory%22+OR+%22Numerid+Ried%22+OR+OpenMP)
>
>Watch and learn.
>
>/me sighs
"Enable javascript to use LMGTFY."
Doesen't work.
sln
------------------------------
Date: Mon, 29 Dec 2008 11:14:55 -0800 (PST)
From: "freesoft12@gmail.com" <freesoft12@gmail.com>
Subject: Unit test that checks for "croak"
Message-Id: <b76cc95d-f11f-4880-a902-50516bd11979@q26g2000prq.googlegroups.com>
Hi,
I have a module that calls 'croak' if the input argument to my
function is wrong. I want to write a unit test that tests if 'croak'
is called when I give a bad input.
---- PathUtils.t ----
use Test::More qw( no_plan );
use PathUtils;
my $path = '/a/b/../c';
deleteDoubleDotsInPath(\$path);
ok($path eq '/a/c'); # success test
$path = '../c'; # bad input. a fail/negative test
# how can write a 'ok()' or 'is()' that checks that 'croak' function
is called
# ok(deleteDoubleDotsInPath(\$path));
------------ end ----------
----------- PathUtils.pm ----------
package PathUtils;
use Carp;
require Exporter;
our @ISA = qw(Exporter);
our @EXPORT = qw(&deleteDoubleDotsInPath);
# This function removes the double dots in a path '..' eg: a/b/../c/
d/../e
sub deleteDoubleDotsInPath {
my $text = shift;
die "Malformed path" if !check_path_($text);
while($$text =~ m/\.\./) {
$$text =~ s/\/[^\/]*\/\.\.//;
}
}
sub check_path_ {
my $text = shift;
my @dirs = split(/\//,$$text);
my @double_dots = grep(/\.\./,@dirs);
if (scalar(@dirs) - scalar(@double_dots) > scalar(@double_dots)) {
return 1;
}
return 0;
}
------------ end ------------
Regards
John
------------------------------
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 V11 Issue 2084
***************************************
