use perl to pipe from samtools to varscan, avoiding waiting time too short issue