This file is indexed.

/usr/bin/adzapper2konq is in adzapper 20090301.dfsg.1-0.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
19
20
21
22
23
24
#!/usr/bin/perl -w
#
# Adzapper to RE for Konqueror AdBlocK.
#
# Ludovic Drolez. Public domain.
#

open FH, "/usr/bin/adzapper";
while(<FH>) {
    /([^ ]+) (.*)/;
    if ($1 eq "AD" || $1 eq "ADSWF") {
	$_ = $2;
	s/\./\\./g;
	s/\*\*?/.*/g;
	s/\//\\\//g;
	s/\?([^)]+$)/\\\?$1/;
	print "/$_/\n";
	#my $test = "http://st.msn.com/as/wea3/i/fr/saw/28.gif";
	#if ($test =~ /$_/) {
	#    print "!! $_ \n";
	#}
    }
}
close FH;