@arr = qw ( up down in out left right );  # 6 elements
@sel = ( 1, 3, 4 );
@my_items = Magic(@arr, @sel);