print "D:"; for (qq{ab cd}) { print /(\S+)/g || die; } print "\n";