1 package Excel::Template::TextObject;
7 @ISA = qw(Excel::Template::Base);
9 use Excel::Template::Base;
12 # This is a helper object. It is not instantiated by the user,
13 # nor does it represent an XML object. Rather, certain elements,
14 # such as <textbox>, can use this object to do text with variable
20 my $self = $class->SUPER::new(@_);
23 unless defined $self->{STACK} &&
24 ref $self->{STACK} eq 'ARRAY';
34 my $use_unicode = $context->use_unicode;
39 require Unicode::String;
40 $t = Unicode::String::utf8('');
47 for my $tok (@{$self->{STACK}})
50 $val = $val->resolve($context)
51 if Excel::Template::Factory::is_embedded( $val );
54 ? Unicode::String::utf8("$val")
66 Excel::Template::TextObject
86 Rob Kinyon (rob.kinyon@gmail.com)