mirror of
https://github.com/percona/percona-toolkit.git
synced 2025-09-13 14:39:28 +00:00
Add forked Maatkit tools in bin/ and their tests in t/.
This commit is contained in:
19
t/pt-archiver/samples/Plugin5.pm
Normal file
19
t/pt-archiver/samples/Plugin5.pm
Normal file
@@ -0,0 +1,19 @@
|
||||
package Plugin5;
|
||||
|
||||
sub new {
|
||||
my ( $class, %args ) = @_;
|
||||
$args{dbh}->do('create temporary table test.tmp_table(a int not null primary key)');
|
||||
$args{dbh}->do('insert into test.tmp_table values(1), (2)');
|
||||
return bless(\%args, $class);
|
||||
}
|
||||
|
||||
sub is_archivable {1} # Always yes
|
||||
|
||||
sub before_delete {} # Take no action
|
||||
|
||||
sub before_insert { }
|
||||
|
||||
sub before_begin {} # Take no action
|
||||
sub after_finish {} # Take no action
|
||||
|
||||
1;
|
Reference in New Issue
Block a user