If want a specific subset of elements, then you can use a slice:

my $item = join( ".", @code[0..2] );
my $not_item = join( ".", @code[9,7,0,3] );
[download]