|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Sergey Nepsha 2:5083/82 20 Dec 2002 21:53:00 To : All Subject : не получается :( --------------------------------------------------------------------------------
[skip]
my $login = param('login);
[skip]
"Избранник: ", $izbranik,br,
"Фото: ",
print header(-type => 'image/jpeg');
$img = view_image($login);
print img({-src => $img});
print p, hr, br, a({-href => url()}, "Вернуться на главную страницу");
}
sub view_image {
$login = $_;
$dbh = dbconnect();
$datas = $dbh->selectrow_array("SELECT thumb1 FROM love_photo WHERE name = ?",
undef, $login);
$dbh->disconnect();
return $datas;
}
Есть форма через которую заливают картинки , она обрабатывается, закидывает
картинки в базу (mysql) потом выводит страницу с благодарностями и введенной
информацией, и на этой же странице должна выводится миниатюра закинутой картинки
(в базе она имеется), но вместо нее выводится просто Content-Type: image/jpeg
.
выше представлен кусок кода где вызывается процедура которая поидее должна
считывать с базы эту картинку и выводить ее, но не работает, помогите плззз!!!
Заранее спасибо !
--
XMMS: Prodigy - Breath
--- tin/pre-1.4-19990216 ("Styrofoam") (UNIX) (Linux/2.4.18-3custom (i686))
* Origin: 68.net InterNetNews site (2:5083/82)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/12166a2d7cb2d.html, оценка из 5, голосов 10
|