情報処理試験のPerlのコード

昨日の情報処理試験（テクニカルエンジニア 情報セキュリティ）でPerlのコードが出てきた。
脆弱性のある部分を修正しなさい、って感じの問題だった。
問題は↓から見れる。
http://www.jitec.jp/1_04hanni_sukiru/mondai_kaitou_2008h20_1/2008h20h_sv_pm2_qs.pdf

とりえあず use strict と use warnings を付けるのが先ではないかと思ったのだが、どうなんだろう。
グローバル変数だらけな気がしたけど、これもよいのだろうか。
Perlがよくわからないのでなんとも言えないのだが。
さりとてPerlを知らないひとが use strict とか use warnings とか見て、なんだこれ、となっても困るかも。