% if ( $doc->html ) { % my $html = $doc->html; % $html =~ s/<%\ +\$prj\ +%>/$prj/gi; <% $html %> % }else{ % ### Некоторая стандартная верстка промоблока % ############################################ % my $img = $doc->get_image ('picture'); % my $href = $doc->url; % my $target; % if ( $href && $href =~ /^http:/ ) { % $href = 'http://www.rambler.ru/click?from=market_'.$prj.'&_URL='.$href; % $target = ' target="_blank"'; % } % my ($a1, $a2) = $href ? ('','') : ('','');
<% $doc->name %>
<% $a1 %>\
% if ( ref $img && exists $img->{filename} ) {
|