for-Schleife tut mehr als sie sollte

[Erik Tews]

#!c:/perl/bin/perl.exe

$daten = 0;
$index = ".txt";
$hantel = 0;
$zaehler = 0;

for($i=0;$i<=3;$i++)

daraus machst du ($i=1;$i<=3;$i++) oder ($i=0;$i<3;$i++). Dann sollte es gehen.

{

»»     $daten++;
»»     $hantel++;
»»     $zaehler++;
»»     open($hantel, ">$daten$index")
»»     print $hantel "Hallo $zaehler";
»»     close($hantel);

}