regexp {Log Message:\n*-----------\n*(.*)Modified Paths:} $descr var1 var2