I've just released Test::Ping version 0.09 which has a fully ported version of the Net::Ping testing suite. Basically I took all the tests from it, rewrote them to use Test::More and Test::More's functions (SKIP, TODO, etc.) and Test::Ping instead of Net::Ping. I thought it might be a time to write some of the things I have on my mind right about now.
I started Test::Ping on Apr 22nd, exactly one week ago, and I think I've already reached the high point in the functionality of it, or at least what I imagine(d) it would be. I don't anticipate many (if at all) changes to Test::Ping at this point, since most changes to Net::Ping will continue to be transparently supported in Test::Ping.
The current most interesting discussion (to me) on the Perl front right now is specific Role usage situations. Ovid, Steven Little, Chris Prather, Shawn Moore and a lot of other prolific CPAN/Perl authors I admire quietly are openly discussing it and provide a lot of interesting insight into smart programming paradigms... and I'm sitting and writing a testing module that does pings that probably won't be used by many.
Here are a few reasons why I don't think this module was completely pointless:
ping_ok( '127.0.0.1', 'testing localhost' );than
my $p = Net::Ping->new(); my $alive = $p->ping('127.0.0.1'); ok( $alive, 'testing localhost' ); $p->close;
At least I didn't spend too much time over it.