Re^2: win 32 OLE Selection property

Select or download this

#!/usr/bin/perl
use strict;
...

$Word->ActiveDocument->Close ;
$Word->Quit;

Select or download this

Text: This is a doc file containing different fonts and size, document
+ also contain header and footer (Font: TNR, Size: 18)
Font Bold: 0
...
Font Name: Times New Roman
Font Size: 18
=========

Select or download this

if ($font->{Size} == 18)

Select or download this

if ($font->{Size} == 12)

Select Code to Download