Come posso gestire i tasti freccia in uno script Perl sotto cygwin?

Question

Sto eseguendo script Perl sotto cygwin che prende input da <STDIN> ed elabora continuamente le richieste.

#!/usr/bin/perl 
print "Enter Input:"; 
while(<STDIN>) { 
    print "Recieved Input: $_"; 
    print "Enter Input:"; 
} 



    $perl testPerl.pl   
    Enter input:input1 
    Recieved input:input1 
    Enter input:inpt2 
    Recieved input:input2 
    Enter input: 

Ora, vorrei che la freccia al prompt corrente: "Enter Ingresso:" per prendere gli input precedenti, vale a dire "input2", "input1"

si comporta come previsto durante l'esecuzione in finestre enivronment (cmd.exe)
Ma il problema sotto cygwin è che la freccia prende letteralmente la fila del cursore 1 fino cioè che serve per la linea "di input ricevuti: input2"

si prega di condividere i tuoi pensieri su questo.

Answer 1

Guarda il modulo Term :: Readline. Questo prenderà in carico gli input per il tuo programma e manterrà la cronologia, che è ciò di cui penso tu stia parlando.

Questa sarebbe una traduzione diretta del programma di utilizzare Term :: ReadLine:

 
use Term::ReadLine; 
my $term = new Term::ReadLine 'Simple Perl calc'; 
my $prompt = "Enter Input: "; 
while (defined ($_ = $term->readline($prompt))) { 
    print "Recieved Input:$_\n"; 
    $term->addhistory($_) if /\S/; 
} 

Answer 2

C'è una grande differenza nella gestione della cronologia della riga di comando tra la console Windows ei terminali Unix. Su Windows, è fatto dalla console, mentre su Unix, le applicazioni ne sono responsabili. Non so nulla di Perl, ma dovrai usare qualcosa come la libreria readline. Questo sembra utile: http://perldoc.perl.org/functions/readline.html