[Массивы] Считать файл в массив, указывая разделитель

#include <Array.au3>

$aRead = StringSplit(StringStripCR(FileRead("File.txt")), @LF)
Dim $aArray1[$aRead[0]+1], $aArray2[$aRead[0]+1]

For $i = 1 To $aRead[0]
    $aSplit = StringSplit($aRead[$i], "-")
    
    $aArray1[0] += 1
    $aArray1[$aArray1[0]] = $aSplit[1]
    
    $aArray2[0] += 1
    $aArray2[$aArray2[0]] = $aSplit[2]
Next

_ArrayDisplay($aArray1)
_ArrayDisplay($aArray2)

#include <Array.au3>

$hFile = FileOpen('test.txt', 0)
$sText = FileRead($hFile)
FileClose($hFile)
$sText = StringReplace($sText, '-', @TAB)
$iAr = @extended
If Not $iAr Then Exit
$aRead = StringSplit(StringStripCR($sText), @LF)
Dim $aArray1[$iAr + 1], $aArray2[$iAr + 1]

For $i = 1 To $aRead[0]
	If StringInStr($aRead[$i], @TAB) Then
		$aSplit = StringSplit($aRead[$i], @TAB, 2)
		$aArray1[0] += 1
		$aArray1[$aArray1[0]] = $aSplit[0]

		$aArray2[0] += 1
		$aArray2[$aArray2[0]] = $aSplit[1]
	EndIf
Next
_ArrayDisplay($aArray1)
_ArrayDisplay($aArray2)