my  $INFILE_file_name = $file;      # input file name

open ( INFILE, '<', $INFILE_file_name )
    or croak "$0 : failed to open input $INFILE_file_name : $!\n";

my $count = 0;
my $seqlinec = 2;
while ( <INFILE> ) {
    chomp;

     # Trying to catch line 2 of each chunk..
    if ( $seqlinc eq $count ) {
        print "$_\n";
    }

    $seqlinec += 4;

}               


close ( INFILE );           # close input file