DEPLOY_TIME=300
DEPLOY_TYPE=OS
DEPLOY_PARAMS=$DOMAIN{HOST},$DOMAIN{IP},$DOMAIN{CONFIG}
DEPLOY_DEFAULT_STARTUP=$DOMAIN{STARTUP.INI}
DEPLOY_DEBUG=Y
DEFAULT_EXPIRY=900

##</code><code>##

my ($dtime,$dtype);
open (FH, "<$file") || die ("can't open file $file");

        while (<FH>)
        {
            next if (/^#/);
            next unless /\S/;

            while (m<\DEPLOY_TIME=(\d+)>gx)
            {
                $dtime = $1;}

            while (m<DEPLOY_TYPE=(\S+)>gx)
            {
                $dtype = $1;}

            # NEXT PATTERN NOT SURE ABOUT!!

        }


##</code><code>##

 if (/keyAttributes\('(.*?)',\s'(.*?)',\s'(.*?)',\s'(.*?)',\s'(.*?)',\s'(.*?).+/)
                    {
                        $surname = $1;
                        $given = $2;
                        $title = $3;
                        $sex = $4;
                        $address = $5;
                        $country = $6;
                        
                    }