mirror of
https://gitlab.com/t6353/sharee.bike.git
synced 2024-06-25 07:36:37 +02:00
28 lines
330 B
Perl
Executable file
28 lines
330 B
Perl
Executable file
package Mlogic;
|
|
use strict;
|
|
use warnings;
|
|
use CGI::Carp qw(fatalsToBrowser);
|
|
use CGI ':standard';
|
|
use Lib::Config;
|
|
use Mod::Buttons;
|
|
use Mod::Libenz;
|
|
use Mod::Libenzdb;
|
|
use Mod::Auth;
|
|
use POSIX;
|
|
|
|
sub new {
|
|
my $class = shift;
|
|
my $self = {};
|
|
bless($self,$class);
|
|
return $self;
|
|
}
|
|
|
|
#Template
|
|
sub tpl(){
|
|
my $self = shift;
|
|
}
|
|
|
|
1;
|
|
|
|
|