perl(split/\n/,(keys(%{${{}}))[0])