[Bio] / FigKernelPackages / raelib.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/raelib.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.18, Fri Jun 10 15:36:37 2005 UTC revision 1.19, Fri Jun 10 16:12:53 2005 UTC
# Line 208  Line 208 
208    if ($verbose && !($linecount % 10000))  {print STDERR "Parsed $linecount lines\n"}    if ($verbose && !($linecount % 10000))  {print STDERR "Parsed $linecount lines\n"}
209    if (m#//#) {($famac, $famname, $famtype)=('','',''); next}    if (m#//#) {($famac, $famname, $famtype)=('','',''); next}
210    elsif (m/^ID\s*(.*?);\s*(\S+)/) {($famname, $famtype)=($1, $2); next}    elsif (m/^ID\s*(.*?);\s*(\S+)/) {($famname, $famtype)=($1, $2); next}
211    elsif (m/^AC\s*(\S+)/) {$famac=$1; next}    elsif (m/^AC\s*(\S+)/) {$famac=$1; $famac =~ s/\;\s*$//; next}
212    next unless (m/^DR/); # ignore all the other crap in the prosite file for now. Note we might, at some point, want to grab all that, but that is for another time.    next unless (m/^DR/); # ignore all the other crap in the prosite file for now. Note we might, at some point, want to grab all that, but that is for another time.
213    #    #
214    # this is the format of the DR lines:    # this is the format of the DR lines:

Legend:
Removed from v.1.18  
changed lines
  Added in v.1.19

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3