This file is indexed.

/usr/bin/latex-encode is in liblatex-encode-perl 0.08-2.

This file is owned by root:root, with mode 0o755.

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
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
#!/usr/bin/perl

eval 'exec /usr/bin/perl  -S $0 ${1+"$@"}'
    if 0; # not running under some shell
# $Id: latex-encode 28 2012-08-30 20:00:09Z andrew $

use strict;

use LaTeX::Encode;
use Getopt::Long;
use Pod::Usage;

my ($list_packages, $help, $man);

GetOptions('packages' => \$list_packages,
           'help|?'   => \$help,
           'man'      => \$man)
    or pod2usage(2);

pod2usage(1) if $help;
pod2usage(-exitstatus => 0, -verbose => 2) if $man;


if ($list_packages) {
    my $text     = join(qr{}, <>);
    my $packages = {};
    latex_encode($text, $packages);
    foreach my $package (sort keys %$packages) {
        print "$package\n";
    }
}
else {
    while (<>) {
        print latex_encode($_);
    }
}

__END__

=head1 NAME

latex-encode - LaTeX-encode data 

=head1 USAGE

  latex-encode [options] <utf8-file >latex-file

=head1 OPTIONS

=over 4

=item C<-packages|-p>

rather than output the LaTeX-encoded version of the input, C<latex-encode> outputs a list
of the LaTeX packages that are required to typeset the encoded version of the input, one
package per line

=item C<-help|?>

output a help string

=item C<-man>

display the man page for latex-encode

=back

=head1 DESCRIPTION

This script converts utf-8 characters in its input to their LaTeX encodings using the
C<LaTeX::Encode> module, unless the C<-packages> option is given, in which case it outputs
a list of the LaTeX packages required to typeset the encoded bersion of the input.

=head1 DIAGNOSTICS

=head1 EXIT STATUS

=head1 CONFIGURATION

=head1 DEPENDENCIES

=head1 INCOMPATIBILITIES

=head1 BUGS AND LIMITATIONS

=head1 AUTHOR

Andrew Ford E<lt>a.ford@ford-mason.co.ukE<gt>

=head1 COPYRIGHT AND LICENSE

Copyright (C) 2012 Andrew Ford.  All Rights Reserved.

This module is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.

=cut