| Games-AssaultCube documentation | Contained in the Games-AssaultCube distribution. |
Games::AssaultCube::Log::Line::FlagForcedPickup - Describes the FlagForcedPickup event in a log line
Describes the FlagForcedPickup event in a log line
This module holds the "FlagForcedPickup" 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 the server forces a client to pickup the flag.
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 nick of the client who picked up the flag
The ip of the client
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::FlagForcedPickup; # import the Moose stuff use Moose; # Initialize our version use vars qw( $VERSION ); $VERSION = '0.04'; extends 'Games::AssaultCube::Log::Line::FlagStole'; has 'tostr' => ( isa => 'Str', is => 'ro', lazy => 1, default => sub { my $self = shift; return $self->nick . " was forced to pick up the flag"; }, ); no Moose; __PACKAGE__->meta->make_immutable; 1; __END__