cat tt.txt
a
a
b
c
c
b
123
3243
123
133
133

perl -mPerl6::Junction=all -lne 'our @c; print,push @c,$_ if $_ ne all(@c);' tt.txt