Lines 142-149
sub _initialize_memcached {
Link Here
|
142 |
|
142 |
|
143 |
# Ensure we can actually talk to the memcached server |
143 |
# Ensure we can actually talk to the memcached server |
144 |
my $ismemcached = $memcached->set('ismemcached','1'); |
144 |
my $ismemcached = $memcached->set('ismemcached','1'); |
145 |
unless ($ismemcached) { #Value is undefined or False, so there was an error with the server, the connection to it, or a protocol error |
145 |
unless ($ismemcached) { |
146 |
warn "Connection to the memcached servers '@servers' failed. Are the unix socket permissions set properly? Is the host reachable?"; |
146 |
warn "\nConnection to the memcached servers '@servers' failed. Are the unix socket permissions set properly? Is the host reachable?\nIf you ignore this warning, you will face performance issues\n"; |
147 |
return $self; |
147 |
return $self; |
148 |
} |
148 |
} |
149 |
$self->{'memcached_cache'} = $memcached; |
149 |
$self->{'memcached_cache'} = $memcached; |
150 |
- |
|
|