#!/tools/cs/perl5/bin/perl

require 'conjtable_en.pl'; # this inits the list automatically

print "The English tense for the French 2SG-IND is: $conjtable_en::map_fr{'2SG-IND'} \n";
print "The French tense for the English 2SG-PR is: $conjtable_en::map_en{'2SG-PR'} \n";


#while (<STDIN>) {
#  chomp;
#  print $conjtable_en::lookup_table_en{$_}, "\n";
#}