sub new_light {
        my $class = shift;
        return $class->new(
            type   => 'light',
            damage => '1',
            speed  => '5',
        );
    }

    sub new_fast {
        my $class = shift;
        return $class->new(
            type   => 'light',
            damage => '1',
            speed  => '7',
        );
    }

    sub new_heavy {
        my $class = shift;
        return $class->new(
            type   => 'heavy',
            damage => '2',
            speed  => '4',
        );
    }