On Tue, 18 Nov 2025 22:17:49 -0800 (PST)
Andrew Hewus Fresh <[email protected]> wrote:
> How does that work with
>
> @lib
> lib/libfoo${API_VERSION}.so.${LIBfoo${API_VERSION}_VERSION}
>
> Nov 18, 2025 21:00:25 George Koehler <[email protected]>:
>
> > + while ($unsubst =~ m/\$\{LIB(.*?)\_VERSION\}$/g) {
> > + my $name = $state->{subst}->do($1);
> > + if ($name eq $l[0]) {
> > + return;
> > + }
> > + pos($unsubst) = $-[1];
It works only because the anchor $ forces it to match the '_VERSION}'
at the end of the line.
Your code using Text::Balanced might be better.
