Branch Coverage

blib/lib/Module/CryptSource.pm
Criterion Covered Total %
branch 3 10 30.0


line true false branch
65 0 1 if not $0 =~ /\.exe$/i and ($ARGV[0] || '') eq '--ensrc'
68 1 0 unless ($ARGV[0] || '') eq '--desrc'
70 0 0 unless eval { do { thaw(unpack('N/a*', 'Crypt::Rijndael'->new(md5_hex(ReadMode(2), print('Enter the decryption key:'), scalar ))->decrypt(decode_base64(SRC)))) } }
77 0 0 unless open FH, ">$file"
108 1 0 ($ARGV[0] || '') ne '--desrc' ? :