Select Code to Download

   %fs = (
...
   $contents = $fs{dir1};
   $file     = $fd{dir1}[0];

   @contents = @{$fs{dir1}};