1Test::Smoke::LogMixin(3U)ser Contributed Perl DocumentatiToenst::Smoke::LogMixin(3)
2
3
4
5 $app->verbosity
6 Return the verbosity of this app.
7
8 Arguments
9
10 None.
11
12 Returns
13
14 The value of either "_verbose" or "_v"
15
16 $app->log_warn($fmt, @values)
17 "prinf $fmt, @values" to the currently selected filehandle.
18
19 Arguments
20
21 Positional.
22
23 $fmt => a (s)printf format
24 The format gets an extra new line if one wasn't present.
25
26 @values => optional vaules for the template.
27
28 Returns
29
30 use in void context.
31
32 Exceptions
33
34 None.
35
36 $app->log_info($fmt, @values)
37 "prinf $fmt, @values" to the currently selected filehandle if the
38 'verbose' option is set.
39
40 Arguments
41
42 Positional.
43
44 $fmt => a (s)printf format
45 The format gets an extra new line if one wasn't present.
46
47 @values => optional vaules for the template.
48
49 Returns
50
51 use in void context.
52
53 Exceptions
54
55 None.
56
57 $app->log_debug($fmt, @values)
58 "prinf $fmt, @values" to the currently selected filehandle if the
59 'verbose' option is set to a value > 1.
60
61 Arguments
62
63 Positional.
64
65 $fmt => a (s)printf format
66 The format gets an extra new line if one wasn't present.
67
68 @values => optional vaules for the template.
69
70 Returns
71
72 use in void context.
73
74 Exceptions
75
76 None.
77
79 Test::Smoke::Logger - Helper object for logging.
80
82 use Test::Smoke::LogMixin;
83 my $logger = Test::Smoke::Logger->new(v => 1);
84 $logger->log_warn("Minimal log level"); # v >= 0
85 $logger->log_info("Medium log level"); # v <= 1
86 $logger->log_debug("High log level"); # v > 1
87
89 Test::Smoke::Logger->new(%arguments)
90 Return a logger instance.
91
92 Arguments
93
94 Named, hash:
95
96 v => <0|1|2>
97
98 Returns
99
100 The Test::Smoke::Logger instance.
101
102
103
104perl v5.28.1 2017-03-06 Test::Smoke::LogMixin(3)