Hi,
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
Du solltest "-v" für "verbose" wählen. Dieses Argument ist jedenfalls hierfür international gebräuchlich.
#!/usr/local/bin/perl -w
use strict; # ?
$Parameter= $ARGV[0];
perldoc Getopt::Std
Ferner lies bitte in perldoc perlstyle nach, wie Variablennamen gewählt werden sollten.
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!!
Wenn Du eine Variable $verbose oder $is_verbose deklarierst, wird es lesbarer.
Meine Frage ist also: Gibt es eine kürze Möglichkeit mir mein Proggi gesprächig zu machen...?? Vielleicht eine der STD....
Uwes Tipp ist nicht von der Hand zu weisen: Leite jede (potentielle) Ausgabe über eine Funktion, die diese Prüfung erledigt. Ob diese nun &showError() heißen muss, sei dahingestellt :-)
Cheatah
X-Will-Answer-Email: No