$ perl -E '$_=qq{GeneName    GeneType};my($foo,$bar)=split(/:/,$_);say qq{foo: $foo\nbar: $bar}'
foo: GeneName    GeneType
bar:
$ perl -E '$_=qq{GeneName    GeneType};my($foo,$bar)=split(/\s+/,$_);say qq{foo: $foo\nbar: $bar}'
foo: GeneName
bar: GeneType