view release on metacpan or  search on metacpan

Makefile.PL  view on Meta::CPAN

# Add GPIB::ni interface for National Instruments GPIB cards using NI driver.
# This XS module builds on both Linux and NT (I'm so proud).
push(@interfaces, 'ni');

# Add GPIB::rmt interface for remote TCP/IP access to devices
push(@interfaces, 'rmt');

# Add hpserial interface on Linux machines.  This should work on other
# Unix machines, but your mileage may vary
push(@interfaces, 'hpserial') if $^O =~ /linux/;

# Add GPIB::llp interface on Linux machines.
# This seems to be obsolete.  Code for the llp drivers is still here
# but it's probably suffering from bit rot.
#
# push(@interfaces, 'llp') if $^O =~ /linux/;

# Check for missing modules
@missing = ();

# Look for MD5
eval "use MD5;";
if ($@) {
    push @missing, 'MD5';
    print <<'MSG';
        The MD5 module is not installed.  This module is used for
        authentication of remote GPIB connections.

MSG
}

# Look for Storable
eval "use Storable;";
if ($@) {
    push @missing, 'Storable';
    print <<'MSG';
        The Storable module is not installed.  This module is used for
        remote GPIB connections.

MSG
}

if (@missing) {
    print <<'MSG';
        Optional modules are available from any CPAN mirror, in particular
            http://www.perl.com/CPAN/modules/by-module
            http://www.perl.org/CPAN/modules/by-module
            ftp://ftp.funet.fi/pub/languages/perl/CPAN/modules/by-module

MSG
    exit(1);
}


print "Using interfaces: @interfaces\n";
print "Using instrument drivers: @drivers\n\n"; 
WriteMakefile(
    'NAME'	    => 'GPIB',
    'DIR'           => [@interfaces, @drivers],
    'VERSION_FROM'  => 'GPIB.pm', # finds $VERSION
    ($] ge '5.005') ? (
        'AUTHOR' => 'Jeff Mock (jeff@mock.com)',
        'ABSTRACT' => 'GPIB device control',
    ) : (),
);