Select Code to Download

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

}

   $IE->ExecWB( ${ $ie_const }{ 'OLECMDID_PRINT' }, ${ $ie_const }{ 'O
+LECMDID_PROMPTUSER' } );

my $automater = $IE->Automation()