VecT 1.01 Rule File Created by Hui-Hsien Chou on 06:14:53 PM 02/12/2004
Total User Rules: 4
Rule Types: 1 1 2 7
Rule 0 "SelectRule": 1 100 N "" 0 0 N "" 0
Rule 1 "DNA Fragments": 1 100 N "" 0 1 1 OF 0 CF 0 "ORIGIN" "\/\/" N N N "" 6 F 1 F 2 F 3 F 4 F 5 F 6
Rule 2 "DNA": 2 100 1 2 "" ""
Rule 3 "My Favorites": 7 100 1 2 "sub { # Do not name your subroutine to avoid name conflicts.\n\n  my \(\$source\) = \@_;\n  return if !defined\(\$source\);\n\n  my \@outputs;\n  my \$start = 0;\n  while \(\(\$start=index\(\$source, \"tttattaa\", \$start\)\)>=0\) {\n    my \$left = \$start-100;\n    \$left = 0 if \$left<0;\n    my \$length = \$start-\$left+120;\n    push \@outputs, substr\(\$source, \$left, \$length\);\n    \$start += 120;\n  }\n  return \(\@outputs\);\n}"
Print Rule "PrintRule": 0 100 "" "<My Favorites:60>\n" ""