Select Code to Download

my %dispatch = (
  first           => \&_create_first,
...
  email           => \&_create_email,
  create_password => \&_create_create_password,
);

$ perl -E 'use strict; use warnings; my %d = ( foo => \&foo ); say "OK
+"'
OK