[16630] in Perl-Users-Digest
Perl-Users Digest, Issue: 4042 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Aug 17 09:05:27 2000
Date: Thu, 17 Aug 2000 06:05:16 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <966517515-v9-i4042@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Thu, 17 Aug 2000 Volume: 9 Number: 4042
Today's topics:
[Perl] How to find the Perl FAQ <rootbeer&pfaq*finding*@redcat.com>
Re: About Net::Ping <undergronk@my-deja.com>
Re: ANNOUNCE : AI::NeuralNet::BackProp v 0.89 <murat.uenalan@sietec.de>
ANNOUNCE: AI::NeuralNet::BackProp v 0.89 <jdb@wcoil.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 17 Aug 2000 10:22:26 GMT
From: Tom Phoenix <rootbeer&pfaq*finding*@redcat.com>
Subject: [Perl] How to find the Perl FAQ
Message-Id: <pfaqmessage966507841.8962@news.teleport.com>
Archive-name: perl-faq/finding-perl-faq
Posting-Frequency: weekly
Last-modified: 29 Apr 2000
[ That "Last-modified:" date above refers to this document, not to the
Perl FAQ itself! The last _major_ update of the Perl FAQ was in Summer
of 1998; of course, ongoing updates are made as needed. ]
For most people, this URL should be all you need in order to find Perl's
Frequently Asked Questions (and answers).
http://www.cpan.org/doc/FAQs/
Please look over (but never overlook!) the FAQ and related docs before
posting anything to the comp.lang.perl.* family of newsgroups.
For an alternative way to get answers, check out the Perlfaq website.
http://www.perlfaq.com/
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Beginning with Perl version 5.004, the Perl distribution itself includes
the Perl FAQ. If everything is pro-Perl-y installed on your system, the
FAQ will be stored alongside the rest of Perl's documentation, and one
of these commands (or your local equivalents) should let you read the FAQ.
perldoc perlfaq
man perlfaq
If a recent version of Perl is not properly installed on your system,
you should ask your system administrator or local expert to help. If you
find that a recent Perl distribution is lacking the FAQ or other important
documentation, be sure to complain to that distribution's author.
If you have a web connection, the first and foremost source for all things
Perl, including the FAQ, is the Comprehensive Perl Archive Network (CPAN).
CPAN also includes the Perl source code, pre-compiled binaries for many
platforms, and a large collection of freely usable modules, among its
560_986_526 bytes (give or take a little) of super-cool (give or take
a little) Perl resources.
http://www.cpan.org/
http://www.perl.com/CPAN/
http://www.cpan.org/doc/FAQs/FAQ/html/
http://www.perl.com/CPAN/doc/FAQs/FAQ/html/
You may wish or need to access CPAN via anonymous FTP. (Within CPAN,
you will find the FAQ in the /doc/FAQs/FAQ directory. If none of these
selected FTP sites is especially good for you, a full list of CPAN sites
is in the SITES file within CPAN.)
California ftp://ftp.cdrom.com/pub/perl/CPAN/
Texas ftp://ftp.metronet.com/pub/perl/
South Africa ftp://ftp.is.co.za/programming/perl/CPAN/
Japan ftp://ftp.dti.ad.jp/pub/lang/CPAN/
Australia ftp://cpan.topend.com.au/pub/CPAN/
Netherlands ftp://ftp.cs.ruu.nl/pub/PERL/CPAN/
Switzerland ftp://sunsite.cnlab-switch.ch/mirror/CPAN/
Chile ftp://ftp.ing.puc.cl/pub/unix/perl/CPAN/
If you have no connection to the Internet at all (so sad!) you may wish
to purchase one of the commercial Perl distributions on CD-Rom or other
media. Your local bookstore should be able to help you to find one.
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Comments and suggestions on the contents of this document
are always welcome. Please send them to the author at
<pfaq&finding*comments*@redcat.com>. Of course, comments on
the docs and FAQs mentioned here should go to their respective
maintainers.
Have fun with Perl!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Thu, 17 Aug 2000 11:47:48 GMT
From: Scott Kirk <undergronk@my-deja.com>
Subject: Re: About Net::Ping
Message-Id: <8ngjcu$ha7$1@nnrp1.deja.com>
In article <Pine.GSO.4.21.0008161434050.7730-
100000@sandman.ucdavis.edu>,
Alan Hopper <aahopper@mailbox.ucdavis.edu> wrote:
> I am trying a very simple script using the Net::Ping module.
> Whenever I use a hostname this command works fine:
>
> $p = Net::Ping->new();
> print "Found $host\n" if $p->ping($host);
>
> but if I use an ip address it does not work:
>
> $p = Net::Ping->new();
> print "Found $host\n" if $p->ping("xxx.xxx.xxx.xxx");
I don't get a response from either of these.
> The documentation for Net::Ping says that both a hostname and an ip
> address are valid.
Yup.
> Inside the Net::Ping module I found that the function inet_aton was
> called to tranlate the ip address into something useful. According to
> what I see everything should work.
> Any suggestions on what is wrong or where I can look?
Net::Ping uses udp echo if you don't specify a protocol. Not all
hosts support udp echo. _Nothing_ on my network here responds to it.
Using the name or the IP address shouldn't make a difference, though.
What most people mean by ping is an ICMP echo. If you want to use this
you need to tell Net::Ping. Try this:
#!/usr/bin/perl -w
use Net::Ping;
die "need something to ping\n" unless $ARGV[0];
$p = Net::Ping->new("icmp",1);
if ($p->ping($ARGV[0])) {
print "$ARGV[0] responds \n";
} else {
print "no response from $ARGV[0].\n";
}
There is one gotcha with this. Access to ICMP requires root-equivalent
access. Under NT, this means you will need local administrator
privilege on your PC.
HTH
--
Scott Kirk
My deja.com mailbox is full of spam. Use this instead:
perl -e '$_ = "znvygb: haqretebax\@lnubb.pbz";
tr/A-Za-z/N-ZA-Mn-za-m/; print;'
--
Scott Kirk
My deja.com mailbox is full of spam. Use this instead:
perl -e '$_ = "znvygb: haqretebax\@lnubb.pbz";
tr/A-Za-z/N-ZA-Mn-za-m/; print;'
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 17 Aug 2000 12:55:46 +0200
From: Murat Uenalan <murat.uenalan@sietec.de>
Subject: Re: ANNOUNCE : AI::NeuralNet::BackProp v 0.89
Message-Id: <399BC4B2.71DC3309@sietec.de>
Great!,
but could you be so kind send such posts to
comp.lang.perl.announce
or
com.lang.perl.modules
Even your work is perhaps appreciable and you should keep on developing.
Thank you,
M. UEnalan
------------------------------
Date: 17 Aug 2000 07:37:59 GMT
From: "Josiah Bryan" <jdb@wcoil.com>
Subject: ANNOUNCE: AI::NeuralNet::BackProp v 0.89
Message-Id: <spno5r44r5j114@corp.supernews.com>
Greetings Perlfolk:
Announcing the release of:
AI::NeuralNet::BackProp, version 0.89
You can download the latest version from: (** recomended download URL **)
http://www.josiah.countystart.com/modules/AI/cgi-bin/rec.pl?comp.lang.perl.a
nnounce
It is also available on your favorite CPAN mirror:
file: $CPAN/authors/id/J/JB/JBRYAN/AI-NeuralNet-BackProp-0.89.zip
size: 52051 bytes
** What is this?
AI::NeuralNet::BackProp is a simply back-propagation,
feed-foward neural network designed in Perl to learn using
a generalization of the Delta rule and a bit of Hopefield
theory.
** What's new?
>From the POD:
This is version 0.89. In this version I have included a
new feature, output range limits, as well as automatic
crunching of run() and learn*() inputs. Included in the
examples directory are seven new practical-use example
scripts. Also implemented in this version is a much cleaner
learning function for individual neurons which is more
accurate than previous verions and is based on the LMS
rule. See range() for information on output range limits.
I have also updated the load() and save() methods so that
they do not depend on Storable anymore. In this version you
also have the choice between three network topologies, two
not as stable, and the third is the default which has been
in use for the previous four versions.
Checkout the nifty HTML-format docs in "docs.htm"
** What do you think?
Now I know you people are out there that are using the module...
I can hear the fists hitting the keyboards in frustration. :-) Relieve
some of that frustration by e-mailing me and letting me know what
you think of the module and any suggestions you got. Especially you
guys in HP Labs and at Xerox! :-)
Use it, let me know what you all think. This is just a
groud-up write of a neural network, no code stolen or
anything else. It uses the -IDEA- of back-propagation
for error correction, with the -IDEA- of the delta
rule and hopefield theory, as I understand them. So, don't expect
a classicist view of nerual networking here. I simply wrote
from operating theory, not math theory. Any die-hard neural
networking gurus out there? Let me know how far off I am with
this code! :-)
Regards,
~ josiah
--
Josiah Bryan
VP of Product Development
TDCJ, Inc.
"Anything is possible."
vp@tdcj.com
http://www.josiah.countystart.com/
Tel: 937.316.6256
------------------------------
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 V9 Issue 4042
**************************************