#!/usr/bin/perl -w

use Test::Simple tests => 2;

use Filesys::SmbClientParser;

my $ical = Filesys::SmbClientParser->new;         # create an object
ok( defined $ical,"defined instance" );         # check that we got something
ok( $ical->isa('Filesys::SmbClientParser'),
  'Filesys::SmbClientParser instance');     # and it's the right class