perl -MO=Deparse -ne 'print unless $n{$_}++' my_file.txt

##</code><code>##

LINE: while (defined($_ = <ARGV>)) {
    print $_ unless $n{$_}++;
}