Zach,
I saw in the Wiki you're taking a swing at Net::Ping. Barring
anything else, I'd saw your first cut should be a bunch of can_ok()
tests. Check new(), ping(), close(). Also a can_ok('main',
'pingecho') to make sure pingecho got exported.
Then check that new returns an object with isa_ok(). Check that the
'tcp', 'udp' and 'icmp' protocols all work. Check that it fails when
you hand it garbage.
There's also a private method that can be tested. checksum().
Do that much and release it (CCing [EMAIL PROTECTED]). It's the easy
parts, but it's a start.
--
Michael G. Schwern <[EMAIL PROTECTED]> http://www.pobox.com/~schwern/
Perl6 Quality Assurance <[EMAIL PROTECTED]> Kwalitee Is Job One
Let's leave my ass out of this, shall we?
