##
perform_wedding(
official => $smith,
wife => $jones,
husband => $brown,
);
##
##
my $venue = Wedding::Venue->new;
$venue->perform_wedding($smith, $jones, $brown);
##
##
my $venue = Elvis::Wedding::Venue->new;
$venue->perform_wedding($smith, $jones, $brown, "Hound Dog");
##
##
my $venue = Wedding::Venue->new;
$venue->perform_wedding($smith, $jones, $brown, '2012-06-18');