Fixed missing ; in OptionParser

This commit is contained in:
Carlos Salguero
2016-11-05 10:40:45 -03:00
parent 9f3f569725
commit c17f0560ec
23 changed files with 23 additions and 23 deletions
+1 -1
View File
@@ -482,7 +482,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -1211,7 +1211,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -1209,7 +1209,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -559,7 +559,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -555,7 +555,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -1546,7 +1546,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -483,7 +483,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -975,7 +975,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -484,7 +484,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -554,7 +554,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -1306,7 +1306,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -1136,7 +1136,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -564,7 +564,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -1804,7 +1804,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -485,7 +485,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -557,7 +557,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -492,7 +492,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -709,7 +709,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -572,7 +572,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -1577,7 +1577,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -1801,7 +1801,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -561,7 +561,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }
+1 -1
View File
@@ -1158,7 +1158,7 @@ sub get_opts {
if ( @ARGV && $ARGV[0] =~/^--config=/ ) { if ( @ARGV && $ARGV[0] =~/^--config=/ ) {
$ARGV[0] = substr($ARGV[0],9); $ARGV[0] = substr($ARGV[0],9);
$ARGV[0] =~ s/^'(.*)'$/$1/ $ARGV[0] =~ s/^'(.*)'$/$1/;
$ARGV[0] =~ s/^"(.*)"$/$1/; $ARGV[0] =~ s/^"(.*)"$/$1/;
$self->_set_option('config', shift @ARGV); $self->_set_option('config', shift @ARGV);
} }