modified to add generic production database details

misc-scripts/density_feature/repeat_coverage_calc.pl

@@ -24,12 +24,20 @@ use strict;
 use Getopt::Long;
 
 my ( $host, $user, $pass, $port, $dbname  );
+   # Master database location:
+   my ( $mhost, $mport ) = ( 'mysql-eg-pan-1.ebi.ac.uk', '4276' );
+  my ( $muser, $mpass ) = ( 'ensro',        undef );
+   my $mdbname = 'ensembl_production';
+
 
 GetOptions( "host|h=s", \$host,
 	    "user|u=s", \$user,
 	    "pass|p=s", \$pass,
 	    "port=i",   \$port,
 	    "dbname|d=s", \$dbname,
+            "mhost=s", \$mhost,
+            "mport=i", \$mport,
+            "muser=s", \$muser,
 	    "help" ,               \&usage
 	  );
 
@@ -82,10 +90,6 @@ my $analysis = $aa->fetch_by_logic_name('percentagerepeat');
 
 if ( !defined($analysis) ) {
 
-   # Master database location:
-   my ( $mhost, $mport ) = ( 'ens-staging1', '3306' );
-   my ( $muser, $mpass ) = ( 'ensro',        undef );
-   my $mdbname = 'ensembl_production';
 
    my $prod_dsn = sprintf( 'DBI:mysql:host=%s;port=%d;database=%s',
                      $mhost, $mport, $mdbname );
@@ -355,6 +359,12 @@ Usage:
 
   -p|pass            Password for user
 
+  -mhost              ensembl_production database host to connect to
+
+  -mport              ensembl_production database port to connect to
+
+  -muser              ensembl_production database username
+
   -d|dbname          Database name
 
   -help              This message