use List::MoreUtils qw( uniq );

my @uniq_data = uniq @data;