view release on metacpan or  search on metacpan

t/00-sanity.t  view on Meta::CPAN

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#!/usr/bin/perl
 
use strict;
use warnings;
use Config;
use Test::More;
use lib 'inc';
 
use_ok( 'Alien::Hush' );
 
my $hush_version= $Alien::Hush::HUSH_VERSION;
my $arch        = $Config{archname};
diag( "Testing Alien::Hush $Alien::Hush::VERSION with hush $hush_version on $arch, Perl ($^X) $]" );
 
ok($hush_version, "Hush version is defined");
 
done_testing;