nicht angemeldet
Guten Morgen allerseits,
mich plagt mal wieder ein kleines Problem bei dem ich nicht so richtig weiterkomme.
Ich hab ein kleines Perl-Programm das wunderprächtig funktioniert und bei dem ich nun so eine Art "Gesprächig"-Modus einbauen will.
Das heißt wenn ich dem Programm beim aufrufen '-g' als Parameter mitübergebe soll er mir zum Beispiel jeden kleinen Arbeitsschritt mitausgeben. Ohne '-g' soll er nix ausgeben, also so tun als wenn alle print Anweisungen auskommentiert wären..
Aufruf: perl test.pl -g
Programm:
#!/usr/local/bin/perl -w
$Parameter= $ARGV[0];
....
if ($Parameter eq '-g')
{ print "Arbeitsschritt der gerade ausgefhrt wird" }
Wie im Beispiel zu sehen wäre es ziemlich aufwendig vor jede Stelle die ich mir im Gesprächig"-Modus ausgeben lassen will eine if-Abfrage zu setzen...nicht zu vergessen das dadurch der Quellcode total unleserlich werden würde!!
Meine Frage ist also: Gibt es eine kürze Möglichkeit mir mein Proggi gesprächig zu machen...?? Vielleicht eine der STD....
ich bin für jeden Vorschlag dankbar!
grüßle
Stefan