map length($_) ? $_ : ($_, $_), split /:/, 'ab::c'