Select Code to Download

$ perl -E'say join ":", split "", "abc def"'
a:b:c: :d:e:f

$ perl -E'say join ":", split " ", "abc def"'
abc:def

my $dirs = `ls -d *`;
my @dirs = split ' ', $dirs;

chomp( my @dirs = `ls -d *` );