[autoit]
#include <Array.au3>
Global $s_Path = 'test.txt'
_ArrayDisplay (StringRegExp (FileRead ($s_Path), 'Autor (.+)', 3))
Oder...
Global $s_Path = 'test.txt'
Global $s_Read, $i_Error, $i_Line = 0
Do
$i_Line += 1
$s_Read = FileReadLine ($s_Path, $i_Line)
$i_Error = @error
If StringInStr ($s_Read, 'Autor') Then MsgBox (0, '', $s_Read)
Until $i_Error = -1