# $dbfh continues from above
$dbfh->print(join $/, (id => '42', name => 'Answer', '');