$write = File::KDBX::IO::HmacBlock->new($write, key => $KEY);
print $write $expected_plaintext;
close($write) or die "close failed: $!";
$write = File::KDBX::IO::HmacBlock->new($write, key => $KEY);
print $write $expected_plaintext;
close($write) or die "close failed: $!";