local $Dsay::d_area = '...';