diff --git a/Webperl/ConfigMicro.pm b/Webperl/ConfigMicro.pm
index 2778b49..d9535a4 100644
--- a/Webperl/ConfigMicro.pm
+++ b/Webperl/ConfigMicro.pm
@@ -139,16 +139,16 @@ sub read {
             $section = $1;
 
         # Attribues with quoted values. value can contain anything other than "
-		} elsif($line =~ /^\s*([\w. :-]+[\w.:-])\s*=\s*\"([^\"]+)\"/ ) {
+		} elsif($line =~ /^\s*(.*?\w)\s*=\s*\"([^\"]+)\"/ ) {
 			$self -> {$section} -> {$1} = $2;
 
         # Handle attributes without quoted values - # or ; at any point will mark comments
-		} elsif(!$self -> {"inline_comments"} && $line =~ /^\s*([\w. :-]+[\w.:-])\s*=\s*(.+)$/ ) {
+		} elsif(!$self -> {"inline_comments"} && $line =~ /^\s*((.*?\w))\s*=\s*(.+)$/ ) {
             my $key = $1;
 			$self -> {$section} -> {$key} = $2;
             $self -> {$section} -> {$key} =~ s/^\s*(.*?)\s*$/$1/;
 
-		} elsif($self -> {"inline_comments"} && $line =~ /^\s*([\w. :-]+[\w.:-])\s*=\s*([^;#]+)/ ) {
+		} elsif($self -> {"inline_comments"} && $line =~ /^\s*((.*?\w))\s*=\s*([^;#]+)/ ) {
             my $key = $1;
 			$self -> {$section} -> {$key} = $2;
             $self -> {$section} -> {$key} =~ s/^\s*(.*?)\s*$/$1/;