\${\*LOCATION0} = \bless( \*Data::Locations::LOCATION0, 'Data::Locations' ); \@{\*LOCATION0} = [ 'Top', bless( \*Data::Locations::LOCATION2, 'Data::Locations' ), 'Middle', bless( \*Data::Locations::LOCATION3, 'Data::Locations' ), 'Bottom' ]; \%{\*LOCATION0} = { 'refs' => 2, 'file' => '', 'name' => 'LOCATION0', 'inner' => { 'LOCATION2' => 1, 'LOCATION3' => 1 }, 'outer' => {} }; ---------------------------------------------------------------------------- \${\*LOCATION1} = \bless( \*Data::Locations::LOCATION1, 'Data::Locations' ); \@{\*LOCATION1} = [ 'First', bless( \*Data::Locations::LOCATION4, 'Data::Locations' ), 'Last' ]; \%{\*LOCATION1} = { 'refs' => 2, 'file' => '', 'name' => 'LOCATION1', 'inner' => { 'LOCATION4' => 1 }, 'outer' => {} }; ---------------------------------------------------------------------------- \${\*LOCATION2} = \bless( \*Data::Locations::LOCATION2, 'Data::Locations' ); \@{\*LOCATION2} = [ 'Left', bless( \*Data::Locations::LOCATION4, 'Data::Locations' ), 'Right' ]; \%{\*LOCATION2} = { 'refs' => 2, 'file' => '', 'name' => 'LOCATION2', 'inner' => { 'LOCATION4' => 1 }, 'outer' => { 'LOCATION0' => 1 } }; ---------------------------------------------------------------------------- \${\*LOCATION3} = \bless( \*Data::Locations::LOCATION3, 'Data::Locations' ); \@{\*LOCATION3} = [ 'Begin', bless( \*Data::Locations::LOCATION4, 'Data::Locations' ), 'End' ]; \%{\*LOCATION3} = { 'refs' => 2, 'file' => '', 'name' => 'LOCATION3', 'inner' => { 'LOCATION4' => 1 }, 'outer' => { 'LOCATION0' => 1 } }; ---------------------------------------------------------------------------- \${\*LOCATION4} = \bless( \*Data::Locations::LOCATION4, 'Data::Locations' ); \@{\*LOCATION4} = [ 'Here' ]; \%{\*LOCATION4} = { 'refs' => 2, 'file' => '', 'name' => 'LOCATION4', 'inner' => {}, 'outer' => { 'LOCATION1' => 1, 'LOCATION2' => 1, 'LOCATION3' => 1 } };