changeset 124 | 87081e9cf3ba |
parent 78 | 603b47708d37 |
115:0d4074ac2eee | 124:87081e9cf3ba |
---|---|
2 use 5.010; |
2 use 5.010; |
3 use strict; |
3 use strict; |
4 use warnings; |
4 use warnings; |
5 use IO::Uncompress::Gunzip qw(gunzip $GunzipError); |
5 use IO::Uncompress::Gunzip qw(gunzip $GunzipError); |
6 use autodie qw(:all); |
6 use autodie qw(:all); |
7 use if $^V >= v5.18 => (experimental => 'smartmatch'); |
|
7 |
8 |
8 our $VERSION = "0.1"; |
9 our $VERSION = "0.1"; |
9 |
10 |
10 use constant CIPHER => "aes-128-cbc"; |
11 use constant CIPHER => "aes-128-cbc"; |
11 |
12 |