我使用 Perl 单行创建 SQL 语句，但我无法包含单引号。
这就是我想要的:取第一个字段并为其添加引号。
echo "a,b" | perl -F',' -lane 'print $F[0];'
'a'
echo "a,b" | perl -F',' -lane 'print qq('$F[0]');'
[0]
echo "a,b" | perl -F',' -lane 'print q('$F[0]');'
[0]
这是另一个有趣的问题。
它使用print语句打印单引号，但是如果我为变量赋值并打印，它就不起作用。
perl -lwe "print q( i'am );"
i'am
perl -lwe "$b=q( didn't ); print $b"
请您参考如下方法:
您不能单独使用单引号。您需要使用 '\'' 正确转义它们这有效:
$ echo "a,b" | perl -F',' -lane 'print "'\''$F[0]'\''";'
'a'
