perl -MDevel::Cover=-silent,1,-db,${cover_db}" <script>