{ my $rec = $DB->get('mozilla-sync') || $DB->new_record('mozilla-sync', {type => 'service'}); my $pw = $rec->prop('DbPassword'); if (not $pw){ $pw=`/usr/bin/openssl rand -base64 40 | tr -c -d '[:alpha:]'`; $rec->set_prop('DbPassword', $pw); } }