Common list elements: Difference between revisions
Added Perl
(Realize in F#) |
SqrtNegInf (talk | contribs) (Added Perl) |
||
Line 113:
6
</lang>
=={{header|Perl}}==
<lang perl>@nums = ([2,5,1,3,8,9,4,6], [3,5,6,2,9,8,4], [1,3,7,6,9]);
map { print "$_ " if @nums == ++$c{$_} } @$_ for @nums;</lang>
{{out}}
<pre>3 6 9</pre>
=={{header|Raku}}==
| |||