support older versions of perl