Data-Secs2
view release on metacpan or search on metacpan
t/Data/Secs2.pm view on Meta::CPAN
########
# The Test::STDmaker module uses the data after the __DATA__
# token to automatically generate the this file.
#
# Don't edit anything before __DATA_. Edit instead
# the data after the __DATA__ token.
#
# ANY CHANGES MADE BEFORE the __DATA__ token WILL BE LOST
#
# the next time Test::STDmaker generates this file.
#
#
=head1 TITLE PAGE
Detailed Software Test Description (STD)
for
Perl Data::Secs2 Program Module
Revision: -
Version:
Date: 2004/05/11
Prepared for: General Public
Prepared by: http://www.SoftwareDiamonds.com support@SoftwareDiamonds.com
Classification: None
=head1 SCOPE
This detail STD and the
L<General Perl Program Module (PM) STD|Test::STD::PerlSTD>
establishes the tests to verify the
requirements of Perl Program Module (PM) L<Data::Secs2|Data::Secs2>
The format of this STD is a tailored L<2167A STD DID|Docs::US_DOD::STD>.
in accordance with
L<Detail STD Format|Test::STDmaker/Detail STD Format>.
#######
#
# 4. TEST DESCRIPTIONS
#
# 4.1 Test 001
#
# ..
#
# 4.x Test x
#
#
=head1 TEST DESCRIPTIONS
The test descriptions uses a legend to
identify different aspects of a test description
in accordance with
L<STD FormDB Test Description Fields|Test::STDmaker/STD FormDB Test Description Fields>.
=head2 Test Plan
T: 34^
=head2 ok: 1
C:
use File::Package;
my $fp = 'File::Package';
use Data::Secs2 qw(arrayify config listify neuterify numberify perlify
perl_typify secsify secs_elementify stringify textify transify);
my $uut = 'Data::Secs2';
my ($loaded, $event, $big_secs2);
my $test_data1 =
'U1[1] 80
L[5]
A[0]
A[5] ARRAY
N 2
A[5] hello
N 4
';
my $test_data2 =
'U1[1] 80
L[6]
A[0]
A[4] HASH
A[4] body
A[5] hello
A[6] header
A[9] To: world
';
my $test_data3 =
'U1[1] 80
N 2
L[4]
A[0]
A[5] ARRAY
A[5] hello
A[5] world
N 512
';
my $test_data4 =
'U1[1] 80
N 2
L[6]
A[0]
A[4] HASH
A[6] header
L[6]
A[11] Class::None
A[4] HASH
A[4] From
A[6] nobody
A[2] To
( run in 0.642 second using v1.01-cache-2.11-cpan-df04353d9ac )