Vergleich 2er Arrays (Seite 3) (Allgemeines zu Perl)

havi

2003-11-13 12:34

User since
2003-08-04
2036 Artikel
BenutzerIn

Ich glaubte

1;

entspricht

exit(0);

???

Gruss

Perl-Zeitung - http://perl-zeitung.at/
Perl-Blog - http://usr-bin-perl.blogspot.com/

Relais

2003-11-13 12:36

User since
2003-08-06
2244 Artikel
ModeratorIn

nicht mehr als ein

0;

oder auch ein

<span style='font-family:courier'></span>

dem entspräche.

Erst denken, dann posten --
26. Deutscher Perl- u. Raku -Workshop 15. bis 17.04.2024 in Frankfurt/M.

Winter is Coming

havi

2003-11-13 12:41

User since
2003-08-04
2036 Artikel
BenutzerIn

Da scheint etwas zu fehlen...

Perl-Zeitung - http://perl-zeitung.at/
Perl-Blog - http://usr-bin-perl.blogspot.com/

Crian

2003-11-13 12:47

User since
2003-08-04
5866 Artikel
ModeratorIn

Nein. Wenn am Ende nichts mehr steht, wird auch exit 0 ausgeführt.

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

havi

2003-11-13 13:27

User since
2003-08-04
2036 Artikel
BenutzerIn

Ahh. Ok, verstanden.

Gruss

Perl-Zeitung - http://perl-zeitung.at/
Perl-Blog - http://usr-bin-perl.blogspot.com/

pq

2003-11-13 13:28

User since
2003-08-04
12208 Artikel
Admin1

[quote=Crian,13.11.2003, 11:07]Auf jeden Fall sollte man es in Perlskripten weglassen, es sei denn man möchte, dass das Skript einen bestimmten Wert zurückliefert, den man in einem Shellskript, das das Perlskript aufruft, auswertet.[/quote]
die shell bekommt doch nur das "zurückgeliefert", was auf
STDOUT geprintet wird.
also

Code: (dl )

$ TEST=`perl -wle'print "test";exit 23'`
$ echo $?
23
$ echo $TEST
test

soweit ok, denke ich.

Code: (dl )

$ TEST=`perl -wle'print "test";1;'`

wer kann mir sagen, wo ich diese 1 am ende in der
shell wiederfinde?

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

Relais

2003-11-13 14:21

User since
2003-08-06
2244 Artikel
ModeratorIn

[quote=pq,13.11.2003, 12:28]

Code: (dl )

$ TEST=`perl -wle'print "test";1;'`

wer kann mir sagen, wo ich diese 1 am ende in der
shell wiederfinde?[/quote]
gar nicht.

jedoch:

Code: (dl )

TEST=`perl -wle'print "test";  exit  1  ;'` && echo OK || echo ERR;

Edit

Code: (dl )

TEST=`perl -wle'print "test";  exit  1  ;'`; echo $?;

\n\n

Erst denken, dann posten --
26. Deutscher Perl- u. Raku -Workshop 15. bis 17.04.2024 in Frankfurt/M.

Winter is Coming

pq

2003-11-13 14:45

User since
2003-08-04
12208 Artikel
Admin1

[quote=Relais,13.11.2003, 13:21][quote=pq,13.11.2003, 12:28]

Code: (dl )

$ TEST=`perl -wle'print "test";1;'`

wer kann mir sagen, wo ich diese 1 am ende in der
shell wiederfinde?[/quote]
gar nicht.
[/quote]
gut. wieso sollte ich es dann in skripten weglassen? (abgesehen
vom einwand, dass es verwirrend sein könnte)

Quote

jedoch:

Code: (dl )

TEST=`perl -wle'print "test";  exit  1  ;'` && echo OK || echo ERR;

Edit

Code: (dl )

TEST=`perl -wle'print "test";  exit  1  ;'`; echo $?;

was willst du mir jetzt damit sagen? dass ich den exit-code
abfragen kann, ist mir klar, das schrieb ich ja auch in
meinem vorherigen post. es geht mir einzig und allein um
die 1 in der letzten zeile. (jetzt wird es aber bald zu offtopic)

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

Crian

2003-11-13 17:22

User since
2003-08-04
5866 Artikel
ModeratorIn

[quote=pq,13.11.2003, 12:28][quote=Crian,13.11.2003, 11:07]Auf jeden Fall sollte man es in Perlskripten weglassen, es sei denn man möchte, dass das Skript einen bestimmten Wert zurückliefert, den man in einem Shellskript, das das Perlskript aufruft, auswertet.[/quote]
die shell bekommt doch nur das "zurückgeliefert", was auf
STDOUT geprintet wird.
also

Code: (dl )

$ TEST=`perl -wle'print "test";exit 23'`
$ echo $?
23
$ echo $TEST
test

soweit ok, denke ich.

Code: (dl )

$ TEST=`perl -wle'print "test";1;'`

wer kann mir sagen, wo ich diese 1 am ende in der
shell wiederfinde?[/quote]
im Errorlevel bzw. $? in der Bash wenn ich mich richtig erinnere, Shell-Programmierung liegt schin etwas zurück

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

pq

2003-11-13 18:28

User since
2003-08-04
12208 Artikel
Admin1

nein, nur bei exit(1)! das habe ich doch oben schon geschrieben =)

Code: (dl )

05:27pm tina@lux:tina 501> TEST=`perl -wle'print "test";1;'`
05:27pm tina@lux:tina 502> echo $?
0
05:27pm tina@lux:tina 503> TEST=`perl -wle'print "test";exit 1;'`
05:28pm tina@lux:tina 504> echo $?
1

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem