ssion methods for Captive::Portal
=cut
our $VERSION = '4.10';
use Log::Log4perl qw(:easy);
use JSON qw();
use Try::Tiny;
use Digest::MD5 qw(md5_hex);
use Captive::Portal::LockHandle;
use Role::Bas
sessions_ipset>.
Session state is recorded on disc under the $SESSIONS_DIR. The session state is JSON encoded.
Example: active session
{
"STATE" : "active",
"START_TIME" : 131710
m $capo->read_session_handle($lock_handle)
Read the session file for $lock_handle and decode the JSON format into a hashref.
=cut
sub read_session_handle {
my $self = shift;
my $fh = shif