bin/rt-drop-tables


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29

#!/usr/bin/perl

my @tables = qw(
Attachments 
Queues 
Links 
Principals 
Groups 
ScripConditions 
Transactions 
Scrips 
ACL 
GroupMembers 
CachedGroupMembers 
Users 
Tickets 
ScripActions 
Templates 
TicketCustomFieldValues 
CustomFields 
CustomFieldValues 
sessions 
);

foreach my $table ( @tables ) {
  print "drop table $table;\n";
  print "drop sequence ${table}_id_seq;\n";
}