从perl执行java类并捕获输出

Question

如何从perl执行java类。这个java类有一些system.out语句和system.error和警告语句我想只捕获sysout语句并在perl中打印。