my $zeile = 'irgend was mit 70 Leerzeichen...';
my @wanted = (split(/\s/,$zeile))[10,20,45];