for ($vorn, $mitte, $hinten) { $_ = '' unless defined; }    s~^\s+|\s+$~~ for ($vorn, $mitte, $hinten);