#!/usr/bin/perl

use Modern::Perl;
use C4::Members;
my $member = C4::Members->GetMember( borrowernumber => 1 );

