use Test::More tests => 2;
use strict;
use_ok('Archive::Tar') or diag 'Archive::Tar not found -- exit' && die;
my $tar = new Archive::Tar;
isa_ok( $tar, 'Archive::Tar', 'Object created' );
use Test::More tests => 2;
use strict;
use_ok('Archive::Tar') or diag 'Archive::Tar not found -- exit' && die;
my $tar = new Archive::Tar;
isa_ok( $tar, 'Archive::Tar', 'Object created' );