$object1 = $ABC->Find('test1');

#Then I want to call a subroutine called CheckResult in #Report.pm

Report->CheckResult($object,”Finding the value”);

#In another case I want to report if a particular command #was executed, so I do something like this..

Report->CheckResult($ABC->Command(100,100),”Performing the command”);