#!/usr/bin/perl

print "funkt net!"

@ARRAY = ;
@PART = @{$ARRAY [ 5..10 ]};

print "Eingelesen: @ARRAY\n";
print "5 bis 10 Zeichen: @PART\n";