What have you tried so far? It is the custom on the PerlMonks site for OP's to post a snippit of code of which they have tried, and got stuck. People are unlikely to offer anything if it appears that you want them to do your work for you...
Also, have you checked CPAN? There apears to be 3 hits: newick