use warnings;
use strict;

use Win32::OLE;
use Win32::OLE::Const;

{
   my $IE = Win32::OLE->new( 'InternetExplorer.Application' );
   my $ie_const = Win32::OLE::Const->Load( $IE );

   $IE->Navigate( "C:\\tmp\\somefile.html" );

   #  at this point IE opens up and properly displays the page, but here is where i get lost .. my best guess is -

   $IE->ExecWB( ${ $ie_const }{ 'OLECMDID_PRINT'} } );

}