if($_ =~ m/^$FORM{'sortbyform'}/i)

##</code><code>##


if($_ =~ m/^$FORM{'sortby'}/i)