bookselleremail => undef,
booksellerurl => undef,
currency => undef,
othersupplier => undef,
listprice => 'list_currency',
invoiceprice => 'invoice_currency',
gstreg => 'gst',
for my $field (
'bookselleremail', 'booksellerfax',
'booksellerurl', 'othersupplier',
'booksellerurl',
'currency', 'invoiceprice',
'listprice', 'contacts'
)
-