Come si chiama lo script Perl nell'applicazione C#?

Question

Desidero acquisire l'output di un programma Perl e visualizzare i dati di output (stringa sullo schermo) in una casella di testo in C# Windows Form.

Qui è il mio principale codice C#:

public partial class frmMain : Form 
{ 
    private Process myProcess = null; 
    public frmMain() 
    { 
     InitializeComponent();    
    } 

    public delegate void UpdateUIDelegate(string data); 
    private void btnRun_Click(object sender, EventArgs e) 
    { 
     myProcess = new Process(); 
     ProcessStartInfo myProcessStartInfo = new ProcessStartInfo("perl.exe"); 
     myProcessStartInfo.Arguments = "test.pl"; 
     myProcessStartInfo.UseShellExecute = false; 
     myProcessStartInfo.RedirectStandardOutput = true; 
     myProcessStartInfo.WindowStyle = ProcessWindowStyle.Hidden; 
     myProcessStartInfo.CreateNoWindow = true; 
     myProcess.StartInfo = myProcessStartInfo; 
     myProcess.OutputDataReceived += new DataReceivedEventHandler(myProcess_OutputDataReceived); 
     myProcess.Start(); 
     myProcess.BeginOutputReadLine(); 
    } 

    void myProcess_OutputDataReceived(object sender, DataReceivedEventArgs e) 
    { 
     if (txtOutput.InvokeRequired) 
     { 
      UpdateUIDelegate updateDelegate = new UpdateUIDelegate(UpdateUI);     
      this.Invoke(updateDelegate, e.Data); 
     }    
    } 

    void UpdateUI(string data) 
    { 
     txtOutput.Text += data + "\r\n"; 
    } 
} 

e il codice per test.pl:

my @a = qw{1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19}; 
my @b = qw{a b c d e f g h i j k l m n o p q r s }; 
print 'start' . "\n"; 
while (my ($item1, $item2) = (splice (@a, 0, 1), splice (@b, 0, 1))) { 
    print 'Item 1: ' . $item1 . "\n"; 
    print 'Item 2: ' . $item2 . "\n"; 
    warn 'Finish one item' . "\n"; 
    sleep(1); 
} 

Ho un problema è che i dati di uscita viene visualizzato solo sulla casella di testo fino a quando il Perl ha finito.

è più interessante quando ho scoperto che, se io faccio la stessa cosa con un'applicazione console (C#) tutto sembra a posto.

Ecco il codice per l'applicazione di console:

class Program 
{ 
    static void Main(string[] args) 
    { 
     Process myProcess = new Process(); 
     ProcessStartInfo myProcessStartInfo = new ProcessStartInfo("perl.exe"); 
     myProcessStartInfo.Arguments = "test.pl"; 
     myProcessStartInfo.UseShellExecute = false; 
     myProcessStartInfo.RedirectStandardOutput = true; 
     myProcess.StartInfo = myProcessStartInfo; 

     myProcess.OutputDataReceived += new DataReceivedEventHandler(myProcess_OutputDataReceived);          
     myProcess.Start();    
     myProcess.BeginOutputReadLine();    
     Console.Read(); 
    } 

    static void myProcess_OutputDataReceived(object sender, DataReceivedEventArgs e) 
    { 
     Console.WriteLine(e.Data); 
    } 
} 

Sto cercando di capire cosa succede con la mia domanda forma, ma ancora non trovare alcun indizio. Un'altra cosa è che non riesco a ottenere il messaggio di avviso con l'applicazione di Windows Form.

Answer 1

Si sta andando ad avere bisogno di utilizzare più thread in modo da non interrupt tua UI. Ho una classe di utilità abbastanza grande che avvia processi sul proprio thread e pipe a eventi delegati.

Scusate, vorrei fare un esempio ma in realtà sono in una corsa enorme. Ma un'altra cosa che vorrete fare attenzione con l'uso degli script Perl è che non riescono a svuotare l'output piacevolmente. Devi inserire:

Nella parte superiore dello script che stai utilizzando in modo che si scarichi automaticamente.

Answer 2

In primo luogo è necessario aggiornare il gestore di eventi

void myProcess_OutputDataReceived(object sender, DataReceivedEventArgs e)  
    {   
     if (txtOutput.InvokeRequired)   
     {    
       UpdateUIDelegate updateDelegate = new UpdateUIDelegate 

       (UpdateUI);this.Invoke(updateDelegate, e.Data);   
      } 
      else UpdateUI(e.Data); 

    } 

e aggiungere questa riga nel vostro btnRun_Click

proc.WaitForExit();