Thread Probleme mit Ausdrücken (21 answers)
Opened by Trommelwirbel at 2011-11-10 17:05

Trommelwirbel
 2011-11-14 13:00
#154183 #154183
User since
2011-11-10
28 Artikel
BenutzerIn
[default_avatar]
@Linuxer: Könntest du mir vielleicht den Code kurz erklären, habe es hinbekommen, dass es funkst, aber leider habe ich Elemente, in den Zahlenkombinationen öffters vorkommen.

Bsp.: Wenn ich Element 18 betrachte, gibt er mir nicht nur die Zeilen von ab 18, sondern auch die von 518.

Hab schon probiert mit einer if - Abfrage, aber irgendwie geht das nicht.

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

open (IN , "<hq_regio_neu.txt");
                                                                        
                                                        my $num = 0;
                                        while ( my $line = <IN> ) {
                                        
                                        if(length($line)<=(length($element)+2)){
                                        
                                        if ( $num == 0 && $line =~ m/$element (\d+)/ ) {
                                                $num = $1;
                                                                }
                                        elsif ( $num > 0 ) {
                                        print Out $line;
                                                $num--;
                                        }

                                                }

                                                        
                                                        }


Gibt es in Perl nicht vielleicht eine Strikte Einhaltung für Ausdrücke?

Nochmal, danke.

modedit Editiert von pq: code-tags hinzugefügt
Last edited: 2011-11-14 13:14:13 +0100 (CET)

View full thread Probleme mit Ausdrücken