| Games-AssaultCube documentation | Contained in the Games-AssaultCube distribution. |
Games::AssaultCube::Log::Line::ClientVersion - Describes the ClientVersion event in a log line
Describes the ClientVersion event in a log line
This module holds the "ClientVersion" event data from a log line. Normally, you would not use this class directly but via the Games::AssaultCube::Log::Line class.
This line is emitted when a client connects to the AC server.
Those attributes hold information about the event. As this class extends the Games::AssaultCube::Log::Line::Base class, you can also use it's attributes too.
The ip of the client who just connected
The AC version of the client
The loaded defs on the client ( not sure what it exactly means, ha! )
Apocalypse <apocal@cpan.org>
Props goes to the BS clan for the support!
This project is sponsored by http://cubestats.net
Copyright 2009 by Apocalypse
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
| Games-AssaultCube documentation | Contained in the Games-AssaultCube distribution. |
# Declare our package package Games::AssaultCube::Log::Line::ClientVersion; # import the Moose stuff use Moose; # Initialize our version use vars qw( $VERSION ); $VERSION = '0.04'; extends 'Games::AssaultCube::Log::Line::Base'; # TODO improve validation for everything here, ha! has 'ip' => ( isa => 'Str', is => 'ro', required => 1, ); has 'version' => ( isa => 'Int', is => 'ro', required => 1, ); has 'defs' => ( isa => 'Str', is => 'ro', required => 1, ); has 'tostr' => ( isa => 'Str', is => 'ro', lazy => 1, default => sub { my $self = shift; return "Client from " . $self->ip . " connected with version " . $self->version; }, ); no Moose; __PACKAGE__->meta->make_immutable; 1; __END__