We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
2 parents 90b9446 + c4d0713 commit 85d7c8bCopy full SHA for 85d7c8b
perl/remove_duplicates.pl
@@ -0,0 +1,5 @@
1
+#!/usr/bin/perl
2
+
3
+my @array = (1,10,7,1,4);
4
+my @unique = keys {map {$_ => 1} @array};
5
+print @unique;
0 commit comments