>PHP:
>foreach($_POST["files"] as $k=>$box)
>{
>if($box == "1")
>{
>$flist .= "$k ";
>}
>system("c:\WebServers\usr\local\mysql\bin\mysql.exe db1 < $flist");
>}
>------------------------------------------
уже заработал :)? вообще-то хватит даже так (если я правильно понял отсутствующую логику того, что ты пытаешься сделать) - но тут нету никакой фильтрации по input.type
foreach ($_POST as $k => $garbage)
`c:\WebServers\usr\local\mysql\bin\mysql.exe db1 < $k`;
>как это сделать в Перле?
см. для начала модуль CGI, к-рый парсает запрос
$query = new CGI;
@names = $query->param;
for (@names) {
`c:\WebServers\usr\local\mysql\bin\mysql.exe db1 < $_`;
}