You are viewing the version of this documentation from Perl 5.31.1. This is a development version of Perl.
@{^CAPTURE}

An array which exposes the contents of the capture buffers, if any, of the last successful pattern match, not counting patterns matched in nested blocks that have been exited already.

Note that the 0 index of @{^CAPTURE} is equivalent to $1, the 1 index is equivalent to $2, etc.

if ("foal"=~/(.)(.)(.)(.)/) {
    print join "-", @{^CAPTURE};
}

should output "f-o-a-l".

See also "$<digits> ($1, $2, ...)", "%{^CAPTURE}" and "%{^CAPTURE_ALL}".

Note that unlike most other regex magic variables there is no single letter equivalent to @{^CAPTURE}.

This variable was added in 5.25.7