Вернуться   Дизайнерский форум » ВЕБ-ПРОГРАММИРОВАНИЕ » ASP, Perl, PHP и MySQL

помогите молодому и неопытному новичку

Обсуждение темы помогите молодому и неопытному новичку в разделе ASP, Perl, PHP и MySQL, часть категории ВЕБ-ПРОГРАММИРОВАНИЕ; кружится голова и ничего не понимаешь - так и у тебя было, когда ты начинал или нет?...


Закрытая тема
 
Опции темы
Старый 26.08.2005, 11:54   #21
кружится голова и ничего не понимаешь - так и у тебя было, когда ты начинал или нет?
 
Старый 26.08.2005, 11:54
Ссылки
Старый 26.08.2005, 11:57   #22
GRoM, я перл почти не знаю. просто, когда нужно, я могу разобраться. И перл не такой уж и сложный язык. Во многих моментах он значительно проще php.

$origfile = "/$page/originalfile.htm"

переменная $page передается через STDIN и подставляется в переменную $origfile

В итоге, ты имеешь переменную $origfile со значением "/your_page/originalfile.htm"

Здесь нет ничего сложного.
 
Старый 26.08.2005, 12:17   #23
т.е. я должен написать так
Код:
$origfile = "http://$page/originalfile.htm"
 
Старый 26.08.2005, 12:21   #24
GRoM, нет. ты объявление добаляешь, что ли, на чужой сайт?
 
Старый 26.08.2005, 12:28   #25
тогда
Код:
$origfile = "С/..../$page/originalfile.htm"
короче,я вот это не понимаю
 
Старый 26.08.2005, 12:49   #26
GRoM, ты знаешь разницу между относительными и абсолютными путями?
Если у тебя скрипт лежит в директории cgi-bin(или cgi), то путь должен быть просто /$page/file.htm

ты как вообще скрипты пишешь?
 
Старый 26.08.2005, 13:38   #27
теперь понял

Цитата:
ты как вообще скрипты пишешь?
пишешь - это круто сказано!Это мой первый.

Nielson,ты когда окончательно разозлишься и не будешь мне помогать,пожалуйста,скажи мне,а то буду седеть ответа ждать за зря.Договорились?
 
Старый 26.08.2005, 13:40   #28
GRoM, я не злюсь. у нас тут не phpclub и не deforum. :-) Так что, спрашивай, когда что-то непонятно.
 
Старый 26.08.2005, 13:49   #29
спасибо.
пока попробую всё выше приведённое переворить.

GRoM добавил [date]1125050378[/date]:
Да,вот ещё забыл,я ведь хотел спросить,может знаешь какой-нибудь хороший учебник,статью ....,где подробно может быть написано про наш разговор, именно про передачу данных.
 
Старый 01.09.2005, 12:18   #30
Nielson, помоги.
Можешь мне дураку объяснить всё по-порядку заново?
Итак, у меня скрипт такой:

Код:
#!/usr/local/bin/perl
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
#Эта строка читает данные со стандартного входа и помещает их в переменную $buffer. Длина строки передается скрипту через переменную окружения CONTENT_LENGTH.

@pairs = split(/&/, $buffer);
#Теперь мы получили массив @pairs со следующими строковыми переменными:
#[1] user_name=Andy+Novikov
#[2] co_name=TeleSputnik
#[3] phone=(812)+123-45-67
#Теперь нам необходимо разбить эти строки на пары параметр-значение:
foreach $pair (@pairs) {
  ($name, $value) = split(/=/, $pair);
  $value =~ tr/+/ /; # заменяем плюсы на пробелы
  $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
  $value =~ s///g;
  $input{$name} = $value;
}


# Определяем переменную, содержащую путь к исходному файлу
$origfile = "C:/Documents and Settings/роман/Рабочий стол/сайт/пример.html";
# Определяем переменную, содержащую путь к временному файлу
$newfile = "C:/Documents and Settings/роман/Рабочий стол/сайт/проба2.html";
open(INFILE, "<$origfile");
open(OUTFILE, ">$newfile");
while ($line = <INFILE>) {
  printf OUTFILE $line;
  if ($line =~ //i) {
    # Добавляем новые данные в файл:
    print OUTFILE "\n\n";
    print OUTFILE "Имя: ", $input{'name'},"\n
";
    print OUTFILE "Компания: ", $input{'co_name'},"\n
";
    print OUTFILE "Телефон: ", $input{'phone'},"\n</p>\n

<hr></p>\n";
  }
}
# Закрываем файлы
close(INFILE);
close(OUTFILE);
# Удаляем исходный файл и переименовываем новый в исходный
unlink($origfile);
rename($newfile, $origfile);


print "Content-Type: text/html\n\n";

print "<html>\n<head>\n<title>Спасибо</title>\n</head>";
print "<body>\n<h1>Спасибо за заполнение формы</h1>";
print "Мы получили ваше имя, место работы и телефон,";
print " которые вы видите ниже:
\n";
print "Имя: ", $input{'name'},"\n
";
print "Компания: ", $input{'co_name'},"\n
";
print "Телефон: ", $input{'phone'},"\n</p>\n

<hr></p>\n";
print "</body>\n</html>";
Как мне его нужно переделать,что бы при выборе в форме (в списке)определённой строки объява помешалась на нужную страницу?Например, выбрал продать - объява на странице 1,выбрал купить - на странице 2 и т. д.

Форма такая:
Код:
<form method=post action="http://localhost/cgi-bin/obyava.cgi">
<center><font size="5"color="#c80430">создаём объявление</font></center>


<center><INPUT TYPE="TEXT" name="name" SIZE="20" VALUE="ваше Ф.И.О."> 
<INPUT TYPE="TEXT" NAME="мой адрес" SIZE="20" VALUE="ваш адрес">

<INPUT TYPE="TEXT" NAME="мой E-mail" SIZE="20" VALUE="ваш E-mail">
<INPUT TYPE="TEXT" NAME="мой телефон" SIZE="20" VALUE="ваш телефон">
</center>

<font color="FFEBCD" title="здесь можно написать текст вашего объявления"><center>текст объявления</center></font>

<center>
<TEXTAREA name="example" COLS=50 ROWS=10>
</TEXTAREA>
</center>

<center>
</center>


<select name="n">
<option valuе="n1">купить
<option value="n2">продать
<option value="n3">менять
</select>
<center>
<INPUT TYPE="reset" value="сброс"> <INPUT TYPE="submit" value="готово"> </center>
</form>
 
Старый 01.09.2005, 12:18
Закрытая тема




Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите новичку localhost ASP, Perl, PHP и MySQL 6 13.01.2009 14:31
Помогите новичку! dva81 Технологии Flash 12 24.11.2005 20:04
помогите новичку! absolute zero! Технологии Flash 2 30.12.2004 12:49
помогите новичку! Макс Растровая графика 5 23.11.2004 16:55
Помогите новичку!!!!! Plz!!! Dis HTML, CSS, JavaScript 3 03.06.2003 03:22


Текущее время: 16:49. Часовой пояс GMT +4.

Реклама на форуме Условия размещения рекламы
Биржа ссылок Заработай на сайте!
Дизайнерский форум