# $_ here is one non-header line of the file.  
# $separator is the record separator
($hash->{foo}, $hash->{bar}, $hash->{baz}) = split /$separator/;

# $_ here is one non-header line of the file.  
# @keys are the keys of the hash, pulled from the first line for the file. 
# $separator is the record separator
my @split = split /$separator/;
my $i = 0;
for (@split) {
  $hash->{$keys[$i]} = $split[$i];
}

public static ArrayList listRecursive(final File dir) {
		assert dir.isDirectory();
		assert dir.exists();

		ArrayList files;
		if (dir.list() == null) {
			files = new ArrayList(0);
		} else {
			files = new ArrayList(dir.list().length);
			for (File file : dir.listFiles()) {
				if (file.isDirectory()) {
					files.addAll(listRecursive(file));
					recursions++; // Note that this is defined statically outside of this method
				} else {
					try {
						files.add(file.getCanonicalPath());
					} catch (IOException e) {
						throw new RuntimeException("I/O Error: " + e.getMessage());
					}
				}
			}
		}
		return files;
	}