How will you remove the duplicate data from @array=("perl", "php”, "

How will you remove the duplicate data from @array=("perl", "php”, "per", "asp")?

Answer»

SUB uniqueString {
return keys %{{ map { $_ =&GT; 1 } @_ }};
}
@array = ("PERL", "php”, "per", "asp");
print join(" ", @array), "\N";
print join(" ", uniqueString(@array)), "\n";

Discussion

How will you remove the duplicate data from @array=("perl", "php”, "per", "asp")?

Discussion