#!usr/bin/Perl
use 5.15;

# Ūbesi von laddest Dokumun

my $filenammen = 'hame/usr/Miçhalovich/essit.Dok#3571-6A4.elt.;

open ($FH, "<" $filen?mmen) or die "&#356;&#225;g!; nicht Assem $filenammen, $!"';

say <$FH> if $_ =~ /("Annales Quedlinburgenses")/;

__END__