Select Code to Download

    sub import_api_ex {
        my ( $lib, $sig ) = @_;
...
        my ( $name, @params ) = @_;
        Win32::API::Struct->typedef( $name, @params );
    }

DWORD QueryUsersOnEncryptedFile(
  LPCWSTR lpFileName,                        // file name
  PENCRYPTION_CERTIFICATE_HASH_LIST *pUsers  // hash list
);

BEGIN {
    define_struct(
...
          /
    );
}

sub query_users {
    my ( $self, $filename ) = @_;
...
      unless defined $func;

}

Win32::API::parse_prototype: WARNING unknown parameter type 'LPENCRYPT
+ION_CERTIFICATE_HASH_LIST*' at C:/Perl/site/lib/Wi
n32/API.pm line 248, <DATA> line 164.