Select Code to Download

#!/usr/bin/perl -l

use strict;
...
        print Dumper( $d->dslip_status );
    } 
}

#!/usr/bin/perl -l

...
foreach $d (CPAN::Shell->expand("Module", $d)) { 
    print Dumper( $d->dslip_status );
}