#!/usr/bin/perl

use strict;

while (1) {

  if (not grep {/soffice\.bin/} `ps ax`) {
    sleep 5;
    # give the process time to end...
    system("/usr/lib/openoffice.org2.0/program/soffice.bin -nodefault -nologo"); 
  }
}