The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use lib 't';
use Test::Siebel::Srvrmgr::ListParser::Output::Tabular;

my $fixed_test =
  Test::Siebel::Srvrmgr::ListParser::Output::Tabular->new(
    {
        structure_type => 'fixed',
        output_file    => [ 't', 'output', 'fixed', 'list_comp.txt' ]
    }
  );

Test::Class->runtests($fixed_test);