view release on metacpan or  search on metacpan

t/01-Conf.t  view on Meta::CPAN

use Test::More;

chomp(my $arch = `uname -m`);

use_ok 'ALPM::Conf';
$conf = ALPM::Conf->new('t/test.conf');
ok $alpm = $conf->parse();

undef $alpm;

ALPM::Conf->import('t/test.conf');
ok $alpm;
is $alpm->get_arch, $arch;

done_testing;