% if ( exists($MULTI->{filename}) ) { % my $TYPE = 'unknown'; % if (length($MULTI->{ext}) > 0) { % if (-e $keeper->{state}->{mason_comp}.'/contenido/i/icons/'.$MULTI->{ext}.'.gif') { % $TYPE = $MULTI->{ext}; % } % } % } % % foreach my $iattr (sort (@{ $iattrs })) { % next if ( !ref $iattr && ($iattr eq 'filename') || ($iattr eq 'mini') || ($iattr eq 'width') || ($iattr eq 'height') ); % if ( ref $iattr eq 'ARRAY' ) { % } elsif ( ref $iattr eq 'HASH' ) { % } else { % } % }
<% $rusname %> / name="<% $attr %>"
file url
<% $MULTI->{sourcename} || $MULTI->{filename} %>
Тип: <% uc($MULTI->{ext}) %>
Размер: <% int($MULTI->{size}/1024) %> Кб
<% $iattr->[1] %> (<% $iattr->[0] %>):
<% $iattr->{name} %> (<% $iattr->{attr} %>):
<% $ATTRNAMES->{$iattr} %> (<% $iattr %>):
Удалить

<%ARGS> $MULTI => undef $rusname => undef $attr => undef $prop => {} <%DOC> Компонента отображает одну картинку... <%INIT> my $iattrs = $prop->{iattrs}; $iattrs = ['alt'] unless $iattrs; my $ATTRNAMES = { 'alt' => 'Название', 'btext' => 'Текст до картинки', 'atext' => 'Текст после картинки', 'url' => 'Ссылка с картинки', 'copyright' => 'Копирайт', };