From 08b9864b2832b62f1fe3cf1cea90a1fa60209f58 Mon Sep 17 00:00:00 2001 From: Ben Ostrowsky Date: Wed, 11 May 2011 15:55:25 +0000 Subject: [PATCH] Add a header line to explain the fields git-svn-id: svn://nox.esilibrary.com/migration-tools@734 eee7cc8d-164e-4af6-8e1b-092a69004917 --- unicorn/unicorn_patrons_to_tsv.pl | 3 ++- 1 files changed, 2 insertions(+), 1 deletions(-) diff --git a/unicorn/unicorn_patrons_to_tsv.pl b/unicorn/unicorn_patrons_to_tsv.pl index 94c03dd..ca0d8f0 100755 --- a/unicorn/unicorn_patrons_to_tsv.pl +++ b/unicorn/unicorn_patrons_to_tsv.pl @@ -205,8 +205,9 @@ for (my $u = 0; $u < @records; $u++) { } - # Print the results +print join("\t", @output_fields) . "\n"; + for (my $u = 0; $u < @records; $u++) { foreach $f (@output_fields) { if (defined $records[$u]{$f}) { -- 1.7.2.5