HTTPS SSH
SYNOPSIS
        use Zug::SimpleZip;
        use Data::Dumper;
    
        my $folder = "tests";
        my $path = "/tmp/blah.zip";
        my $extra_file = "Makefile.PL";
        my $path_single_file = "/tmp/blah_single.zip";
        my $extract_to = "/tmp/blah_extracted";

        Zug::SimpleZip::archive_folder($folder, $path);
    
        if (Zug::SimpleZip::file_exists($path)) {
             my $result = Zug::SimpleZip::list_entries($path);
            print STDERR Dumper($result);
        } else {
           print STDERR "file " . $path . " not found\n";    
        }

        Zug::SimpleZip::archive_file($extra_file,$path_single_file);
    
        if (Zug::SimpleZip::file_exists($path_single_file)) {
            my $result = Zug::SimpleZip::list_entries($path_single_file);
        } else {
           print STDERR "file " . $path_single_file . " not found\n";    
        }    
    
        Zug::SimpleZip::extract_all($extract_to, $path);

        1;

STATUS
    sort of works, can extract archives, compress folders, compress single
    files

    only procedural interface, I don't want to lose the microseconds I am
    not sure I gained by using libzip ;)

PERFORMANCE NOTES
    there appears to be no performance gain over Archive::Zip on large
    files, and it is a bit slower on smaller files

DESCRIPTION
    create and extract zip archives with libzip

SUBROUTINES
  archive_folder
    Arguments:

    folder to archive
        path to folder, absolute or relative

    archive path
        for example test.zip

    Return: 1 on success, croaks on error

  archive_file
    Arguments:

    file to archive
        path to file, absolute or relative

    archive path
        for example test.zip

    Return: 1 on success, croaks on error

  extract_all
    Arguments:

    folder to extract to
        path to folder, absolute or relative

    archive path
        absolute or relative

    Returns: 1 on success, croaks on error

  list_entries
    Arguments:

    path to archive
        absolute or relative

    Returns: arrayref of filenames and folders included in the archive on
    success, croaks on error

TODO
    add a file to an existing archive
    extract a particular file from an archive, by name or by index
    replace a file in an archive
    delete a file from an archive
    compression levels

SEE ALSO
    Please use Archive::Zip if you need to manipulate zip files.
    Zug::SimpleZip is barely started and will do only very basic operations.

AUTHOR
    Emil Perhinschi, emilper at gmail.com

COPYRIGHT AND LICENSE
    Copyright (C) 2015 by Emil Perhinschi

    This library is free software; you can redistribute it and/or modify it
    under the same terms as Perl itself, either Perl version 5.20.2 or, at
    your option, any later version of Perl 5 you may have available.