#!/usr/bin/perl
use warnings;
use strict;
use lib './lib','../lib';
use Test::More tests => 4;
use File::Type;
use File::Type::Builder;
my $ft = File::Type->new();
ok(defined $ft, 'new() returned something');
ok($ft->isa('File::Type'), "and it's the right class");
my $ftb = File::Type::Builder->new();
ok(defined $ftb, 'new() returned again');
ok($ftb->isa('File::Type::Builder'), "and it's the right class again");