用perl执行程序员

Question

我有一个C程序，我必须用Perl和Test ::编写测试::更多。
但是，我的C程序是一个重复。
这是一个简短的示例：
编译

clang main.c -o database.db
./database.db

初始的Amplion

db>

在此中

db> insert 1 guilherme

Execute命令...嗯...这是一个程序运行。

现在，我在Perl中进行了测试，就是这样：
测试是否现在编译确定

ok(&compile(), "Compile is sucess");
sub compile {
    my $compile = "clang $SRC_PATH/main.c -o test.db";
    system $compile;
    return -e "test.db";
}

需要在C中执行程序后发送

system "./test.db"
... parse commands

命令

3 warnings generated.

ok 1 - Compile is sucess

，我 跑步。

有人用perl脚本或其他语言帮助我执行程序吗？

project_link