Select Code to Download

%email_owners = (
  'mike@foo.net' => 'Mike Foo',
...
E-mail: happy@bobbarker.net
Owner: Mike Foo
E-mail: mike@foo.net

print "Owner: $email_owners{$_}\nE-mail: $_\n"
  for keys %email_owners;