/usr/share/perl5/Module/CPANfile/Requirement.pm is in libmodule-cpanfile-perl 1.1002-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 | package Module::CPANfile::Requirement;
use strict;
sub new {
my ($class, %args) = @_;
$args{version} ||= 0;
bless +{
name => delete $args{name},
version => delete $args{version},
options => \%args,
}, $class;
}
sub name { $_[0]->{name} }
sub version { $_[0]->{version} }
sub options { $_[0]->{options} }
sub has_options {
keys %{$_[0]->{options}} > 0;
}
1;
|