1package Plugin5; 2 3sub new { 4 my ( $class, %args ) = @_; 5 $args{dbh}->do('create temporary table test.tmp_table(a int not null primary key)'); 6 $args{dbh}->do('insert into test.tmp_table values(1), (2)'); 7 return bless(\%args, $class); 8} 9 10sub is_archivable {1} # Always yes 11 12sub before_delete {} # Take no action 13 14sub before_insert { } 15 16sub before_begin {} # Take no action 17sub after_finish {} # Take no action 18 191; 20