foreach $xlink (@xlinks) { push @xlinkpaths, $xlink =~ m{incl -s streamname /./(.+)}; }