%unique;
@unique = grep({!$unique{$_->[0]}++} @parsed_file)