1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
|
=pod
=for comment
DO NOT EDIT. This Pod was generated by Swim v0.1.48.
See http://github.com/ingydotnet/swim-pm#readme
=encoding utf8
=head1 Name
Test::More - TAP Testing for Bash
=for html
<a href="https://travis-ci.org/ingydotnet/test-more-bash"><img src="https://travis-ci.org/ingydotnet/test-more-bash.png" alt="test-more-bash"></a>
=head1 Synopsis
Write a test file like this. Maybe call it C<test/test.t>:
#!/usr/bin/env bash
TEST_MORE_PATH="/path/to/test-more-bash"
BASHLIB="`
find $TEST_MORE_PATH -type d |
grep -E '/(bin|lib)$' |
xargs -n1 printf "%s:"`"
PATH="$BASHLIB$PATH"
source bash+ :std
use Test::More
plan tests 8
some-command
ok $? 'some-command is ok'
# or:
ok "`some-command`" 'some-command is ok'
pass 'This will always pass'
fail 'This will always fail'
is `echo foo` 'foo' 'foo is foo'
isnt foo bar "foo isn't bar"
like food foo 'food is like foo'
unlike team I "There's no 'I' in 'team'"
diag "A message for stderr"
note "A message for stdout"
output=( $(ls) )
expected=(README lib bin)
cmp-array output expected "list files"
Run the test with C<prove> like this:
prove test/test.t
Prove knows it's Bash from the first line (the hashbang), and it just works.
=head1 Description
Test::More is the tried and true testing library for Perl. It uses TAP (the
Test Anything Protocol). This is the same thing for Bash. For the most part it
should work exactly the same.
=head1 Methods
This is the basic usage:
=over
=item * C<plan tests $count>
=item * C<ok $status_code "$label">
=item * C<pass "$label">
=item * C<fail "$label">
=item * C<is "$got" "$want" "label">
=item * C<isnt "$got" "$unwanted" "$label">
=item * C<like "$got" "$regex" "$label">
=item * C<unlike "$got" "$regex" "$label">
=item * C<diag "$message">
=item * C<note "$message">
=item * C<done_testing $count>
=item * C<plan skip_all "$reason">
=item * C<BAIL_OUT "$reason">
=item * `cmp-array output expected "message"
=back
More detailed info coming soon.
=head1 Author
Ingy döt Net <ingy@ingy.net>
=head1 Copyright & License
Copyright 2013-2020. Ingy döt Net.
The MIT License (MIT)
=cut
|
