Subversion Repositories DevTools

Rev

Rev 6177 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6177 Rev 6276
Line 29... Line 29...
29 
use DBI;
 29 
use DBI;
30 
use Getopt::Long;
 30 
use Getopt::Long;
31 
use Pod::Usage;                             # required for help support
 31 
use Pod::Usage;                             # required for help support
32 
my $RM_DB;
 32 
my $RM_DB;
33 
 
 33 
 
34 
my $opt_repo = 'https://auperasvn01.aupera.erggroup.com/svn/DevTools';
 34 
my $opt_repo = 'https://auawsasvn001.vix.local/svn/DevTools';
35 
my $vob_prefix = $ENV{'GBE_UNIX'} ? '/vobs' : '/vobs';
 35 
my $vob_prefix = $ENV{'GBE_UNIX'} ? '/vobs' : '/vobs';
36 
my $opt_package;
 36 
my $opt_package;
37 
 
 37 
 
38 
################################################################################
 38 
################################################################################
39 
#   Global data
 39 
#   Global data