Anonymous Monk,
Beyond the advice you have already been given, your perl should have shipped with a s2p and a2p utility. Even if you do not use the resulting code, it should give you a good idea of one way to do it.