split option string by whitespace

diff --git a/lib/Module/Install/Catalyst.pm b/lib/Module/Install/Catalyst.pm
index 2dfae94..06f9cc8 100644 (file)
--- a/lib/Module/Install/Catalyst.pm
+++ b/lib/Module/Install/Catalyst.pm
@@ -222,7 +222,7 @@ sub catalyst_par_options {
         my $p = Getopt::Long::Parser->new(config => ['no_ignore_case']);
         my %o;
         {
-            local @ARGV = $optstring;
+            local @ARGV = split ' ', $optstring;
             $p->getoptions(\%o, PAR::Packer->options);
         }
         %PAROPTS = ( %PAROPTS, %o);