comment passer la variable tcsh à perl one-liner

Question

pouvez-vous s'il vous plaît me dire comment passer la variable cshell à un perl one liner? Je pense que le script pour imprimer AAA mais il finit par me donner une erreur: remplacement de substitution ne se termine pas à la ligne -e 1.

#!/usr/bin/tcsh -fb 

set myvar = "AAA" 
perl -e "print $myvar" 

le cas plus complexe pour mon script.

#!/usr/bin/tcsh -fb 

set myvar = "AAA" 
perl -ne 'if (/$myvar/) {s/m1/m2/g}' fileA 

Answer 1

Vous pouvez passer myvar comme argument de ligne de commande à votre programme perl.

Answer 2

Les variables d'environnement du système hôte sont disponibles dans la variable %ENV de Perl. Mais pour marquer une variable comme héritable, vous devez utiliser setenv intégré de csh au lieu de set.

% setenv myvar AAA 
% perl -e 'print $ENV{myvar}' 
AAA 

(notez les guillemets simples dans l'argument à perl -e)

Answer 3

Votre déclaration de perl est print 'AAA', de sorte que vous devez passer la citation unique.

set myvar = "AAA" 
perl -e "print '$myvar'" 

Dans l'autre cas, vous devez utiliser des guillemets doubles pour laisser Perl obtenir la valeur de votre variable.

set myvar = "AAA" 
perl -ne "if (/$myvar/) {s/m1/m2/g}" fileA