File Coverage

blib/lib/Alien/Role/Dino/linux.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package Alien::Role::Dino::linux;
2              
3 3     3   892 use strict;
  3         6  
  3         88  
4 3     3   15 use warnings;
  3         6  
  3         60  
5 3     3   51 use 5.008001;
  3         11  
6 3     3   15 use Role::Tiny;
  3         5  
  3         14  
7              
8             requires 'libs';
9             requires 'rpath';
10              
11             around libs => sub {
12             my($orig, $self) = @_;
13             join(' ', (map { "-Wl,-rpath,$_" } $self->rpath), $orig->($self));
14             };
15              
16             1;
17              
18             __END__