/usr/lib/perl5/Ogre/Exception.pm is in libogre-perl 0.60-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 | package Ogre::Exception;
use strict;
use warnings;
########## GENERATED CONSTANTS BEGIN
require Exporter;
unshift @Ogre::Exception::ISA, 'Exporter';
our %EXPORT_TAGS = (
'ExceptionCodes' => [qw(
ERR_CANNOT_WRITE_TO_FILE
ERR_INVALID_STATE
ERR_INVALIDPARAMS
ERR_RENDERINGAPI_ERROR
ERR_DUPLICATE_ITEM
ERR_ITEM_NOT_FOUND
ERR_FILE_NOT_FOUND
ERR_INTERNAL_ERROR
ERR_RT_ASSERTION_FAILED
ERR_NOT_IMPLEMENTED
)],
);
$EXPORT_TAGS{'all'} = [ map { @{ $EXPORT_TAGS{$_} } } keys %EXPORT_TAGS ];
our @EXPORT_OK = @{ $EXPORT_TAGS{'all'} };
our @EXPORT = ();
########## GENERATED CONSTANTS END
1;
__END__
|