diff --git a/PBot/Interpreter.pm b/PBot/Interpreter.pm index 705bcf8d..f12467d6 100644 --- a/PBot/Interpreter.pm +++ b/PBot/Interpreter.pm @@ -17,6 +17,7 @@ use base 'PBot::Registerable'; use Time::HiRes qw/gettimeofday/; use Time::Duration; use Text::Balanced qw/extract_bracketed extract_quotelike/; +use Text::ParseWords; use Carp (); use PBot::Utils::ValidateString; @@ -341,7 +342,7 @@ sub interpret { sub make_args { my ($self, $string) = @_; - my @args = split / /, $string; + my @args = parse_line(' ', 1, $string); my @arglist; my @arglist_quotes;