or download this
#if($line=~/^(Gm\d{1,})\trecent_duplication\tsyntenic_region\t(\d{1
+,})\t(\d{1,})\t.*\tID\=\w{1,}_Gm\d{1,}\.(Gm\d{1,}.*)\;median_Ks=(.*)\
+;matches\=(Gm\d{1,}\:\d{1,}\.\.\d{1,})/)
if($line=~/^(Gm\d+)\trecent_duplication\tsyntenic_region\t(\d+)\t(\
+d+)\t.*\tID=\w+_Gm\d+\.(Gm\d+.*);median_Ks=(.*);matches=(Gm\d+:\d+\.\
+.\d+)/)