Mercurial > repo
comparison bin/unzip @ 11864:d054de7f80f2 draft
<ais523> ` sed -i -e \'s/unzip(shift)/unzip(@_)/\' bin/unzip
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Tue, 16 Jul 2019 21:36:58 +0000 |
parents | 8af93d121629 |
children | 088b9d939e57 |
comparison
equal
deleted
inserted
replaced
11863:f9a75cd614b3 | 11864:d054de7f80f2 |
---|---|
20 use IO::File; | 20 use IO::File; |
21 use IO::Uncompress::Unzip qw($UnzipError); | 21 use IO::Uncompress::Unzip qw($UnzipError); |
22 use File::Path qw(mkpath); | 22 use File::Path qw(mkpath); |
23 | 23 |
24 # example code to call unzip: | 24 # example code to call unzip: |
25 unzip(shift); | 25 unzip(@_); |
26 | 26 |
27 =head2 unzip | 27 =head2 unzip |
28 | 28 |
29 Extract a zip file, using IO::Uncompress::Unzip. | 29 Extract a zip file, using IO::Uncompress::Unzip. |
30 | 30 |