Help for this page

Select Code to Download


  1. or download this
    select strain from sequence where seg in ('seg1', 'seg2', 'seg3', 'seg
    +4')
    
  2. or download this
    @sorted =sort {
                grep( /seg/,   keys %{ $result->{$b} } ) <=>
                  grep( /seg/, keys %{ $result->{$a} } )
                  || lc $a cmp lc $b
            } keys %{$result}; # result contains sql info.