This file is indexed.

/usr/share/latex2html/styles/supertabular.perl is in latex2html 2008-debian1-10.

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
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
# supertabular.perl by Denis Koelewijn
#
# Extension to LaTeX2HTML supply support for the "supertabular"
# LaTeX style, as described in "The LaTeX Companion," by
# Goossens, Mittelbach and Samarin (ISBN 0-201-54199-8). 
#
# Change Log:
# ===========

package main;
#
#  Translate the supertabular environment as
#  an ordinary table.
#
#

sub do_env_supertabular {
#   local($_) = @_;
#   &process_environment("tabular", $global{'max_id'}++);
    &do_env_tabular(@_);
    }

sub do_cmd_tablecaption {
    local($_) = @_;
    local($contents);
    local($cap_env, $captions, $cap_anchors) = ('table','','');
    $contents = &missing_braces unless (
        (s/$next_pair_pr_rx/$contents = $&;''/e)
        ||(s/$next_pair_rx/$contents = $&;''/e));
    $contents = "\\caption". $contents;
    &extract_captions;
    $TABLE_CAPTION = $cap_anchors.$captions;
    $_;
}

sub do_cmd_tablehead {
    local($_) = @_;
    local($text);
    $text = &missing_braces unless (
        (s/$next_pair_pr_rx/$text = $2;''/e)
        ||(s/$next_pair_rx/$text = $2;''/e));
    $TABLE_TITLE_TEXT = $text unless ($TABLE_TITLE_TEXT);
    $_;
}

sub do_cmd_tablefirsthead {
    local($_) = @_;
    local($text);
    $text = &missing_braces unless (
        (s/$next_pair_pr_rx/$text = $2;''/e)
        ||(s/$next_pair_rx/$text = $2;''/e));
    $TABLE_TITLE_TEXT = $text;
    $_;
}

sub do_cmd_tabletail {
    local($_) = @_;
    local($text);
    $text = &missing_braces unless (
        (s/$next_pair_pr_rx/$text = $2;''/e)
        ||(s/$next_pair_rx/$text = $2;''/e));
    $TABLE_TAIL_TEXT = $text unless ($TABLE_TAIL_TEXT);
    $_;
}

sub do_cmd_tablelasttail {
    local($_) = @_;
    local($text);
    $text = &missing_braces unless (
        (s/$next_pair_pr_rx/$text = $2;''/e)
        ||(s/$next_pair_rx/$text = $2;''/e));
    $TABLE_TAIL_TEXT = $text;
    $_;
}


&process_commands_wrap_deferred( <<_RAW_ARG_CMDS_);
tablecaption # {}
tablehead # {}
tabletail # {}
tablefirsthead # {}
tablelasttail # {}
_RAW_ARG_CMDS_

1;                              # This must be the last line