File Coverage

blib/lib/AnyEvent/FTP/Client/Site/Proftpd.pm
Criterion Covered Total %
statement 11 20 55.0
branch n/a
condition n/a
subroutine 4 13 30.7
pod 7 9 77.7
total 22 42 52.3


line stmt bran cond sub pod time code
1             package AnyEvent::FTP::Client::Site::Proftpd;
2              
3 2     2   845 use strict;
  2         4  
  2         62  
4 2     2   11 use warnings;
  2         4  
  2         45  
5 2     2   33 use 5.010;
  2         7  
6 2     2   565 use Moo;
  2         11832  
  2         13  
7              
8             extends 'AnyEvent::FTP::Client::Site::Base';
9              
10             # ABSTRACT: Site specific commands for Proftpd
11             our $VERSION = '0.17'; # VERSION
12              
13              
14 0     0 1   sub utime { shift->client->push_command([SITE => "UTIME $_[0] $_[1]"] ) }
15 0     0 1   sub mkdir { shift->client->push_command([SITE => "MKDIR $_[0]"] ) }
16 0     0 1   sub rmdir { shift->client->push_command([SITE => "RMDIR $_[0]"] ) }
17 0     0 1   sub symlink { shift->client->push_command([SITE => "SYMLINK $_[0] $_[1]"] ) }
18              
19              
20 0     0 1   sub ratio { shift->client->push_command([SITE => "RATIO"] ) }
21 0     0 0   sub quota { shift->client->push_command([SITE => "QUOTA"] ) }
22 0     0 1   sub help { shift->client->push_command([SITE => "HELP $_[0]"] ) }
23 0     0 1   sub chgrp { shift->client->push_command([SITE => "CHGRP $_[0] $_[1]"] ) }
24 0     0 0   sub chmod { shift->client->push_command([SITE => "CHMOD $_[0] $_[1]"] ) }
25              
26             1;
27              
28             __END__