Help for this page
use Data::Dumper; my %hash = ( ... print '>instances\n"; print join("\n",@{$val}),"\n"; }
$VAR1 = ' ... 0,-350,GGTTCAGGATGGTTT 0,-75,AAAACATCGTGACAC '