[PREV - LEAVING_TRACKS]    [TOP]

THE_PIECES

The pieces we've got to work with:

  o  The /e modifier
                             s{ TAG_NAME }{ lookup( $& ) }xeg;
  o  $& (or the equivalent)
                                  MODERN_PERL
  o  The pos function

                       while( m/MARKER/g ) {
                          push @locations, pos();
                       }
--------
[NEXT - POSITIVELY_HUH]