Shortest accumulator (so far?):

local our @dirs;
m{^(.*/)(?{ push @dirs, $^N })(?!)};
[download]

In requested order:

local our @dirs;
m{^(.*?/)(?{ push @dirs, $^N })(?!)};
[download]