perlquestion manorhce <p> I am writing test cases for my application my problem is the modules which is used to connect to database, for that I am writing test cases and it connects to database and loads the database </p> <p>My Point is that can Perl provides mock database object so that every time it will not connect database, It will create database mock object</p> <p>UPDATE</p> <p> I am writing like below </p> <code> ok($db = Denali::DB->new(), "Connect"); isa_ok($db, "Denali::DB"); my $dddd = Denali::DB->connect(); </code>