%attr> ajax => 1 %attr> <%once> use Time::Local; # my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime('1201735859'); # -- <% $mday %> -- <% $mon %> -- <% $year %> -- <% $hour %>:<% $min %> # $mon +=1; # $year +=1900; %once> <%args> $lite => undef $classic => undef $search => undef %args> <%perl> my $AvantgardeIP= $m->comp('/include/config:get_key', key => 'AvantgardeIP'); my $streamlink='http://' . $AvantgardeIP . ':3000/PES/%stream'; %perl>
<& control.html:display_links, %ARGS &>
<& SELF:systeminfo &>
<& /system/df.html:display_graph &>
<& /bookmark/index.html:display &> |
<% ## Kanalliste %>
<& '/vdr/channel.html:display_form', div => 'bouqet-content', update => 'bouqet-content', stream => 'extern', streamlink => $streamlink, %ARGS &>
<& '/vdr/channel.html:display_bouqet', stream => 'extern', div => 'bouqet-content', %ARGS &>
|
<% ## Fernbedienung %>
@(Hostname): | <% `hostname` %> | ||
vdr: | @(running) | % } else {vdr: | @(not running) | % }
@(Uptime): | <% $uptime %> | ||
@(LoadAverage): | <% $lav1 %>,<% $lav2 %>,<% $lav3 %> |