diff --git a/perl-xCAT/xCAT/FSPbootseq.pm b/perl-xCAT/xCAT/FSPbootseq.pm
index 3698ba2dc..98f3da0a6 100644
--- a/perl-xCAT/xCAT/FSPbootseq.pm
+++ b/perl-xCAT/xCAT/FSPbootseq.pm
@@ -47,7 +47,7 @@ sub parse_args {
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt,qw(h|help V|Verbose v|version ))) { 
+    if ( !GetOptions( \%opt,qw(h|help V|verbose v|version ))) { 
         return( usage() );
     }
     ####################################
diff --git a/perl-xCAT/xCAT/FSPcfg.pm b/perl-xCAT/xCAT/FSPcfg.pm
index 61d46e423..dbe708bcb 100644
--- a/perl-xCAT/xCAT/FSPcfg.pm
+++ b/perl-xCAT/xCAT/FSPcfg.pm
@@ -173,7 +173,7 @@ sub parse_args {
     Getopt::Long::Configure( "bundling" );
     $request->{method} = undef;
 
-    if ( !GetOptions( \%opt, qw(V|Verbose resetnet))) {
+    if ( !GetOptions( \%opt, qw(V|verbose resetnet))) {
         return( usage() );
     }
     ####################################
diff --git a/perl-xCAT/xCAT/FSPconn.pm b/perl-xCAT/xCAT/FSPconn.pm
index a004de43b..c7eef4b13 100644
--- a/perl-xCAT/xCAT/FSPconn.pm
+++ b/perl-xCAT/xCAT/FSPconn.pm
@@ -57,7 +57,7 @@ sub mkhwconn_parse_args
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt, qw(V|Verbose h|help t  s:s T=s p=s P=s port=s ) )) {
+    if ( !GetOptions( \%opt, qw(V|verbose h|help t  s:s T=s p=s P=s port=s ) )) {
         return( usage() );
     }
 
@@ -322,7 +322,7 @@ sub lshwconn_parse_args
         return $opttmp;
     }
 	
-    if ( !GetOptions( \%opt, qw(V|Verbose h|help T=s s) )) {
+    if ( !GetOptions( \%opt, qw(V|verbose h|help T=s s) )) {
         return( usage() );
     }
     return usage() if ( exists $opt{h});
@@ -439,7 +439,7 @@ sub rmhwconn_parse_args
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt, qw(V|Verbose h|help T=s s) )) {
+    if ( !GetOptions( \%opt, qw(V|verbose h|help T=s s) )) {
         return( usage() );
     }
     return usage() if ( exists $opt{h});
diff --git a/perl-xCAT/xCAT/FSPinv.pm b/perl-xCAT/xCAT/FSPinv.pm
index f49d30d66..458008193 100644
--- a/perl-xCAT/xCAT/FSPinv.pm
+++ b/perl-xCAT/xCAT/FSPinv.pm
@@ -66,7 +66,7 @@ sub parse_args {
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt, qw(V|Verbose x) )) { 
+    if ( !GetOptions( \%opt, qw(V|verbose x) )) { 
         return( usage() );
     }
     ####################################
diff --git a/perl-xCAT/xCAT/FSPvm.pm b/perl-xCAT/xCAT/FSPvm.pm
index 2e52d4c47..0fe503420 100644
--- a/perl-xCAT/xCAT/FSPvm.pm
+++ b/perl-xCAT/xCAT/FSPvm.pm
@@ -109,7 +109,7 @@ sub chvm_parse_args {
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt, qw(V|Verbose p=s i=s m=s r=s ) )) {
+    if ( !GetOptions( \%opt, qw(V|verbose p=s i=s m=s r=s ) )) {
         return( usage() );
     }
     ####################################
@@ -361,7 +361,7 @@ sub mkvm_parse_args {
 #    if ( !GetOptions( \%opt, qw(V|verbose ibautocfg ibacap=s i=s l=s c=s p=s full) )) {
 #        return( usage() );
 #    }
-    if ( !GetOptions( \%opt, qw(V|Verbose i=s m=s r=s ) )) {
+    if ( !GetOptions( \%opt, qw(V|verbose i=s m=s r=s ) )) {
         return( usage() );
     }
 ####################################
@@ -535,7 +535,7 @@ sub rmvm_parse_args {
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt, qw(V|Verbose service r) )) {
+    if ( !GetOptions( \%opt, qw(V|verbose service r) )) {
         return( usage() );
     }
     return(usage( "rmvm doesn't support for Power 775." ));
@@ -592,7 +592,7 @@ sub lsvm_parse_args {
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt, qw(V|Verbose l|long) )) {
+    if ( !GetOptions( \%opt, qw(V|verbose l|long) )) {
         return( usage() );
     }
     ####################################
diff --git a/perl-xCAT/xCAT/PPCcfg.pm b/perl-xCAT/xCAT/PPCcfg.pm
index 93695d3fb..0703e4a4b 100644
--- a/perl-xCAT/xCAT/PPCcfg.pm
+++ b/perl-xCAT/xCAT/PPCcfg.pm
@@ -123,7 +123,7 @@ sub parse_args {
     Getopt::Long::Configure( "bundling" );
     $request->{method} = undef;
 
-    if ( !GetOptions( \%opt, qw(V|Verbose resetnet))) {
+    if ( !GetOptions( \%opt, qw(V|verbose resetnet))) {
         return( usage() );
     }
     ####################################
diff --git a/perl-xCAT/xCAT/PPCinv.pm b/perl-xCAT/xCAT/PPCinv.pm
index c162779f4..640cc1dd9 100644
--- a/perl-xCAT/xCAT/PPCinv.pm
+++ b/perl-xCAT/xCAT/PPCinv.pm
@@ -59,7 +59,7 @@ sub parse_args {
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt, qw(V|Verbose) )) { 
+    if ( !GetOptions( \%opt, qw(V|verbose) )) { 
         return( usage() );
     }
     ####################################
diff --git a/perl-xCAT/xCAT/PPCmac.pm b/perl-xCAT/xCAT/PPCmac.pm
index c01265fe8..813d1e3c9 100644
--- a/perl-xCAT/xCAT/PPCmac.pm
+++ b/perl-xCAT/xCAT/PPCmac.pm
@@ -46,7 +46,7 @@ sub parse_args {
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt,qw(h|help V|Verbose v|version C=s G=s S=s D d f M o F=s arp))) { 
+    if ( !GetOptions( \%opt,qw(h|help V|verbose v|version C=s G=s S=s D d f M o F=s arp))) { 
         return( usage() );
     }
     ####################################
diff --git a/perl-xCAT/xCAT/PPCpower.pm b/perl-xCAT/xCAT/PPCpower.pm
index bd9f31b64..a37453305 100644
--- a/perl-xCAT/xCAT/PPCpower.pm
+++ b/perl-xCAT/xCAT/PPCpower.pm
@@ -40,7 +40,7 @@ sub parse_args {
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt, qw(V|Verbose m:s@ t=s T=s r=s nodeps) )) {
+    if ( !GetOptions( \%opt, qw(V|verbose m:s@ t=s T=s r=s nodeps) )) {
         return( usage() );
     }
     ####################################
diff --git a/perl-xCAT/xCAT/PPCscan.pm b/perl-xCAT/xCAT/PPCscan.pm
index 6ff254945..513d52c88 100644
--- a/perl-xCAT/xCAT/PPCscan.pm
+++ b/perl-xCAT/xCAT/PPCscan.pm
@@ -74,7 +74,7 @@ sub parse_args {
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt, qw(V|Verbose u w x z) )){
+    if ( !GetOptions( \%opt, qw(V|verbose u w x z) )){
         return( usage() );
     }
     ####################################
diff --git a/perl-xCAT/xCAT/PPCvitals.pm b/perl-xCAT/xCAT/PPCvitals.pm
index 3d1786099..e993400c7 100644
--- a/perl-xCAT/xCAT/PPCvitals.pm
+++ b/perl-xCAT/xCAT/PPCvitals.pm
@@ -40,7 +40,7 @@ sub parse_args {
     $Getopt::Long::ignorecase = 0;
     Getopt::Long::Configure( "bundling" );
 
-    if ( !GetOptions( \%opt, qw(V|Verbose) )) {
+    if ( !GetOptions( \%opt, qw(V|verbose) )) {
         return( usage() );
     }
     ####################################
diff --git a/perl-xCAT/xCAT/Usage.pm b/perl-xCAT/xCAT/Usage.pm
index afbb9f13b..2409b70ea 100644
--- a/perl-xCAT/xCAT/Usage.pm
+++ b/perl-xCAT/xCAT/Usage.pm
@@ -90,7 +90,7 @@ my %usage = (
     "rbootseq" => 
 "Usage: 
        Common:
-           rbootseq [-h|--help|-v|--version|-V|--Verbose]
+           rbootseq [-h|--help|-v|--version|-V|--verbose]
        Blade specific:
            rbootseq <noderange> [hd0|hd1|hd2|hd3|net|iscsi|usbflash|floppy|none],...
        PPC (using Direct FSP Management) specific:
@@ -101,7 +101,7 @@ my %usage = (
     "rspconfig" => 
 "Usage: 
    Common:
-       rspconfig [-h|--help|-v|--version|-V|--Verbose]
+       rspconfig [-h|--help|-v|--version|-V|--verbose]
    BMC/MPA Common:
        rspconfig <noderange> [snmpdest|alert|community] [-V|--verbose]
        rspconfig <noderange> [snmpdest=<dest ip address>|alert=<on|off|en|dis|enable|disable>|community=<string>]