PXElator/t/config.t

#!/usr/bin/perl

use warnings;
use strict;
use autodie;

use Test::More tests => 3;
use Data::Dump qw/dump/;

use_ok 'config';

ok( my $test = config::shared( 'test', 42 ), 'set shared' );
diag $test;
cmp_ok( $test, '==', config::shared( 'test' ), 'get shared' );

1	#!/usr/bin/perl
2
3	use warnings;
4	use strict;
5	use autodie;
6
7	use Test::More tests => 3;
8	use Data::Dump qw/dump/;
9
10	use_ok 'config';
11
12	ok( my $test = config::shared( 'test', 42 ), 'set shared' );
13	diag $test;
14	cmp_ok( $test, '==', config::shared( 'test' ), 'get shared' );
15