%params;
foreach $arg (@ARGV){
    ($key,$val)= split '=',$arg;
    $params{$key) = $val;
}