foreach (@all_names) {
    print "The next name is $_\n.";
}