This file is indexed.

/usr/share/doc/libtext-tabulardisplay-perl/examples/dump-passwd.pl is in libtext-tabulardisplay-perl 1.34-1.

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
#!/usr/bin/perl -l

use strict;
use Text::TabularDisplay;

my $t = Text::TabularDisplay->new("uid", "login", "name");
local *PASSWD;

open PASSWD, "/etc/passwd"
    or die "Can't open /etc/passwd: $!";

$t->add((split /:/, $_)[2, 0, 4])
    for <PASSWD>;

close PASSWD
    or die "Can't close /etc/passwd: $!";

print $t->render;