in reply to OOP related, using methods in another object without inheriting them.
The most obvious problem I can see is:
needs to be:my $ref = new Lady_TM("$self{'access_log_path'}");
my $ref = new Lady::Lady_TM("$self{'access_log_path'}");
In Section
Seekers of Perl Wisdom