| 536 |
$self->_sock_send_ok('flushall'); |
$self->_sock_send_ok('flushall'); |
| 537 |
} |
} |
| 538 |
|
|
| 539 |
|
=head1 Sorting |
| 540 |
|
|
| 541 |
|
=head2 sort |
| 542 |
|
|
| 543 |
|
$r->sort("key BY pattern LIMIT start end GET pattern ASC|DESC ALPHA'); |
| 544 |
|
|
| 545 |
|
=cut |
| 546 |
|
|
| 547 |
|
sub sort { |
| 548 |
|
my ( $self, $sort ) = @_; |
| 549 |
|
$self->_sock_result_bulk_list( "SORT $sort" ); |
| 550 |
|
} |
| 551 |
|
|
| 552 |
|
=head1 Persistence control commands |
| 553 |
|
|
| 554 |
|
=head2 save |
| 555 |
|
|
| 556 |
|
$r->save; |
| 557 |
|
|
| 558 |
|
=cut |
| 559 |
|
|
| 560 |
|
sub save { |
| 561 |
|
my $self = shift; |
| 562 |
|
$self->_sock_send_ok( 'SAVE' ); |
| 563 |
|
} |
| 564 |
|
|
| 565 |
|
=head2 bgsave |
| 566 |
|
|
| 567 |
|
$r->bgsave; |
| 568 |
|
|
| 569 |
|
=cut |
| 570 |
|
|
| 571 |
|
sub bgsave { |
| 572 |
|
my $self = shift; |
| 573 |
|
$self->_sock_send_ok( 'BGSAVE' ); |
| 574 |
|
} |
| 575 |
|
|
| 576 |
|
=head2 lastsave |
| 577 |
|
|
| 578 |
|
$r->lastsave; |
| 579 |
|
|
| 580 |
|
=cut |
| 581 |
|
|
| 582 |
|
sub lastsave { |
| 583 |
|
my $self = shift; |
| 584 |
|
$self->_sock_send( 'LASTSAVE' ); |
| 585 |
|
} |
| 586 |
|
|
| 587 |
|
=head2 shutdown |
| 588 |
|
|
| 589 |
|
$r->shutdown; |
| 590 |
|
|
| 591 |
|
=cut |
| 592 |
|
|
| 593 |
|
sub shutdown { |
| 594 |
|
my $self = shift; |
| 595 |
|
$self->_sock_send( 'SHUTDOWN' ); |
| 596 |
|
} |
| 597 |
|
|
| 598 |
|
=head1 Remote server control commands |
| 599 |
|
|
| 600 |
|
=head2 info |
| 601 |
|
|
| 602 |
|
my $info_hash = $r->info; |
| 603 |
|
|
| 604 |
|
=cut |
| 605 |
|
|
| 606 |
|
sub info { |
| 607 |
|
my $self = shift; |
| 608 |
|
my $info = $self->_sock_result_bulk( 'INFO' ); |
| 609 |
|
my $hash; |
| 610 |
|
foreach my $l ( split(/\r\n/, $info ) ) { |
| 611 |
|
my ($n,$v) = split(/:/, $l, 2); |
| 612 |
|
$hash->{$n} = $v; |
| 613 |
|
} |
| 614 |
|
return $hash; |
| 615 |
|
} |
| 616 |
|
|
| 617 |
=head1 AUTHOR |
=head1 AUTHOR |
| 618 |
|
|
| 619 |
Dobrica Pavlinusic, C<< <dpavlin at rot13.org> >> |
Dobrica Pavlinusic, C<< <dpavlin at rot13.org> >> |
Parent Directory
| 
Revision Log
| 
Patch