##
alphas = [9, 4, 3, 2, 22, 13, 7, 140, 95, 278]
betas = [8, 3, 4, 1, 278, 94, 15, 7, 19, 200]
result = []
for x in alphas:
if x in betas:
result.append(x)
result.sort()
##
##
result = filter(lambda y: y != 0, [x in betas and x for x in alphas])
result.sort()
##
##
@result = sort { $a <=> $b }
map { my $x = $_; grep $x == $_, @betas } @alphas;