in reply to warning! -- Why?

Another option is to replace and with a comma:

: ( $used_options{ $1 } = 1, "\${$1}" )

[download]

which removes the warning.

Hope that helps,

Athanasius <°(((>< contra mundum Iustus alius egestas vitae, eros Piratica,

Replies are listed 'Best First'.
Re^2: warning! -- Why?
by jwkrahn (Abbot) on May 12, 2022 at 19:09 UTC

    Thanks. It is also about 15% faster than using do { ... } !

[reply]

In Section Seekers of Perl Wisdom