my $zeile = "a b c "; # oder Var. 2: " a b c " my @array = split( /[ \t]+/ , $zeile ); foreach( @array ) { print( $_.":" ) }