use strict;

[...]
while(<CONFIG>) {
if(! (/^[\#;]/ || /^\s*$/)) {
    /^\s*(\S*)\s*=?\s*(.*?)\s*$/;
    our $$1 = $2;
}