Klassische Verwendung von Perl: Lesen mehrerer Datensätze

Wenn Sie anrufen, geben Sie die verbleibenden Datensätze in der Datei zurück. Wenn Sie am Ende der Datei sind, wird eine leere Tabelle zurückgegeben:

@records=;

if(@records){

PRint "Therewere",scalar (@records), "recordsread.n";

}

Führen Sie im nächsten Schritt die Zuweisung und den Test durch:

if(@records=){

print "Therewere",scalar(@records),"recordsread.n";

}

chomp() kann auch auf Array-Operationen angewendet werden:

@records =;

chomp(@records);

Für jeden Ausdruck kann die Chomp-Operation ausgeführt werden, sodass Sie im nächsten Schritt so schreiben können:

chomp( @records=);

Was sind Datensätze?

Die Standarddefinition eines Datensatzes ist: „Zeile“.

Die Definition des Datensatzes wird durch die Variable $/ gesteuert, die das Trennzeichen des eingegebenen Datensatzes speichert. Da das Zeilenumbruchzeichen (per Definition!) zum Trennen von Zeilen verwendet wird, ist sein Standardwert eine Zeichenfolge „. N".

Zum Beispiel können Sie „n“ durch ein beliebiges Symbol ersetzen.

$/=";";

$record=;#Lesen Sie den nächsten durch Semikolons getrennten Datensatz.

$/ kann zwei weitere interessante Werte annehmen: Leere Zeichenfolge ( "") und undef

Das Obige ist die klassische Verwendung von Perl: Lesen des Inhalts mehrerer Datensätze. Weitere verwandte Artikel finden Sie auf der chinesischen PHP-Website (www.php.cn)!