Branch Coverage

blib/lib/Alien/Build/Plugin/Probe/GnuWin32.pm
Criterion Covered Total %
branch 4 34 11.7


line true false branch
26 0 0 $_[0] =~ /\s+/ ? :
35 1 2 if ($self->registery_key_regex)
41 1 2 unless $self->registry_key_regex or $self->registry_key_regex($self->registery_key_regex)
53 0 0 if ($^O eq 'MSWin32')
61 0 0 if (eval { do { &Module::Load::load('Win32API::Registry'); 1 } })
66 0 0 unless $self->native_only
72 0 0 unless Win32API::Registry::RegOpenKeyEx(Win32API::Registry::HKEY_LOCAL_MACHINE(), $uninstall_key_name, 0, Win32API::Registry::KEY_READ(), $uninstall_key)
84 0 0 unless $subkey =~ $self->registery_key_regex
86 0 0 unless Win32API::Registry::RegOpenKeyEx($uninstall_key, $subkey, 0, Win32API::Registry::KEY_READ(), $flex_key)
94 0 0 if (Win32API::Registry::RegQueryValueEx($flex_key, 'InstallLocation', [], Win32API::Registry::REG_SZ(), $data, []))
99 0 0 if (Win32API::Registry::RegQueryValueEx($flex_key, 'Inno Setup: App Path', [], Win32API::Registry::REG_SZ(), $data, []))
118 0 0 $path eq '' ? :
122 0 0 unless $path eq '' or -f $exe
127 0 0 if ($self->exe_match)
129 0 0 unless $out =~ $self->exe_match
131 0 0 if ($self->exe_version and $out =~ $self->exe_version)
135 0 0 unless $path eq ''