You might try making two array's

 Code:
$Text = ReadLine(1)
$Counter = 0
DO 
  ReDim Preserve $Array1[$Counter]
  $Array1[$counter] = $Text
  $Text = Readline(1)
  $Counter = $Counter + 1
Until $Text = "FRENCH STARTS HERE"

$Text = ReadLine(1)
$Counter = 0
Do
  ReDim Preserve $Array2[$Counter]
  $Array2[$Counter] = $Text
  $Counter = $Counter + 1
  $Text = Readline(1)
Until @Error = 0
_________________________
Today is the tomorrow you worried about yesterday.