Suchen und in Variable kopieren (gelöst) - #166328 (Allgemeines zu Perl)

Linuxer

2013-03-12 15:20

User since
2006-01-27
3890 Artikel
HausmeisterIn

user image

Wenn Dich wirklich nur der Wert des "First"-Attributs interessiert, könntest Du es auch wie folgt machen. Ist wieder ein Schnellschuß; eine eventuell gewünschte Prüfung auf gültigen Wertebereich musst hier noch implementiert werden...

Code (perl): (dl )

/usr/bin/perl
use strict;
use warnings;


while ( my $line = <DATA> ) {

    if ( my ( $first_value ) = $line =~ m{First="(\d+)"} ) {
        print $first_value, "\n";
    }
}
__DATA__
 <Response nRecords="5" First="13" Devices="5"/>

meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!