* set up some perl stuff.