Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Название темы: Генерация кода <a>. Perl.
Показать сообщение отдельно

редкий гость


Сообщения: 1696
Благодарности: 44

Профиль | Сайт | Отправить PM | Цитировать


Код: Выделить весь код
$sid='10';
print "<a href='index.php?somstuff=someotherstuff@{[param(sid,$sid)]}'>\n";
undef $sid;
print "<a href='index.php?somstuff=someotherstuff@{[param(sid,$sid)]}'>\n";
sub param { return "&@_[0]=@_[1]" if(@_[1]); }
у меня вполне работает. Ыерсия перла 5.6. Я не большой специалист, вполне вероятно, что возможность вызывать функции из кавычек регулируется при сборке или ключами командной строки/хитрыми ключевыми словами. Тем не менне приведённый пример у меня работает.

-------
http://ivank.ru


Отправлено: 19:54, 18-08-2005 | #2

Название темы: Генерация кода <a>. Perl.