# here is the web page. package WebPageOne; sub new { bless {}, shifth; } sub html { print < This is a web page. } 1;