use strict;
use warnings;

my @db= qw /db1 db2/;
my @commands =( "HPRMCLI exch create -s EXCHDAGNODE1 ",
 "HPRMCLI exch mount  -h RMEBackupSvr",
 "HPRMCLI exch validate -level Log",
 "HPRMCLI exch unmount ",
 "HPRMCLI exch remove ",
 "HPRMCLI exch create -s EXCHDAGNODE2  -nc",
 "HPRMCLI exch mount   -h RMEBackupSvr",
 "HPRMCLI exch validate  -level Full",
 "HPRMCLI exch unmount ",
 "HPRMCLI exch remove ");
 
 my @out_com;
 
 for my $comm (@commands) {
      push @out_com, "$comm  -mdb $_" for @db;
 }
 print join "\n", @out_com;

##</code><code>##

$ perl commands.pl
HPRMCLI exch create -s EXCHDAGNODE1   -mdb db1
HPRMCLI exch create -s EXCHDAGNODE1   -mdb db2
HPRMCLI exch mount  -h RMEBackupSvr  -mdb db1
HPRMCLI exch mount  -h RMEBackupSvr  -mdb db2
HPRMCLI exch validate -level Log  -mdb db1
HPRMCLI exch validate -level Log  -mdb db2
HPRMCLI exch unmount   -mdb db1
HPRMCLI exch unmount   -mdb db2
HPRMCLI exch remove   -mdb db1
HPRMCLI exch remove   -mdb db2
HPRMCLI exch create -s EXCHDAGNODE2  -nc  -mdb db1
HPRMCLI exch create -s EXCHDAGNODE2  -nc  -mdb db2
HPRMCLI exch mount   -h RMEBackupSvr  -mdb db1
HPRMCLI exch mount   -h RMEBackupSvr  -mdb db2
HPRMCLI exch validate  -level Full  -mdb db1
HPRMCLI exch validate  -level Full  -mdb db2
HPRMCLI exch unmount   -mdb db1
HPRMCLI exch unmount   -mdb db2
HPRMCLI exch remove   -mdb db1
HPRMCLI exch remove   -mdb db2

##</code><code>##

for my $database (@db) {
      push @out_com, "$_  -mdb $database" for @commands;
}
##</code><code>##

$ perl commands.pl
HPRMCLI exch create -s EXCHDAGNODE1   -mdb db1
HPRMCLI exch mount  -h RMEBackupSvr  -mdb db1
HPRMCLI exch validate -level Log  -mdb db1
HPRMCLI exch unmount   -mdb db1
HPRMCLI exch remove   -mdb db1
HPRMCLI exch create -s EXCHDAGNODE2  -nc  -mdb db1
HPRMCLI exch mount   -h RMEBackupSvr  -mdb db1
HPRMCLI exch validate  -level Full  -mdb db1
HPRMCLI exch unmount   -mdb db1
HPRMCLI exch remove   -mdb db1
HPRMCLI exch create -s EXCHDAGNODE1   -mdb db2
HPRMCLI exch mount  -h RMEBackupSvr  -mdb db2
HPRMCLI exch validate -level Log  -mdb db2
HPRMCLI exch unmount   -mdb db2
HPRMCLI exch remove   -mdb db2
HPRMCLI exch create -s EXCHDAGNODE2  -nc  -mdb db2
HPRMCLI exch mount   -h RMEBackupSvr  -mdb db2
HPRMCLI exch validate  -level Full  -mdb db2
HPRMCLI exch unmount   -mdb db2
HPRMCLI exch remove   -mdb db2

##</code><code>##

for my $comm (@commands) {
     print "$comm  -mdb $_ \n" for @db;
 }