Commit | Line | Data |
4829a0e1 |
1 | package TestBridge; |
2 | use Moo; |
3 | |
4 | use TestClass; |
5 | use Object::Remote; |
6 | |
7 | has object => (is => 'lazy'); |
8 | |
85152176 |
9 | sub _build_object { TestClass->new::on('-') } |
4829a0e1 |
10 | |
11 | sub result { (shift)->object->result } |
12 | |
13 | 1; |