in reply to Smoothing text input

$string =~ s/^\s+//;
split /\s+/, $string;

[download]
should work just fine. (updated).
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

In Section Seekers of Perl Wisdom