Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: (Windows) verbatim command line arguments inside Perl script

by BillKSmith (Monsignor)
on Apr 16, 2021 at 15:19 UTC ( [id://11131386]=note: print w/replies, xml ) Need Help??


in reply to (Windows) verbatim command line arguments inside Perl script

Not exactly what you want, but note that windows does allow you to escape quotes. 
>perl -E"say qq(@ARGV)" "\"1 2\" \"3\" 4"
"1 2" "3" 4

[download]
Bill

Replies are listed 'Best First'.
Re^2: (Windows) verbatim command line arguments inside Perl script
by LanX (Saint) on Apr 16, 2021 at 15:45 UTC
    cmd.exe is also allowing unclosed quotes, with is frankly a PITA

    D:\tmp\exp>perl -E"say join'|',@ARGV" "1\" 2" "3
1" 2|3

    [download]

    And I already noticed that the escaped quotes are killing my workaround

    D:\tmp\exp>type cmd_wrapper.bat
@echo off
echo %*| perl.exe .\wrapped_pl.pl


D:\tmp\exp>cmd_wrapper.bat "1\" 2"
"1\" 2"| perl.exe .\wrapped_pl.pl

    [download]

    what seems to happen is that

    1. %* is expanded like a macro before executing the bat
    2. The second quote is not considered escaped for echo
    3. The pipe is seen as part of an unclosed "string"
    4. hence the call to perl.exe is echo'ed like a string and never executed

    Cheers Rolf
    (addicted to the Perl Programming Language :)
    Wikisyntax for the Monastery

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://11131386]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others browsing the Monastery: (6)
As of 2024-04-19 09:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found