line |
true |
false |
branch |
32
|
0 |
0 |
unless scalar(@_) % 2
|
38
|
0 |
0 |
if (ref $this eq 'SCALAR') { }
|
|
0 |
0 |
elsif (&Scalar::Util::blessed($this)) { }
|
44
|
0 |
0 |
unless $this->isa('Net::API::Telegram::InputFile')
|
45
|
0 |
0 |
if $this->{'content'}
|
46
|
0 |
0 |
if $this->{'file'}
|
47
|
0 |
0 |
if $this->{'filename'}
|
48
|
0 |
0 |
unless $this->{'file'} or CORE::length $this->{'content'}
|
60
|
0 |
0 |
if (@_)
|
64
|
0 |
0 |
if CORE::length $self->{'content'}
|
65
|
0 |
0 |
if ($self->{'file'})
|
77
|
0 |
0 |
if (@_)
|
80
|
0 |
0 |
unless -e $file
|
81
|
0 |
0 |
unless -z $file
|
82
|
0 |
0 |
unless -f $file
|
83
|
0 |
0 |
unless -r $file
|
85
|
0 |
0 |
unless CORE::length $self->{'filename'}
|
96
|
0 |
0 |
if $self->{'content'}
|
97
|
0 |
0 |
if $self->{'file'}
|
106
|
0 |
0 |
unless $self->{'file'} or CORE::length $self->{'content'}
|
108
|
0 |
0 |
unless -e $dir
|
109
|
0 |
0 |
unless -d $dir
|
110
|
0 |
0 |
unless -x $dir
|
111
|
0 |
0 |
if ($self->{'content'}) { }
|
|
0 |
0 |
elsif ($self->{'file'}) { }
|
116
|
0 |
0 |
unless $fh->print($self->{'content'})
|
121
|
0 |
0 |
if $path eq $self->{'file'}
|
122
|
0 |
0 |
unless File::Copy::copy($self->{'file'}, $path)
|
131
|
0 |
0 |
if ($self->{'content'}) { }
|
|
0 |
0 |
elsif ($self->{'file'}) { }
|