{ 
  local $/;
  foreach (@file) {
   open(FILE,"$_");
   $hash{$_}{file_contents} = <FILE>;
   close(FILE)
  }
}