RTF::Writer table problems (cells wont align correctly)

[Ben Eagle]

I having problems with aligning text inside a table,

 

Only the first row will align to the center Align => 'l c c c'; should
work for the whole table, but it only works for the first row

 

I have tried multiple ways of doing it and it wont work

 

Any Ideas??

 

 

 

 

my @tableProp2 = (         widths => [inches(2), inches(2), inches(2),
inches(2)],

                                      align => 'c c c c',

                            );

                        my $oDecl2 =
RTF::Writer::TableRowDecl->new(@tableProp2,);

                        $oDecl2->add_bgcolors(8);  # All cells default
color

                        $fh->row($oDecl2, \'\fs20 Consolidation
Results', "Current(As Is)", 'With VMware (Projected)', 'Difference');


                        my @tableProp3 = (

 
widths => [inches(2),inches(2),inches(2),inches(2)],

 
align => "l c c c" ,

 

 

 
);

                        my $oDecl3 =
RTF::Writer::TableRowDecl->new(@tableProp3,);

                        $oDecl3->add_bgcolors(7);  # All cells default
color

                        $fh->row($oDecl3, [\'\fs20', 'Servers (N to 1
consolidation ratio)'], [\'\fs20',"$valueHash{\"TCO_1_16\"}"],
[\'\fs20', "$valueHash{\"TCO_2_16\"}"], [\'\fs20',
"$valueHash{\"TCO_3_16\"}"]);

                        $fh->row($oDecl3, [\'\fs20',"HBAs"],[\'\fs20',
"$valueHash{\"TCO_1_17\"}"], [\'\fs20',"$valueHash{\"TCO_2_17\"}"],
[\'\fs20',"$valueHash{\"TCO_3_17\"}"]);

                        $fh->row($oDecl3, [\'\fs20',"SAN switches"],
[\'\fs20\qc',"$valueHash{\"TCO_1_18\"}"],
[\'\fs20\qc',"$valueHash{\"TCO_2_18\"}"],
[\'\fs20\qc',"$valueHash{\"TCO_3_18\"}"]);

                        


_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs