How can I define pre/post-increment behavior in Perl objects?
- by Zaid
Date::Simple objects display this behavior. In the case of Date::Simple objects, $date++ returns the next day's date.
Date::Simple objects are immutable. After assigning $date1 to $date2, no change to $date1 can affect $date2. This means, for example, that there is nothing like a set_year operation, and $date++ assigns a new object to $date.
How can one custom define the pre/post-incremental behavior of an object, such that ++$object or $object-- performs a particular action?
I've skimmed over perlboot, perltoot, perltooc and perlbot, but I don't see any examples showing how this can be done.