Something went wrong. Try again.
Perl game server for TLE Community
Something went wrong. Try again.
12345678910111213141516171819202122232425262728293031package L;
use 5.10.0;
# Intended to be used from the command line to save a bunch of typing.
# This derives off Lacuna, thus can be used like Lacuna:# perl -ML -E 'say L->cache->get(...)'
use parent 'Lacuna';use LD;use LR;
# for helping with scripts in bin:
use Exporter qw(import);our @EXPORT = qw( $quiet out );
binmode STDOUT, ':encoding(UTF-8)';binmode STDERR, ':encoding(UTF-8)';
our $quiet;sub out { unless ($quiet) { say DateTime->now, " ", @_; }}
1;