Re: How to split, join and trim leading / leading white space

[Anonymous Monk]

Next you'll be asking why there are two spaces between bytes instead of one. Here, maybe this will help.

use Data::Dump;
my $banana = 'banana';
my @a = split /(..)/, $banana;
dd(\@a);
my @b = $banana =~ /(..)/g;
dd(\@b);
__END__
["", "ba", "", "na", "", "na"]
["ba", "na", "na"]