Hallo,<br><br>ich beschäftige mich grade unteranderem mit TDD unter Perl, kein Problem an sich Perl lässt sich sehr gut testen.<br>Leider weiß ich nicht so richtig  wie ich Zugriffe auf eine Datei Testen soll, ich will ja nicht jedes mal aufs Filessystem.<br>

Wenn ich jetzt sowas hab:<br><font face="courier new,monospace">sub read_from_file<br>{<br>  my @insert_line = ();  <br>  open(OUT, ">>", $file) or die qq/any errormessage/;<br>  while (<OUT>)<br>  {<br>
    push(@insert_line, $_);<br>  }<br>  close(OUT);<br>  return \@insert_line;<br>}<br>
  <br></font>Habt ihr ne Idee wie ich sowas Testen kann würde mich brennend interessieren. <br>Wenn ich aber danach google, finde ich leider nur Artikel zu den Dateitest Operatoren oden dem DATA Filehandle.<br><br>Danke im Vorraus<br>
<br>Gruß,<br>Basti<br><br>