I am not sure that you are asking for something like as:

my $ret = '';
while (my ($file,$val) = each %hash) {
      $ret .= ">dataset\n";
      $ret .= "$file\n";
      $ret .= "instances\n";
      $ret .= join("\n",@{$val});
      $ret .= "\n";
}
[download]