Страница 1 из 1

[perl] Экранирование кавычек

Добавлено: 2011-03-15 14:31:06
ProFTP
есть запись

Код: Выделить всё

print "content-type:text/html....";
мне нужно вставить JavaScript, чтобы в любом случае можно было бы писать знак кавычки: можно так, экранируя:

Код: Выделить всё

print "content-type:\"text/html\"....";


как "взять" текст, написать эти кавычки, чтобы не экранировать знаком \ ??
пробовал, но не получается, все вермя отваливается

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-15 16:24:10
unix-admin
А так:

Код: Выделить всё

print "content-type:'text/html'....";
..?

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-15 16:38:25
ProFTP
нужно написать так:

Код: Выделить всё

oncontextmenu="return show_calendar('start',null,'to')"
если так, то не работает

Код: Выделить всё

oncontextmenu='return show_calendar('start',null,'to')'
ЗЫ: это как-то можно на перле написать, есть несколько вариантов, я просто не могу найти и понять как записать...

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-15 17:03:04
hizel

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-15 17:12:48
ProFTP
я это читал, но оно не работало :) точнее работало...

сделал!

проблема была в том что при таком варианте:

Код: Выделить всё

print q(content-type:text/html\n\n ...............""...);
выводило ошибку 500 и вродебы писало, что не может распарсить

а так:

Код: Выделить всё

print "content-type:text/html\n\n";
print q(cont "sdf" s);
работает!!

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-16 11:55:47
thefree
что я делаю не так?

Код: Выделить всё

/root/>perl -e 'print qq{type:text/html\n\n ...............""...\n};'
type:text/html

 ...............""...
Учите мат. часть!!!

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-16 13:23:54
ProFTP
thefree писал(а):что я делаю не так?

Код: Выделить всё

/root/>perl -e 'print qq{type:text/html\n\n ...............""...\n};'
type:text/html

 ...............""...
Учите мат. часть!!!
ProFTP писал(а):
проблема была в том что при таком варианте:

Код: Выделить всё

print q(content-type:text/html\n\n ...............""...);
выводило ошибку 500 и вродебы писало, что не может распарсить

а так:

Код: Выделить всё

print "content-type:text/html\n\n";
print q(cont "sdf" s);
работает!!

если зайти с браузера, то ошибка 500

только что еще раз попробовал, ради интеерса:

выдали ошибку 500

Код: Выделить всё

print q(content-type:text/html\n\n<script src='http://ajax.googleapis.com/ajax/libs/jquery/1.4.4/jquery.min.js' type='text/javascript'></script> sdf);
а тут нет

Код: Выделить всё

print "content-type:text/html\n\n<script src='http://ajax.googleapis.com/ajax/libs/jquery/1.4.4/jquery.min.js' type='text/javascript'></script> sdf";
сделал! тема не актуальная :)

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-16 13:47:56
thefree
Учите мат. часть!!! И научитесь НОРМАЛЬНО ЧИТАТЬ ДОКУМЕНТАЦИЮ !!!
===
костыле строением не устали заниматься?!

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-16 13:59:55
hizel
ну выдыхай уже, зачем ты нервничаешь :-) нервные клетки не восстанавливаются!

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-16 18:23:28
Гость
оператор q() не интерполирует ничего, а qq() интерполирует. Поэтому print q(\n) выведет '\n', а print qq(\n) переведёт строку на следующую.

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-16 18:53:28
hizel
Изображение

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-16 23:15:03
thefree
hizel писал(а):ну выдыхай уже, зачем ты нервничаешь :-) нервные клетки не восстанавливаются!
print "content-type:text/html\n\n"; - это пиздец ...

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-16 23:36:47
hizel
еще ровнее дыши! таак! идешь к успеху ;-)

Re: [perl] Экранирование кавычек

Добавлено: 2011-03-17 12:58:03
ProFTP
:smile:
Изображение