File Coverage

lib/Comics/Utils/Icon.pm
Criterion Covered Total %
statement 9 10 90.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod 0 1 0.0
total 12 15 80.0


line stmt bran cond sub pod time code
1             #! perl
2              
3 1     1   914 use strict;
  1         2  
  1         30  
4 1     1   6 use warnings;
  1         2  
  1         32  
5              
6             package Comics::Utils::Icon;
7              
8 1     1   547 use MIME::Base64;
  1         658  
  1         152  
9              
10             our $VERSION = "1.00";
11              
12             sub icon {
13             # Clip art image by Cliparts.co
14 0     0 0   decode_base64(<
15             iVBORw0KGgoAAAANSUhEUgAAAGQAAABkCAMAAABHPGVmAAADAFBMVEUGBAYAAAABAQECAQIC
16             AgIEAwQEBAQFBQUGBgYIBQgKBgoICAgJCQkKCgoMCAwPCg8MDAwNDQ0ODg4QCxATDRMWDhYQ
17             EBASEhITExMUFBQWFhYbEhsdEx0YGBgaGhocHBweHh4fHx8jFyMpGiktHSwgICAhISEiIiIk
18             JCQmJiYnJycoKCgqKiosLCwuLi4vLy8xIDEyITI0IjQ2IzY7Jjs+KD4wMDAyMjI0NDQ2NjY4
19             ODg5OTk6Ojo7Ozs8PDw9PT0+Pj4/Pz9BKkFFLURHLkZILkdOM05QNFBaOlpgPmBAQEBCQkJD
20             Q0NERERGRkZISEhJSUlKSkpMTExNTU1OTk5QUFBRUVFSUlJUVFRWVlZYWFhaWlpcXFxeXl5k
21             QWNuSG5wSXBySnJ2TXZ4Tnh6T3p9UXx/Un5gYGBiYmJjY2NkZGRmZmZoaGhqampra2tsbGxt
22             bW1ubm5wcHBxcXFycnJ0dHR2dnZ4eHh6enp7e3t8fHx+fn5/f3+FVoSHV4aJWIiMW4yNXI2V
23             YZWZY5idZpyjaaKla6SscKyxc7G2drW4d7e/fL6AgICCgoKEhISGhoaIiIiJiYmKioqLi4uM
24             jIyOjo6QkJCRkZGSkpKTk5OUlJSWlpaYmJiampqbm5ucnJydnZ2enp6goKCioqKjo6OkpKSl
25             paWmpqaoqKipqamqqqqrq6usrKyurq6wsLCxsbGysrK0tLS2tra4uLi5ubm6urq7u7u8vLy9
26             vb2+vr7IgcfJgsjKg8rNhc3Ohs3Phs7UidPYjNfajdndj9zfkN7gkd/hkuDikuHmleXrmOrt
27             muzvm+7xnPDznfL1n/T3oPbAwMDCwsLExMTFxcXGxsbIyMjJycnKysrLy8vMzMzNzc3Ozs7P
28             z8/Q0NDS0tLT09PU1NTW1tbX19fY2Nja2trc3Nze3t7f39/g4ODi4uLk5OTl5eXm5ubo6Ojp
29             6enq6urs7Ozt7e3u7u7v7+/w8PDy8vLz8/P09PT29vb39/f4+Pj6+vr8/Pz9/f3+/v7///9I
30             BbhQAAAAAXRSTlMAQObYZgAAAAFiS0dEAIgFHUgAAAAJcEhZcwAAFxIAABcSAWef0lIAAAAH
31             dElNRQfgCwQMOybFh4TFAAAHb0lEQVRo3rWa208VRxzHz3dFPQkhMSfxRgJimpRTxeNLA5qY
32             Rl8pSFBbQOHZFjUV4oVL04c+C1oFNXu81BYLVkkALdG/QmZtY1OjNa2X2lhN06S2UbOdmd09
33             O7M7e8VOTthhdvb32e9cf785J5OJSI8+AU/vnHfLCvsyby51cvP17ft7P25ewfMdrBiaxQ18
34             brw67K6UaMVFA3pR14tF9qG5Pcz0WAbbDIOQnQGGbvMXeBsz8RAdgn0n18cstBNCMcZZ4Ibv
35             uSzQS1/BwO4YiKwuiRBzWMaUsE+fV8xDgN8wCIajGXuKIRAQcrz/6CS1dh1t4nP30cQkciWR
36             iAGFaTfXBsPoZ2mAGkSP++A0dlD7hN6hSvx2TSEBQ4H2rRwuUCUsTRgkC/FJKmGK3SCDVnEQ
37             BAgRYUM0Y4ZD6BsTmCfgJNZSVjm0MAi0YiSkC7Ytau0CG4Z8sBk6zXYN8uI53A2BUEaofSuH
38             ccOGbKaqiDPYDLIWYKXXYDeiEgLocSDHHClWC7kQw2iD1j857nSUCsLbKrq5qBSNTDCGRrwQ
39             MkI7FQPBkCroMSE6kzC80F47Z2USUBpxfkg5TsWGFC37XQ9M8yxdScocSJlVviYQgjY9PqRI
40             +/i188I9Vt/QSYNl901zutoR44Pgw7j2+QDDC3EGV6GWnIEwMbPoU0BiDiw7l4Mpp1acwn6x
41             YCVUkH3F+Er6vAzTzMFTVgMfBOv1BEqQN6MTXVpkSBsS9DkdWzEY5kuclyDP6DaYAIKWOBAz
42             q3m2ED0RJBbD/EveVHA8weiN2VqsVyRGVfH/UOKB6PODAM/tXigLhECbN8TaCBudjAqizxuS
43             5devIM9IAfJ+csg2GfKo0c5MtYnFBQGCYlJIzOGFHSXG5jQQ77Ly+2hHoWHPxGu5Ed1lBXWJ
44             7FtrlySlnW9US5fyS9YpvSoskFeSTXYHIlLw2c1S+ty5M4OLLoTu+ymai6Z/S5Almgu5aUOu
45             Q9xP0J5GSaXRIGy/eEuAWN2BOQmip1FST4w525E4X04zJcYCy5PYYhgiREsF2crdk73cYP6a
46             kXco7zrxidEiQA6nU7LT49I5WrDKKRP7JFfjt9XteOkbTgVBej2QaYuyQCuVocaFMP9BsjBM
47             jR+y+vMczfaoIcMeCHtzNrJcXxKC34WT8rsu9ixx6lmE0z4IsQIUp+ycBPH6uD6XQ6nkaz+E
48             XLwsCiMixDPJ/KucEjIl2/flhiU3VYIMKlbXalU4galg+zwn+8L4ImrvRqVCiREO8URa6HIf
49             hhKyFokhBI8lyMZs6eGegK0I7/khJKxPxhyGA/keQjSghvyCaCX27K20Lpo30nKXFZwJ2kY7
50             opS0aAWWcuCXgi+cc+OrwI07hyhI7Tr7daSLAHFOB5qCvQMcnickg27LAr4JiTTmDbFDkxA3
51             Z8g77RNDMtEQExFK1pbzao+DIbcxmhgSMITrrctCxWEBO30qHgiFjMSZjH4LYuiwklIaQyE9
52             gUruvPjztrNihUJY59eFQg4FKLGOtcw4SjJ0B6xO0/GvnApxlJg0xk4BEWrEUWKaI3riefJQ
53             qHIrjpLwQCOrVCLVmS9kQL1AvnyjELp0qSBypfu0T56lh0ygGANiOm5QOgi61TujHzKeGgLX
54             a9qU7wxWQpvrSHrIp0IQR9PeYCUfWbn+5smEkEVwWirHTE+C7T8qCFXSSi8bRFciJuSEOw9h
55             r4NZIKDj15ll0Ga4B1mRBCJ8CVGKCyYQ0CdVNNSwqlQgAUQIHY5ZSvI8TFBDYFWZJeRSIkhj
56             CXLSVtLAwig1hB/dbzTcFTkmRHTH7eaqPmkoOv4fpoQWV9kH9vEhWCMeCgqhG73ckqs+40py
57             dnQ0kgQinTxecKNO+ueO5ziKKdlC7Cp1SSDiYtIihLb08kCu+rMtUBUEJVAiuHTM2h9y1TtO
58             x/PmstfKNJC8CPlbrvoTLc05StYiwYxHv7j2tkBsLtO/n9SWwrldCSC75K0E+wQlnqpPKKTB
59             bq5pJFogPV87YiJQySvWJ7YS+1vGuJB78heozvgB8fs/MJognN0kWSB/RNl+iIlB6lUQOrTQ
60             aUFmUuyMA17nmpJ2KZQYFRA8fCt1x4LAH7MPUVvlKgjxfoF6eT20GJAlUJ1piO3uOuW0tM33
61             Ru6PD0KENCggV+g71/lqrjfIsOaDzEZDnsIf61SyMpxWtKs1gbynbV9GQTZJkKvtFfzUkD16
62             RQ3RfJCDiILsZgfjtfnaCmHAaNaWYv9T2HtsbOxib/MKbn+IlS07JB/pxRjCg011qwvNvT+c
63             Zc+vOiMfNt0d6Wqg7sPywvYDqLetjkJO2Xihg31ofVpo8BuQ/UUgJzZSK63e2VCozHdcihuf
64             8KWyaUZu606UiYw+eYBMZpEwCGJpDMK0rEE7mwJPS4wcMWYrMOVAjtCG9S0rcdJ21BLyLTdT
65             hwr5d1FO82/lcibFKZgsWWY2EuOobeGecPPX39jf51zs8ohfZoWlJwevZlrptFkNLexNzhlz
66             1P7owfQ/K4NWBnwXVqMSWIwP5vXbtVtojK60odxT8B9uxVa/VCTLAQAAAABJRU5ErkJggg==
67             EOD
68             }
69              
70             1;