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