aşağıdaki kodda txt dosyasından ekrana veri yazdırıyor....

#!/usr/bin/perl

# dosya2.cgi

print "Content-type:text/htmlnn";

open (DOSYA, "veri.txt");
@veriler = ;
close (DOSYA);

print "Veritabanı iceriği

";

print "İsim - Soyad
";

foreach $dongu @veriler)


iceriği aşağıdaki gibi olan boyle bir dosyada bir satırı silebilmek icin nasıl bir kod yazmam gerekir yardımınıza teşekkur ederim


SONY|$|352|1||||
LACIE|€|515|1||||
Apple|€|1601|1||||
Kameralar|$|25|1||||
Kameralar|$|25|1||||
Kameralar|$|25|1||||