1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
package Carton::Dependency; use strict; use Class::Tiny { module => undef, requirement => undef, dist => undef, }; sub requirements { shift->dist->requirements(@_) } sub distname { my $self = shift; $self->dist->name; } sub version { my $self = shift; $self->dist->version_for($self->module); } 1;