chcem sa spytat ako by som mohol splitnut textovy subor s perlom aby napr: zobral 100line a dal do suboru a tak spravil cely subor, cize mozem mat 2gb subor, ktory sa rozdeli na niekolko mensich suborov ktore budu obsahovat 100 riadkov.
vdaka
web developer a trosku znalosti v linuxe
ten subor ma viacej riadkov takze som dal sekciu na 20000 riadkov
#!/usr/bin/perl
$file="file";
open (FHI,"$file") or die "Failed to read open $file: $!";
my $fcnt = 0;
for (my $cnt = 0; <FHI>; $cnt++) {
unless ($cnt % 20000) {
open FHO, ">file${fcnt}.txt" or die "Failed to write open file${fcnt}.txt: $!";
$fcnt++;
}
print FHO;
}
vdaka
Ale, v perli som nikdy moc nerobil.