use strictif@ARGV！=3 print quot$0 input_reference_fasta sequence outputtxtquot$ARGV1=uc$ARGV1$=quotquotopen FA，$ARGV0 or dieopen OUT，quot$ARGV2quot...