You need to make $percent_done actualy hold the a percentage value, not just the count devided by 10 like so:

for (@data)
{
     print STDOUT "$_\n";
      $percent_done = $count/scalar(@data)*100;
      $count++;
      $mw->update;
}
[download]