#! /usr/local/bin/perl -wl

use strict;
use CPANPLUS::Backend;

my $cb = CPANPLUS::Backend->new;

for my $dist( @ARGV ) {
    my $res = $cb->search(
        type  => 'module',
        allow => [],
        data  => [qr/$dist/],
    );
    use Data::Dumper;
    print Dumper($res);
}

##</code><code>##

Can't locate object method "module" via package "Regexp" at /usr/local/lib/perl5/site_perl/5.8.7/CPANPLUS/Internals/Search.pm line 166.