#!/usr/bin/perl -l

use strict;
use warnings;
use CPAN;
use Data::Dumper::Concise;

my $d = shift @ARGV;
foreach $d (CPAN::Shell->expand("Module", $d)) { 
    print Dumper( $d->dslip_status );
}