File Coverage

blib/lib/Tapper/Reports/Web/Controller/Tapper/Schedule.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package Tapper::Reports::Web::Controller::Tapper::Schedule;
2             our $AUTHORITY = 'cpan:TAPPER';
3             $Tapper::Reports::Web::Controller::Tapper::Schedule::VERSION = '5.0.13';
4 10     10   5500 use strict;
  10         18  
  10         299  
5 10     10   36 use warnings;
  10         16  
  10         281  
6 10     10   42 use parent 'Catalyst::Controller';
  10         13  
  10         72  
7              
8              
9              
10              
11             sub index :Path :Args(0) {
12 1     1   853 my ( $self, $c ) = @_;
13              
14 1         9900 my $body = qx(tapper queue-list -v);
15              
16 1         129 $c->response->body("<pre>
17             $body
18             </pre>");
19 10     10   1170 }
  10         18  
  10         50  
20              
21             1;
22              
23             __END__
24              
25             =pod
26              
27             =encoding UTF-8
28              
29             =head1 NAME
30              
31             Tapper::Reports::Web::Controller::Tapper::Schedule
32              
33             =head1 DESCRIPTION
34              
35             Catalyst Controller.
36              
37             =head1 NAME
38              
39             Tapper::Reports::Web::Controller::Tapper::Schedule - Catalyst Controller
40              
41             =head1 METHODS
42              
43             =head2 index
44              
45             =head1 AUTHORS
46              
47             =over 4
48              
49             =item *
50              
51             AMD OSRC Tapper Team <tapper@amd64.org>
52              
53             =item *
54              
55             Tapper Team <tapper-ops@amazon.com>
56              
57             =back
58              
59             =head1 COPYRIGHT AND LICENSE
60              
61             This software is Copyright (c) 2017 by Advanced Micro Devices, Inc..
62              
63             This is free software, licensed under:
64              
65             The (two-clause) FreeBSD License
66              
67             =cut