Пожалуйста, помогите разобраться с программой, halfbyte, 10-Мрт-04, 18:25 [смотреть все]я сделал простейший счетчик на перле, который читает из файла значение, печатает его, инкрементирует, затем сохраняет обратно в файл. так вот, этот счетчик увеличивается на 4 т.е. 0, 4, 8, ...текст программы #!/usr/local/bin/perl use CGI; $cnt = "w:/new-site/cgi-bin/cnt/cnt.txt"; $temp = 0; open (INPUT, "<$cnt"); $temp = <INPUT>; close INPUT; $temp = $temp + 1; print "<span class=simpletext>$temp</span>"; open (OUTPUT, ">$cnt"); print OUTPUT $temp; close OUTPUT; он стал считать нормально только после того, как я начал приплюсовывать не 1, 0.25. господа программисты, скажите, что это??? у меня чуть башню не снесло, пока ломал голову над этим феноменом.
|
|