##
while () {
chomp;
$curr = $_;
$line = $.;
if ($line == 1)
{
$prev = $curr;
next;
}
if ($line % 2 == 0 && $line > 2 && !$flag)
{
$prev = $curr;
next ;
}
else
{
$flag = 0;
}
if ($curr eq $prev) {
$flag = 1;
next;
}
print "$curr\n";
$prev = $curr;
}
####
b1b
e1e
f1f
i1i
j1j