1
 2
 3
 4
 5
 6
 7
 8
 9
10

# On convertit le lancement de TreeTagger en procédure:
sub invocation1_TT # Première invocation.
{
	system("perl5.28.1.exe tokenise_utf8_edited.pl -f temp_tt.txt | tree-tagger.exe -token -lemma -no-unknown french-utf8.par > temp_tag.txt" );
}

sub invocation2_TT # Deuxième invocation.
{
	system("perl5.28.1.exe treetagger2xml_utf8_edited.pl temp_tag.txt utf8");
}