my $filename = 'test.rtf';
system(1, 'c:\\program files\\openoffice\\soffice\\swriter.exe', '-p', $filename);