[Bio] / Sprout / SaplingTest.pl Repository:
ViewVC logotype

View of /Sprout/SaplingTest.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.6 - (download) (as text) (annotate)
Fri Nov 8 18:28:13 2013 UTC (5 years, 3 months ago) by parrello
Branch: MAIN
CVS Tags: rast_rel_2014_0912, rast_rel_2014_0729, HEAD
Changes since 1.5: +6 -9 lines
Added optional mode to UpdateEntity.

#!/usr/bin/perl -w

use strict;
use Sapling;
use Tracer;
use Stats;


open my $ih, "</Users/Bruce/Downloads/tax.dmp";
my $line = <$ih>;
if ($line =~ /(.+)\t\|\n$/) {
    $line = $1;
}
my @list = split /\t\|\t/, $line;
print map {"$_\n" } @list;

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3