## OD: 171118 # read in cprops FILENAME==ARGV[1]{ if ($1!~/:::fragment_/ && $3=1; i--){ k=split(substr(line[sortedline[i]],2), a, " ") for(s=1; s<=k; s++){ print str[a[s]] } } }