Permalink
Browse files

split() was creating null tokens if the string contained leading whit…

…espace.

Using the new special syntax suppresses them.
  • Loading branch information...
1 parent 1723db8 commit d896670b27e93b50ae1ab0a5fde18ea714fffc8d Dennis Boone committed Jan 7, 2010
Showing with 1 addition and 1 deletion.
  1. +1 −1 MrShell.pm
View
@@ -38,7 +38,7 @@ sub _process_space_delimited {
$that = $rem;
} else {
- my ($tok, $rem) = split m/\s+/, $that, 2;
+ my ($tok, $rem) = split ' ', $that, 2;
push @output, $tok;
$that = $rem;

0 comments on commit d896670

Please sign in to comment.