Perl one-liner avec l'apostrophe

J'ai été l'utilisation de Perl one-liner pour créer une instruction SQL, mais je ne suis pas en mesure d'inclure des guillemets simples.

C'est ce que je veux: Prendre la première à déposé et ajouter des guillemets à elle.

echo "a,b" | perl -F',' -lane 'print $F[0];'
 'a'

J'ai essayé de plusieurs façons, mais cela n'a pas fonctionné pour moi.

1.

echo "a,b" | perl -F',' -lane 'print qq('$F[0]');'
[0]

2.

echo "a,b" | perl -F',' -lane 'print q('$F[0]');'
[0]

Ici est un autre site intéressant.

C'est l'impression d'une seule citation avec l'instruction print, mais si je assigner une valeur à la variable et de l'impression qu'il ne fonctionne pas.

perl -lwe "print q( i'am );"
 i'am

perl -lwe "$b=q( didn't ); print $b"

Pouvez-vous m'aider à comprendre comment peut-on utiliser les guillemets simples et doubles en Perl, one-liners?

OriginalL'auteur sfgroups | 2011-02-24