updated to run with newer versionsof perl and Mojo