use Perl

• I don't get it (Score:1)

  by hex (3272)

  # Hello Demeter!  (Yeah, this is contrived)
  my $office = $cust->salesman->manager->office;

  What's wrong with this?
  • Re: (Score:2)

    by Ovid (2709)

    my $office = $cust->salesman->manager->office;

    It's a question of encapsulation. Imagine that the Salesman class no longer has need of a manager accessor, but you still need to know which office the salesman is with. You might get a office method pushed into the Salesman class. Then, every place where you have the above code needs to be changed to:

    my $office = $cust->salesman->office;

    If that's called a lot, it can be a maintenance nightmare.

    However, what if you have this?

    sub Cus
    • Re: (Score:1)

      by hex (3272)

      You've properly encapsulated the hierarchical structure and greatly improved maintainability. Oh, I see what you mean now. Right, thanks.
      • Re:I don't get it (Score:2)

        by Ovid (2709) on 2007.09.27 9:59 (#58080) Homepage Journal

        You're welcome. It's not exactly intuitive. Took me a couple of tries to get it :)

        Reply to This

        Parent