From 13a675e92c604f24cae414103f0216adda3506ee Mon Sep 17 00:00:00 2001 From: Jason Etheridge Date: Mon, 27 Nov 2017 17:42:16 -0500 Subject: [PATCH 1/1] better regexp for grabbing field names, redux Signed-off-by: Jason Etheridge --- unicorn/unicorn_to_tsv.pl | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/unicorn/unicorn_to_tsv.pl b/unicorn/unicorn_to_tsv.pl index c50c32c..a6cdf47 100755 --- a/unicorn/unicorn_to_tsv.pl +++ b/unicorn/unicorn_to_tsv.pl @@ -69,7 +69,7 @@ while (<>) { # Looks like we've got some actual data! Let's store it. # FIXME: For large batches of data, we may run out of memory and should store this on disk. - if ( /^\.(\S+?)\.\s+(\|a)?(.*)$/ ) { + if ( /^\.([A-Z0-9_\/]+?)\.\s+(\|a)?(.*)$/ ) { # Build the name of this field (taking note of whether we're in a named section of data) $field = ''; -- 1.7.2.5