But be careful, / / and ' ' are not the same thing for split:

use feature 'say';
my $x = "a\tb\tc";
say for split ' ', $x;
say for split / /, $x;
[download]