if( $param ){
  if( $param =~ /id:(\S*)/){
    $ENV{'C:id'}=$1;
  }
  if( $param =~ /key:(\S*)/){
    $ENV{'C:key'}=$1;
  }
  if( $param =~ /limit:(\S*)/){
    $ENV{'C:limit'}=$1;
  }
 ... 
}