DB<1> open $fh,'<','input2'

  DB<2> read $fh => $in, 100

  DB<3> p tell $fh
114                            # surprise
  DB<4> open $fh,'<:raw','input2'

  DB<5> p tell $fh
0
  DB<6> read $fh => $in, 100

  DB<7> p tell $fh
100
  DB<8>