use strict;
use warnings;

my @arr = qw( Hallo Welt. Der Mond ist aufgegangen. );

# Nur das erste und vierte Element nutzen
print join " ",  @arr[0,3];