use Devel::Cover qw(+ignore /path/to/project/,tests/ -silent 1 -summary 0 +select path/to/tool/to/get/cov); my $cmd = "Galic --path ./path/to/project --run --wait"; system($cmd); print("Done"); exit(0); #### cover -delete ./wrapper cover #### Reading database from /disk/work/playground/cover_db found cover.13 in /disk/work/playground/cover_db/runs/1570436863.1576.17667 at /usr/pkgs/perl/5.26.1/lib64/site_perl/Devel/Cover/DB.pm line 217. Devel::Cover: /disk/work/playground/cover_db/runs/1570436863.1576.17667 is an invalid database ----------------------------------------------------------------------------- File ----------------------------------------------------------------------------- Total ----------------------------------------------------------------------------- HTML output written to /disk/work/playground/cover_db/coverage.html done.