perlintro / perlfaq covers a lot of this, on prompting/chomping/asking user for input, and validating that input, see Re: MySQL Table adding with Perl and Re: DBD::mysql trouble