if($col_props->[$j]->{justify} eq 'right')
    {
            $space = $calc_column_widths->[$j] -($txt->advancewidth($record->[$j]) + $pad_right);
    }