Select Code to Download

    $data = ...# some Perl data structure
    @resultlist = dpath('/AAA/BBB/*/CCC')->match($data);

    $data = ...# some Perl data structure
    @resultlist = $data ~~ dpath '/AAA/BBB/*/CCC';