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