/usr/share/perl5/Tangram/Schema/ClassHash.pm is in libtangram-perl 2.12-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 | package Tangram::Schema::ClassHash;
use strict;
use strict;
use Carp;
# XXX - not reached by test suite
sub class
{
my ($self, $class) = @_;
$self->{$class} or croak "unknown class '$class'";
}
1;
|