Скачать: CL | DM;

Пара простых вопросов по Перлу.   Найти похожие ветки 

← →
Феликс ©   (2002-02-03 00:50) [0]

Подскажите если не сложно как сделать:
1) В этом форуме при создание темы есть Radio buttons. Выбрав из них определенную можно добавить определенную картинку в форум. Как такое сделать, а?
2) Один из моих скриптов добавляет текст. Как сделать так, чтобы текст добавлся, но перед вот такой фишкой <--------------------->. Т.е выглядеть это должно так:
11111
<-------------------------->
11111
2222
<--------------------------->
1111
222
333
<--------------------------->
И.Т.Д
Заранее благодарен

---

← →
Merlin ©   (2002-02-04 03:03) [1]

1) Значения Radio buttons = цифилькам, я их подставляю в результирующий файл в таком виде:
$imagen = ....; # получить значение переданное из формы
<img src="/forum/icon$imagen.gif">
А в папке /forum/ просто валяются icon.gif, icon1.gif, icon2.gif и т.д.
2) не понял, почему в третьем варианте уменьшилось число единиц и двоек, полагаю, что это опечатка.
$fishka="<--------------------------->"; # перед чем вставляем текст
$txt = ...; # здесь вставляемый текст
# Читаем файл
open(F, $FileName) || die "Can`t open file $FileName : $!";
my $lines = join("", <F>);
close(F);
$lines=~s/$fishka/$txt$fishka/;
# Записываем рез-тат
open(F, ">$FileName") || die "Can`t create a file $FileName : $!";
print F $lines;
close(F);

---

← →
Феликс ©   (2002-02-04 14:47) [2]

Ну, Merlin ©, я тебя раньше и так уважал, а теперь совсем уважать буду. Спасибо тебе! Да, раньше я скрывал свои чувства, но сейчас прямо без излишней стиснительности скажу, что рулезный сайт вы сделали. Еще раз Спасибо!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.006 c