File Coverage

test-lib/Car/Mercedes.pm

Criterion	Covered	Total	%
statement	7	10	70.0
branch			n/a
condition	1	3	33.3
subroutine	3	6	50.0
pod	0	4	0.0
total	11	23	47.8

package Car::Mercedes;

use Class::Interface;
implements 'Car::Interface', 'Car::Runnable';

use base 'Car::German';

sub new {
  return bless( {}, ref($_[0]) || $_[0] );
}

sub openDoors {
	print "Doors open upwards -- this ist eine Gullwing :->";
}
sub closeDoors {
	print "Doors close downwards"
}

sub run {
  print "Look... I am flying over the german speeeeeedways"
}

1;