$ perl -e '"foo" =~ /(o)/; print @+,$/'
22
$ perl -e '"foo" =~ /(o)/; print "@+",$/'
@+
$ perl -v
This is perl, v5.6.1 built for i686-linux