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