Because Perl's OO stuff is screwed up and has now private/public/protected distinction I used a _ and __ convention for protected and private member variables.

e.g.

  $object->{this_is_public}
  $object->{this_is_protected_}
  $object->{this_is_private__}