eqやパターンマッチの対象がundefなので怒られてるだけだから、
場当たり的に直すのであれば

if($mode eq 'view') { $result_html = &viewAdmin; }

を

if(defined $mode && $mode eq 'view') { $result_html = &viewAdmin; }

とかいう具合にすりゃいいんでねーの? あるいはそのパラメタがない
のはおかしけりゃ別途エラーにするとかね。