>>>>> "JLT" == Jason L Tibbitts <tibbs@hpc.uh.edu> writes:
JLT> perl -e 'while (<>) {@a=split; print "$a[4] $a[5] <$a[0]>\n"}'
I should note that this will produce illegal addresses if the full name
fields contain characters that are (according to RFC822) illegal in the
phrase part of a route address. To guard against this possibility at the
expense of having slightly uglier addresses, you can do:
perl -e 'while (<>) {@a=split; print "\"$a[4] $a[5]\" <$a[0]>\n"}'
or
perl -e 'while (<>) {@a=split; print "$a[0] ($a[4] $a[5])\n"}'
- J<
Follow-Ups:
References:
|
|
