如何在Perl中限制CGI文件上传中的文件类型？

I am using CGI to allow the user to upload some files. I just want the just to be able to upload .txt or .csv files. If the user uploads file with any other format then I want to be able to put out an error message. I am using CGI to allow the user to upload some