my %uniq = map {$_ => $_} grep {length $_ > 4} @website;
@website = grep defined, @uniq{@website};