Skip to content

Commit d896670

Browse files
author
Dennis Boone
committed
split() was creating null tokens if the string contained leading whitespace.
Using the new special syntax suppresses them.
1 parent 1723db8 commit d896670

1 file changed

Lines changed: 1 addition & 1 deletion

File tree

MrShell.pm

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -38,7 +38,7 @@ sub _process_space_delimited {
3838
$that = $rem;
3939

4040
} else {
41-
my ($tok, $rem) = split m/\s+/, $that, 2;
41+
my ($tok, $rem) = split ' ', $that, 2;
4242

4343
push @output, $tok;
4444
$that = $rem;

0 commit comments

Comments
 (0)