$array[1] = "apples\tpears\toranges"; my @fruit = split(/\t/, $array[1]); print "[$_]\n" foreach @fruit; #### [apples] [pears] [oranges]