Slash Boxes
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

use Perl Log In

Log In

[ Create a new account ]

Monday February 14, 2005
08:40 PM

Modules I want, but don't want to write

[ #23198 ]

These module names have been on my white board for a couple of months. I'd use them if they existed, and if I had more time to think about them I might even create them myself, but they don't so I'm not. I'm not keeping them on the board either, so I'll just archive them here and forget about them.

Test::Fathom: A Test::* version of B::Fathom, where you set the score your code has to come in under (or between). Mostly for giggles.

Test::NewVersion: checks that the version of the distribution and modules you are about to upload are later than the ones you've already uploaded.

Business::ISSN: Go from ISSN to periodical name. There's not much to this module because there's really not much to do. The ISSN doesn't really mean anything other than a one-to-one mapping.

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
More | Login | Reply
Loading... please wait.
  • Lame, but workable.

    fathom_avg_cmp('Your::Module','>=',0.5,"half legible")


    package Test::Fathom;
    use base qw(Exporter); our @EXPORT = qw(fathom_avg_cmp);
    use Test::More;
    use B::Fathom;
    use List::Util qw(sum);

    sub import { shift; plan @_ }

    sub fathom_avg_cmp {
        my $package = shift;
        $f = B::Fathom->new;

        eval "require $package" or die $@;
        @scores =
            map { $f->score($_) }