On Mon, 5 Dec 2005, Moon, John wrote:
> while ($line = <>) {
> next if $. <= 10;
> ...
> }
CMIIW, this one will check (if $.) for each of the line.
thx
.dave
http://www.davidsudjiman.info
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED
On Mon, 5 Dec 2005, Ron McKeever wrote:
> Hello,
>
> I would like to skip the first ten lines of output from tail, then print any
> new records matching my array, but I seem to be stuck, below will run but
> nothing prints:
> tail /var/log/messages is piped to it...
>
> #!/usr/bin/perl
>
> my
From: Ron McKeever [mailto:[EMAIL PROTECTED]
Sent: Monday, December 05, 2005 11:50 AM
To: beginners@perl.org
Subject: Skip then print
Hello,
I would like to skip the first ten lines of output from tail, then print
any new records matching my array, but I seem to be stuck, below will
run but
Ron McKeever wrote:
I would like to skip the first ten lines of output from tail
If you want the last line of a file, you can get tail to print only
that. See `man tail`.
$ tail -n 1
--
Just my 0.0002 million dollars worth,
--- Shawn
"Probability is now one. Any problems that are
Hello,
I would like to skip the first ten lines of output from tail, then print any
new records matching my array, but I seem to be stuck, below will run but
nothing prints:
tail /var/log/messages is piped to it...
#!/usr/bin/perl
my @names = ("nb","tp","ape","berry","jab");
my $log = "/local/
