Вариант для распечатки		Пред. тема | След. тема
Форум Программирование под UNIX (Perl)
Режим отображения отдельной подветви беседы		[ Отслеживать ]

Помогите с perl, Cyrus_user (?), 08-Июн-07, (0) [смотреть все] print FILE mail data n if data ne dat 2 перевести в unixtime и вычесть , cat (??), 10:26 , 08-Июн-07, (1) // ой,слона то я и не заметил спасибо пробую спасибо однако не всё так просто, Cyrus_user (?), 11:04 , 08-Июн-07, (2) // open FILE, , file tmp 124 124 die cannot open file while FILE , Homewrecker (ok), 11:11 , 08-Июн-07, (3)   // но так он из файла ничего не читает , Cyrus_user (?), 11:43 , 08-Июн-07, (4)   http perlmonks org node_id 128200, cat (??), 12:03 , 08-Июн-07, (5)   о спасибо большое , Cyrus_user (?), 15:12 , 08-Июн-07, (6)   1

Сообщения

[Сортировка по времени | RSS]

	3. "Помогите с perl"	+/–
	Сообщение от Homewrecker (ok), 08-Июн-07, 11:11
	>>>print FILE,"$mail:$data\n" if ($data ne $dat); >>print FILE "$mail:$data\n" if ($data ne $dat); >> >ой,слона то я и не заметил :) спасибо. > >>2 перевести в unixtime и вычесть количество секунд в 10 днях и >>обратно в дату >пробую... спасибо. > > >однако не всё так просто. редактирование inline что-то не работает. в таком >виде скрипт ничего не делает.. >+> сначала очистит, потом добавит.. заводить временный массив? >+< добавляет желаемое в конец. open (FILE,">>","file.tmp") || die "cannot open file"; while (<FILE>) {..
	Ответить | Правка | Наверх | Cообщить модератору

	4. "Помогите с perl"	+/–
	Сообщение от Cyrus_user (?), 08-Июн-07, 11:43
	>>>>print FILE,"$mail:$data\n" if ($data ne $dat); >>>print FILE "$mail:$data\n" if ($data ne $dat); >>> >>ой,слона то я и не заметил :) спасибо. >> >>>2 перевести в unixtime и вычесть количество секунд в 10 днях и >>>обратно в дату >>пробую... спасибо. >> >> >>однако не всё так просто. редактирование inline что-то не работает. в таком >>виде скрипт ничего не делает.. >>+> сначала очистит, потом добавит.. заводить временный массив? >>+< добавляет желаемое в конец. >open (FILE,">>","file.tmp") || die "cannot open file"; >while (<FILE>) {.. но так он из файла ничего не читает..
	Ответить | Правка | Наверх | Cообщить модератору

	5. "Помогите с perl"	+/–
	Сообщение от cat (??), 08-Июн-07, 12:03
	http://perlmonks.org/?node_id=128200
	Ответить | Правка | Наверх | Cообщить модератору

	6. "Помогите с perl"	+/–
	Сообщение от Cyrus_user (?), 08-Июн-07, 15:12
	>http://perlmonks.org/?node_id=128200 о! спасибо большое!
	Ответить | Правка | Наверх | Cообщить модератору

Архив | Удалить

Рекомендовать для помещения в FAQ | Индекс форумов | Темы | Пред. тема | След. тема