1App::GitHooks::TerminalU(s3e)r Contributed Perl DocumentaAtpipo:n:GitHooks::Terminal(3)
2
3
4
6 App::GitHooks::Terminal - Information about the current terminal in
7 which App::GitHook is running.
8
10 Version 1.9.0
11
13 use App::GitHooks::Terminal;
14
15 my $terminal = App::GitHooks::Terminal->new();
16 my $get_encoding = $terminal->get_encoding();
17 my $get_width = $terminal->get_width();
18 my $is_interactive = $terminal->is_interactive();
19 my $is_utf8 = $terminal->is_utf8();
20
22 new()
23 Return a new "App::GitHooks::Terminal" object.
24
25 my $terminal = App::GitHooks::Terminal->new();
26
27 get_encoding()
28 Determine the current terminal's encoding.
29
30 my $get_encoding = $terminal->get_encoding();
31
32 get_width()
33 Get the width (in the number of characters) of the current terminal.
34
35 my $get_width = $terminal->get_width();
36
37 is_interactive()
38 Determine whether the current terminal is interactive or not.
39
40 my $is_interactive = $terminal->is_interactive();
41
42 is_utf8()
43 Determine if the current terminal supports utf-8.
44
45 my $is_utf8 = $terminal->is_utf8();
46
47 Optionally, you can override the utf-8 support by passing an extra
48 boolean argument:
49
50 $terminal->is_utf8(1); # Force utf-8 output.
51 $terminal->is_utf8(0); # Force non-utf-8 output.
52
54 Please report any bugs or feature requests through the web interface at
55 <https://github.com/guillaumeaubert/App-GitHooks/issues/new>. I will
56 be notified, and then you'll automatically be notified of progress on
57 your bug as I make changes.
58
60 You can find documentation for this module with the perldoc command.
61
62 perldoc App::GitHooks::Terminal
63
64 You can also look for information at:
65
66 · GitHub's request tracker
67
68 <https://github.com/guillaumeaubert/App-GitHooks/issues>
69
70 · AnnoCPAN: Annotated CPAN documentation
71
72 <http://annocpan.org/dist/app-githooks>
73
74 · CPAN Ratings
75
76 <http://cpanratings.perl.org/d/app-githooks>
77
78 · MetaCPAN
79
80 <https://metacpan.org/release/App-GitHooks>
81
83 Guillaume Aubert <https://metacpan.org/author/AUBERTG>, "<aubertg at
84 cpan.org>".
85
87 Copyright 2013-2017 Guillaume Aubert.
88
89 This code is free software; you can redistribute it and/or modify it
90 under the same terms as Perl 5 itself.
91
92 This program is distributed in the hope that it will be useful, but
93 WITHOUT ANY WARRANTY; without even the implied warranty of
94 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the LICENSE
95 file for more details.
96
97
98
99perl v5.28.0 2018-07-14 App::GitHooks::Terminal(3)