Testing our app mocking the 3rd party class

---

examples/mock-class/t/myapp-mocked.t

use strict;
use warnings;
use Test::More;

use Mock::Quick qw(qclass);
my $control;

BEGIN {
$control = qclass(
    -implement => 'SomeClass',
    -with_new => 1,
    -attributes => [ qw(name) ],
    get_salary => undef,
);
}


use MyApp;
is MyApp::give_name('Foo'), 'Foo';
is MyApp::get_my_salary, 22;

$control->undefine();

done_testing;