The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

package D;
our $VERSION = 0.1;
sub new {
  my $class = shift;
  bless {}, $class;
}

sub print_d {
  print "Hello from D\n";
}

1;