print "$result{$_}\n" for keys $result;