Merge branch 'JABAWS_Release_2_5' into develop

[jabaws.git] / binaries / src / jpred / lib / PSIBLAST / PSSM / Jnet.pm

diff --git a/binaries/src/jpred/lib/PSIBLAST/PSSM/Jnet.pm b/binaries/src/jpred/lib/PSIBLAST/PSSM/Jnet.pm
new file mode 100644 (file)
index 0000000..d5db271
--- /dev/null
+++ b/binaries/src/jpred/lib/PSIBLAST/PSSM/Jnet.pm
@@ -0,0 +1,19 @@
+package PSIBLAST::PSSM::Jnet;
+
+use strict;
+use warnings;
+use Carp;
+
+use base qw(PSIBLAST::PSSM);
+
+sub read {
+       my ($self, $fh) = @_;
+       local $/ = "\n";
+
+       while (<$fh>) {
+               chomp;
+               $self->add_pos(split);
+       }
+}
+
+1;