看看ORACLE的系統參數，還有一點沒弄好

#dir test
$file='d:\sysctl.conf';
open (MYFILE, "$file") || die ("Could not open file");
#@a = <MYFILE>;
%values =('fs.file-max' => 6815744 ,'fs.aio-max-nr' => 1048576 ,'kernel.shmall' => 2097152,'kernel.shmmax' => 2147483648,
'kernel.shmmni' =>4096 ,'kernel.sem' => '250 32000 100 128' ,'net.ipv4.ip_local_port_range' => '9000 65500',
'net.core.rmem_default' => 4194304,'net.core.rmem_max' => 4194304,'net.core.wmem_default' => 262144,'net.core.wmem_max' => 1048576);
foreach $show (<MYFILE>)
   {
     if($show =~ /\=/)
       {
        @value=split(/=/,$show);
        if(exists $values($value[0]))
           {
               
                if($value[1] >= $values($value[0]))
                 {
                        
                 }
           }
    ##   print   "$value[0] =>$value[1]\n";
       }
     else
      {
         $show='afa';
      }
 
   }
    while (($key,$va)= each %values)
     {
         print "$key = $va\n";
      }