#!/usr/bin/perl -w
use strict;

use SptTgtCfg;
use Test::More;

BEGIN 
{ 
  use_ok('SptTgtCfg');
}

	$SptTgtCfg = SptTgtCfg::Max_Num_Of_Interest_Mask->new(CAN11 => 4,CAN29 => 4);
	ok( defined $SptTgtCfg, 'new() returened something' );
	ok( $SptTgtCfg->isa('SptTgtCfg'), "  and it's the right class" );
	is( $SptTgtCfg->CAN11,     7,       '  CAN11()'   );
    is( $SptTgtCfg->CAN29,     2,       '  CAN29)'   );