package la_inc;
=head1
Rb & RLA includes:
Header, Left menu and footer design
=cut
use Tpl;
$Tpl::dbg=0;
sub get_time {
@m=('января','февраля','марта','апреля','мая','июня','июля','августа','сентября','октября','ноября','декабря');
@M=localtime;
$_=localtime; @a=split;
$_=$a[2].' '.$m[$M[4]].' '.$a[4];
}
sub page {
my ($data,$banner,$name)=@_;
$banner='
' unless $banner;
my $header=Tpl::Load("la/_header");
$header=join("",@$header);
$header=~ s/l_title/$name/es;
$header=~ s/