unless ($prev eq $line){
    push (@filtered,$prev);                
}

##</code><code>##

push @filtered, $prev unless $prev eq $line;