HTML::Display::Win32::OLE - use an OLE object to display HTML
package HTML::Display::Win32::OleControl; use parent 'HTML::Display::Win32::OLE';
sub new { my $class = shift; $class->SUPER::new( app_string => "FooBrowser.Application", @_ ); $self; };
my $browser = HTML::Display->new( class => 'HTML::Display::Win32::OleControl', ); $browser->display("<html><body><h1>Hello world!</h1></body></html>");
setup is a method you can override to provide initial
setup of your OLE control. It is called after the control
is instantiated for the first time.
This initializes the OLE control and returns it. Only one control is initialized for each object instance. You don't need to store it separately.