Konflikt mit Perl

heuri

Jungspund

• 05.05.2006

• #1

Hallo erstmal,
ich habe ein Problem bezüglich Perl mit Shell.
Ich will mit perl einen Shell Code ausführen mit system();
Leider kommt folgender Konflikt:
Ich will eine Schleife ausführen:

for i in $(find blablabla......

anstatt aus i die Variable > $i zu machen ist unter Perl $( eine System Variable und macht daraus den EGID > Effective Group ID < also:

for i in $(find blablabla...... > for i in 1001 1001find blablabla......

Wie kann ich das umgehen?
Gibt es eine alternative zu den $(????

Vielen Dank!

 

S

supersucker

Foren Gott

• 05.05.2006

• #2

Probier mal den qx-operator (= quote and execute).

Code:

perldoc -f qx

in der Konsole.

 

heuri

Jungspund

• 05.05.2006

• #3

Erstmal danke,
leider kommt beim durchlauf mit

qx() der gleiche fehler > mit dem **** EGID
bei qw() macht er garnix im shellbefehl

Gibt es sonst noch alternativen?
DANKE!

 

Mµ*e^13.5_?¿

Routinier

• 05.05.2006

• #4

Einfach escapen, und gut ist.
"for i in \$(find blablabla......"

 

heuri

Jungspund

• 05.05.2006

• #5

Mµ*e^13.5_?¿ schrieb:

Einfach escapen, und gut ist.
"for i in \$(find blablabla......"

Zum Vergrößern anklicken....

So ist i keine Variable mehr

 

Mµ*e^13.5_?¿

Routinier

• 05.05.2006

• #6

heuri schrieb:

So ist i keine Variable mehr

Zum Vergrößern anklicken....

Ich weiss zwar nicht genau, wie du das benutz, aber wenn du einfach "i" hinschreibst wird es auch nie eine Variable werden.
Wenn du i als Perl-Variable benutzt musst du "$i" schreiben,
und wenn du es als Shell-Variable benutzen willst muss du "\$i" schreiben.
Wo liegt dabei also das Problem?

 

heuri

Jungspund

• 06.05.2006

• #7

Also ich benutze es so:
for file in $(find -type f)
do
echo"Datei $file"
........

somit ist file dann die variable $file zumindest wenn ich nur den shell teil in einer .sh ausführe

 

Xanti

Mouse Organist

• 06.05.2006

• #8

Eben, es soll als Shellvariable interpretiert werden und nicht als Perlvariable. Und genau dies ist Fall, wenn Du Mµ*e^13.5_?¿s Lösung mit dem Escapen nutzt. Alternativ kannst Du Deinen system-String in '...' einschliessen.

Kleines Anschauungsbeispiel:

Code:

[~]$ perl -e 'system "a=123; echo \$a"'
123

Gruss, Xanti

 

heuri

Jungspund

• 06.05.2006

• #9

Vielen Dank jetzt funktioniert es