Forum Webscript.Ru
		Программирование => Perl => Тема начата: altoris от 01 Апреля 2004, 12:04:48
		
			
			- 
				Нужен простейший скрипт написания БД:
 не как могу понять как его сделать (
 
 Есть БД(BD.txt)  вида:
 a1|1|2|3|4|5
 a2|6|5|3|6|1
 a3|3|2|3|5|3
 
 Есть так же шаблон странички:
 
 Скрипт нужен такого типа:
 так вот чтобы эти циферки в зависимости от запроса a1/a2/a3 отображались на страничке (шаблоне)
 Вижу что все крайне просто, но не могу реализовать, т.к. знаний мало, даже скажу проще нет :(
 Скрипт может быть как на php так и на Perl все равно, сервер поддерживает все...
- 
				perldoc -f open
 perdoc perlop в части <>
 perldoc -f close
 perldoc -f print
- 
				это мало что для меня говорит :(
			
- 
				altoris
 передавайте страничке с шаблоном параметры, используя QUERY_STRING
 в коде странички пропишите
 script.cgi анализирует переданные пар-ры. считываейте им ваш BD.txt, создавая (лучше всего хэш) где ключами будут а1/а2...
 и все. ;) дальше сравнить полученное с имеющимся и сгенерить нужное (ссылки, например) - дело тривиальное. ;)
- 
				надеюсь поможет.
 open (WORDSLIST, "$filename");
 @file=;
 ($bd,$c1,$c2,$c3,$c4,$c5)=split(/|/,$file[$stroka]);
 print "$bd,$c1,$c2,$c3,$c4,$c5";