av_store( @foo, 1, $bar );
$baz = \ $foo[ 1 ];
$baz == \ $bar;

VS

4 == length( pack( 'N', 0 ) );
substr( $foo,
        4 * 1,
        4,
        pack( 'N', 0 + \ $bar );
# Increment the refcount of $bar somehow.
$baz = \ Devel::Pointer::unsmash_sv( unpack( 'N', substr( $foo, 4 * 1, 4 ) ) );
$baz == \ $bar;