my $volume_name = "/Volumes/Volume Name/"; for (glob "$volume_name/*")