{ # vim: ft=perl: die "USERNAME not set." unless defined ($USERNAME); use esmith::AccountsDB; $adb = esmith::AccountsDB->open_ro or die "Couldn't open AccountsDB"; $user = $adb->get($USERNAME) or die "No user $USERNAME in AccountsDB"; %props = $user->props; $props{EmailForward} ||= 'local'; $OUT = ''; }