for (qw/1 2 3/){
  print S$_ "meinzeug";
}