my @queue = ( [$action1, $action2, $action3], [$action4, $action1, $action3], ...); # or possibly; my @queue = ( [1, 2, 3], [4, 1, 3]); # where [1, 2, 3] is a reference to an array of subscripts on an array of actions defined somewhere else.