From dacffb352240045901dd70e971dd37331b184f5c Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Tue, 13 Dec 2011 16:05:21 -0800
Subject: [PATCH 1/1] add import seq component md table; download the table

---
 utils/import_seq_component_md.pl | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100755 utils/import_seq_component_md.pl

diff --git a/utils/import_seq_component_md.pl b/utils/import_seq_component_md.pl
new file mode 100755
index 0000000..c935a75
--- /dev/null
+++ b/utils/import_seq_component_md.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/perl
+
+use warnings;
+use strict;
+
+while (<>) {
+    next if /^#/;
+    chomp;
+    my @row = split /\t/;
+    pop @row;
+    pop @row;
+    $row[6] =~ s/na/NULL/;
+    print join("\t",@row)."\n";
+}
-- 
2.39.2