I have no clue about perl ..thanks for your direction