File: testimonial.inc

package info (click to toggle)
libapache-asp-perl 2.63-2
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 4,120 kB
  • sloc: perl: 6,044; php: 409; sh: 62; lisp: 22; makefile: 10
file content (26 lines) | stat: -rw-r--r-- 505 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
<% 
  my($args, $html) = @_;
  my %args = %$args;
%>
  <% if($args{href}) { %>
  <tr><td align=center>
     <a href="<%= $args{href} %>"><% 
       if($args->{image}) { 
         %><site:img src="$args{image}" alt="$args{title}" /><% 
       } else { 
         %><%= $args{title} %><% 
       } 
     %></a>
  </td></tr>
  <% } %>
  
  <tr><td>
  <%= $html %>
  <% if($args{'from'}) { %>
   <center>
    <br>
    <i>-- <%= $args{'from'} %></i>
   </center>
  <% } %>
  <hr size=1 width=80% >
  </td></tr>