форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка

Вариант для распечатки		Архивированная нить - только для чтения!  Пред. тема | След. тема
Форумы Программирование под UNIX (Public)
Изначальное сообщение		[Проследить за развитием треда]

"Формат текста в PERL"
Сообщение от Friker (ok) on 26-Авг-04, 20:12  (MSK)
Элементарное дело, а у меня кривые руки.... Необходимо что-бы скрипт (perl) зоздовал страничку с ввыводом в неё команды ipfw show, скрипт у меня идёт по крону и просматриваю  я страничку через броузер,но формат получается жуткий... Идёт всё в перемешку.... приметр: ****************** #!/usr/bin/perl5 open (FILE , ">/usr/local/apache/htdocs/log/log.html"); print FILE qq~ <meta http-equiv="Content-Type" content="text/html; charset=windows-1251"> <h2>IPFW SHOW </h2> ~; print FILE `ipfw show`; closefile(FILE); ****************** Как сделать что бы вместо месева которое у меня на страниче был вывод как в консоли??? Заренее благодарен!
	Рекомендовать в FAQ | Cообщить модератору | Наверх

Индекс форумов | Темы | Пред. тема | След. тема

Сообщения по теме

1. "Формат текста в PERL"
Сообщение от XMan (??) on 26-Авг-04, 20:17  (MSK)
Заменить все переносы, которые есть в `ipfw show` на "<BR>" (без кавычек). Читайте доки по HTML :)
	Рекомендовать в FAQ | Cообщить модератору | Наверх

	2. "Формат текста в PERL"
	Сообщение от Friker (ok) on 26-Авг-04, 20:29  (MSK)
	>Заменить все переносы, которые есть в `ipfw show` на "<BR>" (без кавычек). >Читайте доки по HTML :) Я и спрашиваю как это сделать. Я HTML знаю , ты видел как команда идёт? Надо , только КАК ???
		Рекомендовать в FAQ | Cообщить модератору | Наверх

	3. "Формат текста в PERL"
	Сообщение от XMan (??) on 26-Авг-04, 21:16  (MSK)
	На вскидку: ($_ = `ipfw show`) =~ s/\n/<BR>\n/g && print FILE || print FILE "ошибка"; В замене можно просто <BR> без \n. Это сделано для удобства чтения в виде текста.
		Рекомендовать в FAQ | Cообщить модератору | Наверх

	4. "Формат текста в PERL"
	Сообщение от mirya on 26-Авг-04, 21:33  (MSK)
	print '<pre>', `my_shell_command`, '</pre>'; # в пре переносы остаются переносами, текст не врапается
		Рекомендовать в FAQ | Cообщить модератору | Наверх

	5. "Формат текста в PERL"
	Сообщение от XMan (??) on 26-Авг-04, 21:38  (MSK)
	Мда... Про pre я как-то сразу и не подумал. Редко использую :)
		Рекомендовать в FAQ | Cообщить модератору | Наверх

6. "Формат текста в PERL"
Сообщение от chip (??) on 27-Авг-04, 08:36  (MSK)
>Элементарное дело, а у меня кривые руки.... >Необходимо что-бы скрипт (perl) зоздовал страничку с ввыводом в неё команды ipfw >show, скрипт у меня идёт по крону и просматриваю  я >страничку через броузер,но формат получается жуткий... >Идёт всё в перемешку.... > приметр: > >****************** >#!/usr/bin/perl5 >open (FILE , ">/usr/local/apache/htdocs/log/log.html"); >print FILE qq~ ><meta http-equiv="Content-Type" content="text/html; charset=windows-1251"> ><h2>IPFW SHOW </h2> > ~; >print FILE `ipfw show`; > >closefile(FILE); >****************** > >Как сделать что бы вместо месева которое у меня на страниче был >вывод как в консоли??? >Заренее благодарен! use format perldoc -f  format
	Рекомендовать в FAQ | Cообщить модератору | Наверх

Удалить

Индекс форумов | Темы | Пред. тема | След. тема

Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.