use DateTime;
use JSON;
use Data::Dumper;
use utf8;
use C4::Circulation;
use C4::Biblio;
);
my %data = (
cardnumber => "123456789",
firstname => "Tomasito",
firstname => "Tômàsító",
surname => "None",
surname => "Ñoné",
categorycode => $patron_category->categorycode,
branchcode => $library->branchcode,
-