16 lines
170 B
Perl
16 lines
170 B
Perl
|
package Cualsea::Server::MessageController;
|
||
|
|
|
||
|
|
use v5.30.0;
|
||
|
|
|
||
|
|
use strict;
|
||
|
|
use warnings;
|
||
|
|
|
||
|
|
sub new {
|
||
|
|
my $class = shift;
|
||
|
|
return bless {}, $class;
|
||
|
|
}
|
||
|
|
|
||
|
|
sub dispatch {
|
||
|
|
}
|
||
|
|
1
|