Question

This is my log

connect
called
menu
transfer
disconnect
connect
called
transfer
disconnect

i want to pick the word, when the word exactly next to ,
When the word like

connect

menu
transfer
disconnect means,

i should pick the word transfer,

if my flow like

connect
called
transfer
disconnect

then i dont want to pick the word transfer,

Answer 1

You coud try something like:

Updated to standard Perl distribution :

#!/usr/bin/perl
use strict;
use warnings;

my $count = 0;
while(<DATA>) {
    chomp;
    $count = 1 if $_ eq 'connect';
    if ($count == 3) {
        print "2 words after is : $_\n";
        $count = 0;
    }
    $count++ if $count;
}


__DATA__
connect
called
menu
transfer
disconnect
connect
called
transfer
disconnect

output:

2 words after is : menu
2 words after is : transfer