require "auxcrypt.pl";

$text = &gettext;
print $text;
if ($text =~/([BHIJKLMPSUZ][BCEFLMNOPQRSTUVX][ADEFHJKLNOQRY][BCEFLMNOPQRSTUVX][ABDEIMNOQRUXZ][BCEFLMNOPQRSTUVX][ACEFKMNRSXVZ][ADEGHJQRSTUVXY])/)
  {print "Treffer $1\n";}
else {print "Kein Treffer\n";}
