perl.com lists some possible ways (about midway down). To quote from the article "There are many, many ways to do this. Some even work."