Not a perl answer, but it's simpler with a shell script...

#!/bin/bash
for f in customer*.xml
do
  /usr/bin/zip ${f%xml}zip ${f} ${f%xml}pdf ${f%xml}xls;
done
[download]