+-------------------------+
    | generate perl-byte code |
    | of the entire project   |
    +------------+------------+
                 |
    +------------+------------+
    | walk the op-tree and    |
    | identify unused opcodes |
    +------------+------------+
                 |
      +---------------------+
      | construct your own  |
      | op-tree without the |
      | unused op-codes     |
      +---------------------+