czesc wszystkim mam taki skrypt:

my $counter = 0;
open IN, "/home/reboots_kpi/inputs/$data-TAC-PL-reboot_newtv.csv";
open OUT, ">/home/reboots_kpi/reboots/mac_reboot.csv";

while(<IN>)
{
$counter++;
next if $counter < 0;
my @linia = split(/;/,$_);
print OUT "$linia[0]\n";

}
close IN;
close OUT;

open FILE, "/home/komortom/reboots_kpi/reboots/mac_reboot.csv";
open FILEOUT, ">/home/komortom/reboots_kpi/reboots/result_reboot.csv";
my %count;
while (my $line = <FILE>) {
foreach my $word($line) {
$count{$word}++;
}
}
for my $word (sort keys %count) {
print FILEOUT "$count{$word};$word\n";
}
close FILE;
close FILEOUT;


pierwsza czesc skryptu wybiera z pliku IN pierwsza kolumne a druga czesc skryptu zlicza powtorzenia tzn ile raz powtorzyl sie MAC_adres.
I teraz jak przerobic skrypt zeby nie wczytywac pliku FILE (gdzie sa MAC_adressy) tylko przekazac bezposrednio wynik z OUT, tzn nie zapisywac MAC_adressów do pliku tylko przekazac dalej do czesci co zlicza powtorzenia jako zmienną
probuje petla for ale mi cos nie idzie