Re: middle line (was Re: Daily Perl FAQ...)

[Greg Bacon]

In message <[EMAIL PROTECTED]>,
    "=?iso-8859-1?q?Jonathan=20E.=20Paton?=" writes:

: #!/usr/bin/perl -w
: 
: $j++;
: 
: while (<>) {
:     $line{$.} = $_;
:     delete $line{$j++} if ($. == 2 * $j);
: }
: 
: print $line{$j};

A hash is an associative array and, thus, isn't kosher for the problem
as stated.

Greg