perl -e '$c="perl ./infobot/infobot ./sinfobot/conf/infobot.config";while(1){@l=`ps -ef|grep "$c"`;system($c)unless grep{!/grep/}@l;print "\n";sleep(10)}' &