in reply to Re: Assign result of map to scalar variable
in thread Assign result of map to scalar variable

my ($val) = map { /^\*\s\(?([^\)]+)\)?/} @GET_STRING;

[download]

++     Simplest by far... so far.

In Section Seekers of Perl Wisdom