/usr/share/perl5/Debconf/Gettext.pm is in debconf 1.5.56+deb8u1.
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 | #!/usr/bin/perl -w
# This file was preprocessed, do not edit!
package Debconf::Gettext;
use strict;
BEGIN {
eval 'use Locale::gettext';
if ($@) {
eval q{
sub gettext {
return shift;
}
};
}
else {
textdomain('debconf');
}
}
use base qw(Exporter);
our @EXPORT=qw(gettext);
1
|