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

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

"PHP->PERL"
Сообщение от freevit (ok) on 29-Сен-04, 15:51  (MSK)
всем привет помогите разобраться : есть форма checkbox которая читает содержимое одного каталога(files. sql): ----------------------------------------------------------- <FORM action="c:\WebServers\localhost\cg-bin\loadata.pl" method="post"> opendir FDIR,"d:\Buckups" ; while($file = readdir FDIR) { print qq{ <INPUT TYPE="checkbox" NAME="$file">$file <br> }; } closedir FDIR; print qq{ <INPUT TYPE="submit" VALUE="update"> </form> ---------------------------------------------------------- теперь надо выбрать из checkbox один file.sql и при нажатии "submit" чтобы запускался скрипт "loadata.pl" который читает выбранный file iz checkbox : ------------------------ PHP: foreach($_POST["files"] as $k=>$box) { if($box == "1") { $flist .= "$k "; } system("c:\WebServers\usr\local\mysql\bin\mysql.exe db1 < $flist"); } ------------------------------------------ как это сделать в Перле?
	Рекомендовать в FAQ | Cообщить модератору | Наверх

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

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

1. "PHP->PERL"
Сообщение от Vladislav Lazarenko on 29-Сен-04, 22:05  (MSK)
>всем привет помогите разобраться : >есть форма checkbox которая читает содержимое одного каталога(files. sql): >----------------------------------------------------------- ><FORM action="c:\WebServers\localhost\cg-bin\loadata.pl" method="post"> >opendir FDIR,"d:\Buckups" ; >while($file = readdir FDIR) >{ >print qq{ ><INPUT TYPE="checkbox" NAME="$file">$file <br> >}; >} >closedir FDIR; >print qq{ ><INPUT TYPE="submit" VALUE="update"> ></form> >---------------------------------------------------------- >теперь надо выбрать из checkbox один file.sql и при нажатии "submit" чтобы >запускался скрипт "loadata.pl" который читает выбранный file iz checkbox : >------------------------ >PHP: >foreach($_POST["files"] as $k=>$box) >{ >if($box == "1") >{ >$flist .= "$k "; >} >system("c:\WebServers\usr\local\mysql\bin\mysql.exe db1 < $flist"); >} >------------------------------------------ >как это сделать в Перле? system(php phpscript.php);
	Рекомендовать в FAQ | Cообщить модератору | Наверх

Удалить

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

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