Hallo zusammen,
in einem Perl-Skript lese ich an einer Stelle eine Anweisung des Benutzers von der Kommandozeile ein:
So weit, so gut.-
Nun aber komme ich in die Lage, dass das Programm schon einen guten Tipp hat, was der Benutzer als nächstes möchte.
Diese Eingabe sollte also schon erscheinen, aber auch editierbar sein, d.h. wenn das Programm "Vorschlag" vorgibt, sollte der Benutzer
a) durch Eingabe von "1" die Anweisung "Vorschlag1" erzeugen können,
b) andererseits mithilfe von Backspaces auch "Vorgabe" daraus machen können.
Folgender Code funktioniert nicht:
Wenn es nur um das Hinzufügen von Zeichen ginge (nicht um Navigieren, Einfügen und Löschen) könnte man so vorgehen:
Gibt es da vielleicht ein Modul, das das Problem allgemein löst?
Vielen Dank
Utopos
in einem Perl-Skript lese ich an einer Stelle eine Anweisung des Benutzers von der Kommandozeile ein:
Code:
print "\n\n Bitte neuen Befehl eingeben.\n";
$eingabe = <STDIN>;
chomp ($eingabe);
## mache schlaue Sachen mit $eingabe ##
So weit, so gut.-
Nun aber komme ich in die Lage, dass das Programm schon einen guten Tipp hat, was der Benutzer als nächstes möchte.
Diese Eingabe sollte also schon erscheinen, aber auch editierbar sein, d.h. wenn das Programm "Vorschlag" vorgibt, sollte der Benutzer
a) durch Eingabe von "1" die Anweisung "Vorschlag1" erzeugen können,
b) andererseits mithilfe von Backspaces auch "Vorgabe" daraus machen können.
Folgender Code funktioniert nicht:
Code:
print "\n\n Bitte neuen Befehl eingeben.\n";
print "Vorschlag";
$eingabe = <STDIN>;
chomp ($eingabe);
Wenn es nur um das Hinzufügen von Zeichen ginge (nicht um Navigieren, Einfügen und Löschen) könnte man so vorgehen:
Code:
print "\n\n Bitte neuen Befehl eingeben.\n";
print "Vorschlag";
$eingabe = <STDIN>;
chomp ($eingabe);
$eingabe = 'Vorschlag' . $eingabe;
Gibt es da vielleicht ein Modul, das das Problem allgemein löst?
Vielen Dank
Utopos