scripts en perl del back-end de las apps de TNT