| line |
true |
false |
branch |
|
29
|
0 |
0 |
unless $self->redis_conn |
|
40
|
0 |
0 |
if $script_dir_to_set |
|
50
|
0 |
0 |
if $args{'script_dir'} |
|
52
|
0 |
0 |
if ($self->script_dir) { } |
|
64
|
0 |
0 |
ref $script ? : |
|
66
|
0 |
0 |
if exists $self->{'_script_cache'}{$script_name} |
|
72
|
0 |
0 |
unless (eval {
do {
$sha = $self->redis_conn->script_load($$script_ref);
1
}
}) |
|
86
|
0 |
0 |
unless $sha |
|
90
|
0 |
0 |
$args ? : |
|
92
|
0 |
0 |
unless (eval {
do {
$return = $conn->evalsha($sha, $args ? @$args : 0);
1
}
}) |
|
101
|
0 |
0 |
unless open my $fh, '<', 'File::Spec'->catdir($self->script_dir, $path_to_file) |
|
120
|
0 |
0 |
unless (eval {
do {
$self->redis_conn->script_flush;
1
}
}) |