Select Code to Download

#!/usr/bin/env perl
use warnings;
...
dd @idx;  # (0, 1, 4, 2, 3, 5)
my @out = map { $matrix[2][$_] } @idx;
dd @out;  # ("mis", "mis", "del", "mis", "mis", "del")