Perl詳しい人修正してくださいませんか＞＜

form.cgi
http://pastebin.com/6AH58hGM

http://pastebin.com/vXbDetrd
http://pastebin.com/XKfL2eKc
http://pastebin.com/JcsG46HR
http://pastebin.com/RFtk3TN6
http://pastebin.com/R1AW7eZS
http://pastebin.com/fK9jHKKS