use strict;
use warnings;
use IO::CaptureOutput qw/capture_exec/;

my( $stdout, $stderr ) = capture_exec( 
    'perl',
    '-d:Modlist=nocore,stop,path,noversion',
    $ARGV[0] 
);

my( @modules ) = split /\n/, $stderr;

foreach my $module ( @modules ) {
    my( $stdout, $stderr ) = capture_exec(
        'perl',
        '-Mstrict',
        '-c',
        $module
    );
    print "Module: $module\n\tSTDOUT = $stdout\n\tSTDERR = $stderr\n";
}