my %hash;
while( my $wert = <STDIN> ) {
    if( ! $hash{$wert} ) {
        $hash{$wert} = 1;
        # Excel Zeile anhängen
    }
}

# Oder

my @array;
while( my $wert = <STDIN> ) {
    if( ! grep { $wert eq $_; } @array ) {
        push( @array, $wert);
        # Excel Zeile anhängen
    }
}