if ( $q->param($_) ne "" )   {
          if ( /(Smoke|Integration|Functional|Non-Functional|Regression|New)/ )   {
             push (@testtype, $param) if ( $q->param($_) eq "yes" );
          }
          elsif ( /(Base Functionality|\(4\) DPC|Boot Support|Clones|Low Priority|Clusters|Data Mobility|Host Based Applications|Performance|Scalability)/ )   {
             push (@testsuite, $param) if ( $q->param($_) eq "yes" );
          }
          else  {
             $myhash{$param} = $q->param($_);
             $myhash{$param} =~ s/^\s+|\s+$//g;
          }
       }