Ich habe eine CSV-Dateimy.csv mit diesem Inhalt:

abc,yyy

efg,zzz

zsc,vvv

uvw,ggg

Abhängig vom Wert in Variable$X Ich muss von diesem bestimmten Wert bis zum Ende der Datei lesen. Zum Beispiel:

Ob$X = efgwürde die Ausgabe sein:

efg,zzz

zsc,vvv

uvw,ggg

Zum$X = zsc:

zsc,vvv

uvw,ggg

Dies ist das von mir entwickelte Skript, das den gesamten Inhalt einer CSV-Datei einliest und anzeigt:

use strict;
use warnings;

open(my $data, '<', $file) or die "Could not open '$file' $!\n";

while (my $line = <$data>) {  
    chomp $line; 
    my @field = split "," , $line;
    print "$field[0] $field[1]";
}

Bitte helfen Sie mir mit einem Skript, um das oben genannte Szenario anzuzeigen.