for (values %info) { print "\t", join("\t", @$_), "\n"; }