perl vs bash

NoOne

Profi

Beiträge: 803

1

20.05.2003, 15:49

ok...noch ne programmiertechnische frage gleich anschließen zum perl::textdatei....

ok ich hab ein bash script

	Quellcode
1 2 3 4	#!/bin/bash ./test.pl if ????

geht das das das perl script dem bash script sagt welchen weg es beim if nehmen soll??

Zum Seitenanfang

Michael

Meister

Beiträge: 2 107

Wohnort: www.Bayreuth.de

2

20.05.2003, 16:04

RE: perl vs bash

Zitat

Original von NoOne
geht das das das perl script dem bash script sagt ...

Hehe, deutsche Sprache, schwere Sprache

Zwei Möglichkeiten, die mir auf Anhieb einfallen:
1.) Du speicherst das Ergebnis des Perlscripts in einer Variablen, die dann im if-Statement zum Einsatz kommt.

2.) Die Return-Value des Perlscripts wird überprüft:

	Quellcode
1 2 3 4 5	#!/bin/sh ./perlscript.pl RETVAL=$? [$RETVAL -eq 0] && tueirgendwas [$RETVAL -eq 1] && tuewasanderes

Dann muss das Perlscript natürlich auch einen Return-Code ausspucken (ist standardmässig Null)!

Michael

Life is like ice cream: enjoy it before it melts!
"If there is (a God), all evidence indicates that He hates me." - Matt Groening

Zum Seitenanfang

NoOne

Profi

Beiträge: 803

3

20.05.2003, 16:08

und wie frag ich die argumente ab die ein bash script kriegt??

Zum Seitenanfang

Michael

Meister

Beiträge: 2 107

Wohnort: www.Bayreuth.de

4

20.05.2003, 16:39

man bash, nach "getopts" suchen ...

Michael

Life is like ice cream: enjoy it before it melts!
"If there is (a God), all evidence indicates that He hates me." - Matt Groening

Zum Seitenanfang

NoOne

Profi

Beiträge: 803

5

20.05.2003, 18:31

habs schon....thx

Zum Seitenanfang

Doomshammer

Profi

Beiträge: 668

Wohnort: Ostfriesland

Beruf: Netzwerk- & Systemadministrator

6

20.05.2003, 19:53

Oder halt sowas:

Quellcode

#!/bin/sh
ergebnis=$(./script.pl);
case "$ergebnis" in
istjacool)
   mach_dies_und_das
   ;;
auchnichtschlecht)
   mach_das_und_dies
   ;;
weissnichtwas)
   mach_irgendwas_anderes
   ;;
*)
   echo "Usage: $0 istjacool|auchnichtschlecht|weissnichtwas"
   ;;
esac

perl -e 'print pack("B248","01010010010101000100011001001101001000000010110100100000010010000110000101101100011101000010000001000100011010010110001101101000001000000110010001110010011000010110111000100001");'