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"
Perl のワンライナーで一重引用符と二重引用符を使用するにはどうすればよいですか?
一重引用符だけを使用することはできません。'\''これを使用して正しくエスケープする必要があります。
$ echo "a,b" | perl -F',' -lane 'print "'\''$F[0]'\''";'
'a'
シェルが引用符をどのように処理するかを学ぶ必要があります。
私はASCII値を次のように使用します'：
echo "a,b" | perl -F',' -lane 'print "$F[0]\047";'
a'
q//演算子はワンライナーでqq//も役立ちます。
8進数値の変数を使用します。
echo "a,b" | perl -F',' -lane '$sq="\047"; print "$sq$F[0]$sq";'
また、あなたの試み＃1のわずかな修正はうまくいくでしょう：
echo "a,b" | perl -F',' -lane "print qq{'\$F[0]'};"
これは、外側のセットに二重引用符を使用し、ドル記号をエスケープして、シェルがそれを解釈しないようにします。
スクリプトを一重引用符ではなく二重引用符で囲むと、エスケープしたり、ANSIシーケンスを使用して一重引用符を表すことなく、スクリプト内で一重引用符を使用できます。これはおそらく最も効果的で読みやすいソリューションです。