benötige Perl skript zur Auswertung

Hallo,
im Rahmen meiner Studienarbeit muss ich sehr viele Rechnungen (bis jetzt über 500 an der Zahl) machen, und dann diese natürlich auch auswerten. Ich benötige ein Perl Skript, welches mir in einer Textdatei nach einem String sucht, sich die Zeile merkt, in der dieser String gefunden wurde, und mir einen bestimmten Bereich aus dieser Zeile kopiert, und in eine Datei schreibt…
Beispiel:
zu durchsuchende Textdatei: http://www.mediafire.com/?hindumtqw2m
in dieser Datei soll nach folgendem String gesucht werden: Overall Sum (kommt in der gesamten Datei 2mal vor) es sollen die Zahlenwerte aus diesen Zeilen für CLift, CDrag und CM_y kopiert, und in einer anderen Datei nebeneinander mit jeweils mindestens einem Leerzeichen geschrieben werden…

an erster Stelle steht eine bestimmte Zahl, die ich aus einer Schleife erhalte z.B: „5“ und danach kommen die oben beschriebenen Werte…

hier ein Beispiel, wie so eine Datei dann aussieht, wenn ich das manuell von Hand gemacht habe:

-5 -0.301643046816 0.010831163051 -0.0538737474092 
-2 0.0474547784889 0.0110039198094 -0.0553293708321 
0 0.500506185212 0.0131281848621 -0.0536688914645 
2 0.500506185212 0.0131281848621 -0.0536688914645 
5 0.820145869237 0.0161521419565 -0.0485103056648 
7 1.01882159555 0.0189644374225 -0.0428761012436 
9 1.20736795911 0.0225076492355 -0.0361214024859 
10 1.29775978858 0.0245971122372 -0.0325032646315 
11 1.3852515461 0.0269627100452 -0.0288314757073 
12 1.47090536912 0.0296593822293 -0.0253700258987 
13 1.5541295461 0.0327636875336 -0.0221937815246 
14 1.63244960433 0.0365921470459 -0.0195159986553 

ich hoffe ich konnte mein Problem klar und deutlich schildern… Wenn noch fragen offen sind, bitte melden… Danke schonmal im voraus…
MfG Ahmet

PS: Wenn einer der Meinung ist, das ganze würde mit nem Shell skript einfacher gehen, dann bin ich auch zufrieden… =)

Hallo,

an erster Stelle steht eine bestimmte Zahl, die ich aus einer
Schleife erhalte z.B: „5“ und danach kommen die oben
beschriebenen Werte…

hier ein Beispiel, wie so eine Datei dann aussieht, wenn ich
das manuell von Hand gemacht habe:
PS: Wenn einer der Meinung ist, das ganze würde mit nem Shell
skript einfacher gehen, dann bin ich auch zufrieden… =)

Ich denke, mit Perl wird das einfacher:

[auswert.pl]

 # Datei einlesen
 open my $fh, $ARGV[0] or die "$ARGV[0] $!";
 my $inhalt = do { local $/; };
 close $fh;
 # Schleife ist 5
 my $sc = 5;
 # Daten ausspucken
 print "$sc $1 $2" if $inhalt =~ /CLift\s+CDrag.\*?Overall Sum\s(\S+)\s+(\S+)/s;
 print " $1\n" if $inhalt =~ /CM\_y.\*?Overall Sum\s+\S+\s+(\S+)/s;

$> perl auswert.pl out.solver.stdout.7 > neue_datei.txt

Grüße

CMБ