Skip Menu |

This queue is for tickets about the ShellQuote-Any-Tiny CPAN distribution.

Report information
The Basics
Id: 123031
Status: resolved
Priority: 0/
Queue: ShellQuote-Any-Tiny

People
Owner: Nobody in particular
Requestors: CHOROBA [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: Wrong quoting of a backslash on MSWin
See http://www.perlmonks.org/?node_id=1199289 Show quoted text
>perl -MShellQuote::Any::Tiny=shell_quote -E "system $^X, '-E', 'say for @ARGV; <STDIN>', 1, shell_quote(qq(\x5c \x5c)), 2"
1 \\ \ 2 See Win32::ShellQuote for the correct output.
On Wed, 13 Sep 2017 11:56:13 GMT, CHOROBA wrote: Show quoted text
> See http://www.perlmonks.org/?node_id=1199289 >
> > perl -MShellQuote::Any::Tiny=shell_quote -E "system $^X, '-E', 'say > > for @ARGV; <STDIN>', 1, shell_quote(qq(\x5c \x5c)), 2"
> 1 > \\ \ > 2 > > See Win32::ShellQuote for the correct output.
Fixed. Now only backslash that is followed by another backslash, or the last backslash, will be escaped. Released 0.006.
From: futuramedium [...] yandex.ru
Can you please have another look at http://perlmonks.org/?node_id=1199727 On Tue Sep 19 04:33:40 2017, PERLANCAR wrote: Show quoted text
> On Wed, 13 Sep 2017 11:56:13 GMT, CHOROBA wrote:
> > See http://www.perlmonks.org/?node_id=1199289 > >
> > > perl -MShellQuote::Any::Tiny=shell_quote -E "system $^X, '-E', 'say > > > for @ARGV; <STDIN>', 1, shell_quote(qq(\x5c \x5c)), 2"
> > 1 > > \\ \ > > 2 > > > > See Win32::ShellQuote for the correct output.
> > Fixed. Now only backslash that is followed by another backslash, or > the last backslash, will be escaped. Released 0.006.
Hi Vadim, Thanks. I've applied your fix and released 0.007. On Wed, 20 Sep 2017 11:54:38 GMT, vadimr wrote: Show quoted text
> Can you please have another look at http://perlmonks.org/?node_id=1199727 > > > On Tue Sep 19 04:33:40 2017, PERLANCAR wrote:
> > On Wed, 13 Sep 2017 11:56:13 GMT, CHOROBA wrote:
> > > See http://www.perlmonks.org/?node_id=1199289 > > >
> > > > perl -MShellQuote::Any::Tiny=shell_quote -E "system $^X, '-E', 'say > > > > for @ARGV; <STDIN>', 1, shell_quote(qq(\x5c \x5c)), 2"
> > > 1 > > > \\ \ > > > 2 > > > > > > See Win32::ShellQuote for the correct output.
> > > > Fixed. Now only backslash that is followed by another backslash, or > > the last backslash, will be escaped. Released 0.006.
> >