perlCGI (напечатать адресную строку GET)
Копай $ENV{QUERY_STRING}
NV{QUERY_STRING}ага. уже лучше. Блин плохо что я перл не знаю
Сейчас буду ботать его регекспы и как там вообще циклы делаются Может кто поможет? Что то у меня не получается 
( Есть переменная $NAMES= [ 'xxx', 'yyy', 'zzz' ] и $ENV{QUERY_STR}. из quer_str нужно вырезать первый параметр (до первого & а потом прогнать цикл по NAMES заменяя в query_str заданную подстроку (типа blablabla=что то на blablabla=XXX из NAMES. Пока только обрезать получилось
( Есть переменная $NAMES= [ 'xxx', 'yyy', 'zzz' ] и $ENV{QUERY_STR}. из quer_str нужно вырезать первый параметр (до первого & а потом прогнать цикл по NAMES заменяя в query_str заданную подстроку (типа blablabla=что то на blablabla=XXX из NAMES. Пока только обрезать получилось В php это делается так (не знаю просто, какой синтаксис замен в перле):
$res=Array;
foreach($NAMES as $val) $res[]=preg_replace("/^([^=]*)=[^&]&(.*)$/si","\\1=".$val."&\\2",$_ENV['QUERY_STRING']);
тогда в res у тебя будут лежать все эти нужные строки
$res=Array;
foreach($NAMES as $val) $res[]=preg_replace("/^([^=]*)=[^&]&(.*)$/si","\\1=".$val."&\\2",$_ENV['QUERY_STRING']);
тогда в res у тебя будут лежать все эти нужные строки
foreach(@NAMES){
my $str = 'blablabla='.$_.$remainder;
}Это не труъ.
Уфф - почти со всем разобрался В общем мне все портил use strict. - C ним все логичные конструкции ведут к ошибке
В общем мне все портил use strict. - C ним все логичные конструкции ведут к ошибке люди. Внимание вопрос У меня полчилась строка типа
Мне нужно написать что то типа <img src="test.cgi?моястрока" > Вышеупомянутая строка печатается нормально. Как только я печатаю второй вариант - все. Какие то символы ему не нравятся.. в чем дело?
У меня полчилась строка типа peak=on&constant=0&inclination=40&fitpeak=on&pphase=0&zrot=0?
Мне нужно написать что то типа <img src="test.cgi?моястрока" > Вышеупомянутая строка печатается нормально. Как только я печатаю второй вариант - все. Какие то символы ему не нравятся.. в чем дело?
Как только я печатаю второй вариант - все.ЧТо - "всё"?
Напиши код, которым ты выводишь
<img src="test.cgi?моястрока" >ЗЫ: И ещё, у тебя разрешение монитора какое? Что-то типа 7680*4800, да?
сорри за длинную строку. Код прост:
print "\<img src\\=lcurve.cgi\?$param\>"
print "\<img src\\=lcurve.cgi\?$param\>"
Всё-таки, что значит, что это у тебя нек работает? Какая ошибка возникает?
Все короче. Что то ему внутри тега не нравилось. написал print '<img src=lcurve.cgi?' . $param . '>' - заработало
Оставить комментарий
gsharov
Допустим я хочу просто напечатать адресную строку которая ушла скрипту из GETa. Как сие сделать без лишней пыли?Я пока что то только до цикла по именам параметров додумался... Вообще то - конечная задача - не просто напечатать, а печатать, меняя один из параметров по циклу.