benny your code doesn't actually do what he is trying to do, but I decided to golf it anyways
Code:

Dim $Element,$Output
if 0 = Open(1,"p.csv")
  do
      For Each $Element in Split(ReadLine(1),",")
        $Output = $Output + $Element
      Next
      ? $Output
  until @ERROR
EndIf