/usr/share/perl5/Catalyst/Base.pm is in libcatalyst-perl 5.90115-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 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 | package Catalyst::Base;
use Moose;
BEGIN { extends 'Catalyst::Controller' }
after 'BUILD' => sub {
my $self = shift;
warn(ref($self) . " is using the deprecated Catalyst::Base, update your application as this will be removed in the next major release");
};
no Moose;
__PACKAGE__->meta->make_immutable;
1;
__END__
=head1 NAME
Catalyst::Base - Deprecated base class
=head1 DESCRIPTION
This used to be the base class for Catalyst Controllers. It
remains here for compatibility reasons, but its use is highly deprecated.
If your application produces a warning, then please update your application to
inherit from L<Catalyst::Controller> instead.
=head1 SEE ALSO
L<Catalyst>, L<Catalyst::Controller>.
=head1 AUTHORS
Catalyst Contributors, see Catalyst.pm
=head1 COPYRIGHT
This library is free software. You can redistribute it and/or modify it under
the same terms as Perl itself.
=cut
|