1Test::Run::Straps(3) User Contributed Perl Documentation Test::Run::Straps(3)
2
3
4
6 Test::Run::Straps - analyse the test results by using TAP::Parser.
7
9 my $strap = Test::Run::Straps->new();
10 Initialize a new strap.
11
12 $strap->_inc_seen_header()
13 Increment the _seen_header field. Used by Test::Run::Core.
14
15 $self->_handle_event()
16 Handles the current event according to the list of types in the
17 cascade. It checks each type and if matches calls the appropriate
18 "_handle_${type}_event" callback. Returns the type of the event that
19 matched.
20
21 my $results = $self->analyze( $name, \@output_lines)
22 Analyzes the output @output_lines of a given test, to which the name
23 $name is assigned. Returns the results $results of the test - an object
24 of type Test::Run::Straps::StrapsTotalsObj .
25
26 @output_lines should be the output of the test including newlines.
27
28 $strap->analyze_fh()
29 Analyzes a TAP stream based on the TAP::Parser from
30 $self->_create_parser().
31
32 $strap->analyze_file($filename)
33 Runs and analyzes the program file $filename. It will also use it as
34 the name in the final report.
35
36 $strap->_filtered_INC(\@inc)
37 Filters @inc so it will fit into the environment of some operating
38 systems which limit it (such as VMS).
39
40 [@filtered] = $strap->_clean_switches(\@switches)
41 Returns trimmed and blank-filtered switches from the user.
42
43 $self->_command()
44 Returns the command (the command-line executable) that will run the
45 test along with _switches().
46
47 Normally returns $^X, but can be over-rided using the
48 "Test_Interpreter" accessor.
49
50 This method can be over-rided in custom test harnesses in order to run
51 using different TAP producers than Perl.
52
53 $strap->_restore_PERL5LIB()
54 Restores the old value of PERL5LIB. This is necessary on VMS. Does not
55 do anything on other platforms.
56
57 $self->_reset_file_state()
58 Reset some fields so it will be ready to process the next file.
59
60 $self->_switches()
61 Calculates and returns the switches necessary to run the test.
62
63 local $ENV{PERL5LIB} = $self->_INC2PERL5LIB()
64 Takes the calculated library paths for running the test scripts and
65 returns it as something that one can assign to the PERL5LIB environment
66 variable.
67
69 This file is licensed under the MIT X11 License:
70
71 http://www.opensource.org/licenses/mit-license.php
72
74 Shlomi Fish, <http://www.shlomifish.org/> .
75
76
77
78perl v5.32.1 2021-01-27 Test::Run::Straps(3)