@spaces = map {{dir => $_, size => dir_size($_)}} foreach (@dirs);
$small_space = (sort by_dir_size grep larger_than_needed @spaces)[0];
store_in_space($newdata, $small_space);