А бе чак сега го погледнах....
=============================================
#!usr/bin/perl - примерно....!!!!
use warnings;
use strict;
open FILE, "blabla.log" or die $!;
my $linenumber = (който трябва ред - например -)5;
while (<FILE>)
{
$linenumber++;
print "$_";
}
=============================================
Ако искаш можеш да си го дообработиш и да му
подаваш като аргументи филето и
реда от който да започва...
A be drugo si e da e na PERL....!!!!
============================================================================
A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers).
http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora
To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
============================================================================
