проверьте, запущена ли программа, и запустите ее, если не в Perl

Я хочу знать, как проверить, запущена ли программа, и запустить эту программу, если нет.