ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Ђ­в®­ …ўбҐҐў                         2:5020/400     06 Apr 2001  14:03:48
 To : All
 Subject : Как заставить меняться ссылочку вместе с озображением
 -------------------------------------------------------------------------------- 
 

 Вот такой скрипт выводит мне картинки ($mypic), а как сделать так, чтобы при
 отражении какой-либо из картинок, ей соответствовала какая-то ссылка (для
 каждой картинки своя ссылка)
 
 #!/bin/perl
 $|=1;
 $mypic[0]="../photos/10l.jpg";
 $mypic[1]="../photos/11l.jpg";
 $mypic[2]="../photos/12l.jpg";
 $mypic[3]="../photos/1l.jpg";
 srand(time ^ $$);
 $pick = rand(@mypic);
 print "Content-type: image/gif\n\n";
 open (BANNER,$mypic[$pick]);
 print <BANNER> ;
 close (BANNER);
 
 --
 
 С уважением Антон Евсеев.
 
   HomePage: http://tourism.perm.ru
   E-mail: miracle@perm.raid.ru
   Fidonet: 2:5054/27.18
 --- ifmail v.2.15dev5
  * Origin: RAID-Internet (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    Как заставить меняться ссылочку вместе с озображением   Ђ­в®­ …ўбҐҐў   06 Apr 2001 14:03:48   Re: Как заставить меняться ссылочку вместе с озображением   Artem Chuprina   06 Apr 2001 14:20:14   Re: Как заставить меняться ссылочку вместе с озображением   Ђ­в®­ …ўбҐҐў   06 Apr 2001 15:23:34   Re: Как заставить меняться ссылочку вместе с озображением   crazy   12 Apr 2001 19:12:14