I have not written a Perl interface to TradeWars, but I have written a helper script that reads in a list of sectors and finds trading pairs, one way warps, sector bubbles, and so on.

I also wrote a little script that calculates how much Fuel Ore is on a planet based on the damage done by two consecutive qcannon blasts.