Retire a document Dokument deaktivieren
Remove a document from the knowledge base Dokument aus der Knowledge Base entfernen
Promote document retirement Dokument deaktivieren
Document Expired Dokument abgelaufen
####
use strict;
use warnings;
open (FILE, "extract_tab.txt") or die "$!\n";
my %hash;
while (my $line = ) {
chomp($line);
my ($enu, $deu) = split /\t/, $line;
$hash{$enu} = $deu;
}
for my $key (keys %hash) {
print "$key\n";
}
for my $value (values %hash) {
print "$value\n";
}
####
#my %seen;
for my $key (keys %hash) {
my $value_key = "@{[values %{$hash{$key}}]}";
#print "$value_key\n";
}