I think this will work...it did so in my Perl editor. I cleaned up the print command at the end. #!/usr/bin/perl $count=0; print...
Separate names with a comma.