regex2 => sub { my $tmp = $val; $val = join (" ",split " ",$val); },