in reply to perl script

What script?