Gecko [ www.vortexaion.com ]

Windows NT KAMIDAKI 10.0 build 19045 (Windows 10) AMD64
Apache/2.4.58 (Win64) OpenSSL/3.1.3 PHP/8.3.9
Server IP : 192.168.3.16 & Your IP : 216.73.216.204
Domains : Cant Read [ /etc/named.conf ]
User : SISTEMA

Name	Size	Permission	Date
Asset	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
Content	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
Cookie	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
DOM	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
IOLoop	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
JSON	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
Message	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
Reactor	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
Server	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
Transaction	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
UserAgent	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
resources	[ DIR ]	drwxrwxrwx	2024-07-26 17:40
Asset.pm	3.12 KB	-rw-rw-rw-	2021-01-17 16:57
Base.pm	11.48 KB	-rw-rw-rw-	2021-01-17 16:57
ByteStream.pm	8.23 KB	-rw-rw-rw-	2021-01-17 16:57
Cache.pm	1.3 KB	-rw-rw-rw-	2021-01-17 16:57
Collection.pm	10.13 KB	-rw-rw-rw-	2021-01-17 16:57
Content.pm	14.51 KB	-rw-rw-rw-	2021-01-17 16:57
Cookie.pm	1.56 KB	-rw-rw-rw-	2021-01-17 16:57
DOM.pm	30.11 KB	-rw-rw-rw-	2021-01-17 16:57
Date.pm	4.46 KB	-rw-rw-rw-	2021-01-17 16:57
DynamicMethods.pm	2.92 KB	-rw-rw-rw-	2021-01-17 16:57
EventEmitter.pm	3.38 KB	-rw-rw-rw-	2021-01-17 16:57
Exception.pm	10.03 KB	-rw-rw-rw-	2021-01-17 16:57
File.pm	12.88 KB	-rw-rw-rw-	2021-01-17 16:57
Headers.pm	19.2 KB	-rw-rw-rw-	2021-01-17 16:57
HelloWorld.pm	883 B	-rw-rw-rw-	2021-01-17 16:57
Home.pm	1.64 KB	-rw-rw-rw-	2021-01-17 16:57
IOLoop.pm	17.77 KB	-rw-rw-rw-	2021-01-17 16:57
JSON.pm	8.95 KB	-rw-rw-rw-	2021-01-17 16:57
Loader.pm	5.09 KB	-rw-rw-rw-	2021-01-17 16:57
Log.pm	6.72 KB	-rw-rw-rw-	2021-01-17 16:57
Message.pm	17.13 KB	-rw-rw-rw-	2021-01-17 16:57
Parameters.pm	8.75 KB	-rw-rw-rw-	2021-01-17 16:57
Path.pm	7.92 KB	-rw-rw-rw-	2021-01-17 16:57
Promise.pm	14.81 KB	-rw-rw-rw-	2021-01-17 16:57
Reactor.pm	5.6 KB	-rw-rw-rw-	2021-01-17 16:57
Server.pm	4.37 KB	-rw-rw-rw-	2021-01-17 16:57
Template.pm	17.8 KB	-rw-rw-rw-	2021-01-17 16:57
Transaction.pm	6.85 KB	-rw-rw-rw-	2021-01-17 16:57
URL.pm	12.53 KB	-rw-rw-rw-	2021-01-17 16:57
Upload.pm	1.57 KB	-rw-rw-rw-	2021-01-17 16:57
UserAgent.pm	34.04 KB	-rw-rw-rw-	2021-01-17 16:57
Util.pm	22.59 KB	-rw-rw-rw-	2021-01-17 16:57
WebSocket.pm	7.1 KB	-rw-rw-rw-	2021-01-17 16:57

Rename

package Mojo::Cache;
use Mojo::Base -base;

has 'max_keys' => 100;

sub get { (shift->{cache} // {})->{shift()} }

sub set {
  my ($self, $key, $value) = @_;

return $self unless (my $max = $self->max_keys) > 0;

my $cache = $self->{cache} //= {};
  my $queue = $self->{queue} //= [];
  delete $cache->{shift @$queue} while @$queue >= $max;
  push @$queue, $key unless exists $cache->{$key};
  $cache->{$key} = $value;

return $self;
}

=encoding utf8

=head1 NAME

Mojo::Cache - Naive in-memory cache

=head1 SYNOPSIS

use Mojo::Cache;

my $cache = Mojo::Cache->new(max_keys => 50);
  $cache->set(foo => 'bar');
  my $foo = $cache->get('foo');

=head1 DESCRIPTION

L<Mojo::Cache> is a naive in-memory cache with size limits.

=head1 ATTRIBUTES

L<Mojo::Cache> implements the following attributes.

=head2 max_keys

my $max = $cache->max_keys;
  $cache  = $cache->max_keys(50);

Maximum number of cache keys, defaults to C<100>. Setting the value to C<0> will disable caching.

=head1 METHODS

L<Mojo::Cache> inherits all methods from L<Mojo::Base> and implements the following new ones.

=head2 get

my $value = $cache->get('foo');

Get cached value.

=head2 set

$cache = $cache->set(foo => 'bar');

Set cached value.

=head1 SEE ALSO

L<Mojolicious>, L<Mojolicious::Guides>, L<https://mojolicious.org>.

=cut