Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
  $$entry{email} ||= '';
  print "$$entry{lname},$$entry{fname},$$entry{phone},$$entry{email}\n
+";
  }

Select or download this

Bloggs,Fred,,fred@xyzzy.com
Bloggs,Joe,,joe@plugh.com
Brown,Sue,555-1234-567,