in reply to Re^2: How can I access object data in a user defined sort cmp function?
in thread How can I access object data in a user defined sort cmp function?
> I want more than simply sorting the keys. Based on the keys I have to look up something within the object based on which I can sort the keys. For this I have to access the object's variables. Currently I create a global variable called $sort_self and I set this manually before calling the user defined cmp function byvalue, but this seems very unelegant.
it is not very elegant, b/c - sorry - you are violating OOP and encapsulation.
The best design is to add a method %keys=$obj->sort_keys_by_val() which returns your keys.
No need to tunnel $self artificially cause $self will be the first argument.
update
the code for this method can be taken from here
In Section
Seekers of Perl Wisdom