package demo; require "wrapper"; use demo2; sub new { my $class = shift; my $params = shift; my $self = {}; &call_httpd_exec(); my $externalObject2 = new demo2; }