Help for this page

Select Code to Download

Select or download this

@result = grep { exists $h{$_} } @a[$k .. $l];
say join ', ', @result;