I like Particle's comments, and would just add two parts to it.
I'd recommend use of Getopt::Long versus Getopt::Std - that way, you could take arguments such as --host and -h for the host, etc.
Add some POD documentation, and use the Pod::Usage module to allow for a nice way to print the POD to your user. Pod::Usage and Getopt::Long really work well together. Anytime I write something now, I always use the two to include help options, as well as portable documentation.