+ date=2019-10-01
+ data_source=data_sources
+ organism='Homo sapiens'
+ study=THYROID
+ org=gtex
+ dsource=gtex
+ preds_file=
+ perl -e '$study="THYROID"; $study=~/(..)$/; $lo=$1; `mkdir -p $lo/$study`; print "$lo/$study\n";'
++ cat THYROID.dir
+ dir=ID/THYROID
+ head -1 samples.tsv
+ cat samples.tsv.header /dev/fd/63
++ fgrep '	THYROID	' samples.tsv
+ cut_cols=1-3
+ [[ gtex == \m\o\u\s\e ]]
+ [[ gtex == \h\u\m\a\n ]]
+ [[ gtex == \g\t\e\x ]]
+ date=2019-11-01
+ gzip
+ cut -f 1-71 ID/THYROID/samples.tsv.THYROID
+ cut -f 1,3,4,72-180 ID/THYROID/samples.tsv.THYROID
+ gzip
+ cut_cols=1,3,4
+ [[ gtex == \t\c\g\a ]]
+ proj_header='rail_id	external_id	study	project	organism	file_source	metadata_source	date_processed'
+ dsource_path=data_sources/gtex
+ extra_proj_cols='Homo sapiens	data_sources/gtex	data_sources/gtex	2019-11-01'
+ gzip
+ cat /dev/fd/63 /dev/fd/62
++ echo 'rail_id	external_id	study	project	organism	file_source	metadata_source	date_processed'
++ tail -n+2 ID/THYROID/samples.tsv.THYROID
++ cut -f 1,3,4
++ perl -ne 'chomp; $f=$_; ($rid,$run,$study)=split(/\t/,$f); print "$f\t$study\tHomo sapiens	data_sources/gtex	data_sources/gtex	2019-11-01\n";'
+ [[ -n '' ]]
+ rm ID/THYROID/samples.tsv.THYROID