in reply to Turning a comma-delimited list of internal email addresses into a space-delimited list of internet email addys?

#!/usr/bin/perl -w
use strict;

print my $dist_list = join ' ' => map { "$_\@myorg.mydomain" } split /
+,/ => $ARGV[1];
print "\n";

[download]
Or use warnings; if you have a newer perl.
  • Comment on Re: Turning a comma-delimited list of internal email addresses into a space-delimited list of internet email addys?
  • Download Code

In Section Seekers of Perl Wisdom