primes= ReadList[ "primefile", Expression]

Out[71]=

  {{2, 3, 5, 7, 11, 13, 17, 19, 23}}

Up to File IO