Select Code to Download

  @dept = @{$sth->fetchall_arrayref()};

  use strict;
  use Data::Dumper;
...
      print Dumper($thisrow);
    }
  }