>perl -wMstrict -le "my $s = q{cd / ; /path/latest --van --args \"fName='foo';jobCode=12;jobId=34;\" < j1.R > j1.txt}; print qq{'$s'}; ;; my $d_quo = qr{ \" [^^\"]* (?: \\. [^\"]*)* \" }xms; ;; $s =~ s{ $d_quo (*SKIP)(*FAIL) | ; }{&&}xmsg; print qq{'$s'}; " 'cd / ; /path/latest --van --args "fName='foo';jobCode=12;jobId=34;" < j1.R > j1.txt' 'cd / && /path/latest --van --args "fName='foo';jobCode=12;jobId=34;" < j1.R > j1.txt'