package Test::Siebel::Srvrmgr::ListParser::Output::Tabular::Struct::Fixed;

use Test::Most;
use parent 'Test::Siebel::Srvrmgr::ListParser::Output::Tabular::Struct';

sub get_to_unpack {

    return
      'siebel1  FSMSrvr         File System Manager                           ';

}

sub class_methods : Tests(+3) {

    my $test = shift;

    $test->SUPER::class_methods( [qw(get_fields_pattern _set_fields_pattern)] );

    ok(
        $test->get_struct()->define_fields_pattern(
'-------  --------------  --------------------------------------------  '
        ),
        'define_fields_pattern returns true'
    );

    is_deeply(
        $test->get_struct()->get_fields( $test->get_to_unpack() ),
        [ 'siebel1', 'FSMSrvr', 'File System Manager' ],
        'get_fields returns an array reference with the correct fields'
    );

    is(
        $test->get_struct()->get_header_regex(),
        join( $test->get_sep(), @{ $test->get_cols() } ),
        'get_header_regex returns the correct value'
    );

}

1;