my $zahlen (-7 .. 7)
my $zahlen (von -7 .. -5 und von 5 .. 7)
1 2 3
for my $zahl (-7..3, 5..19){ print $zahl,"\n"; }