Mason error

error in file:   /var/lib/mason/obj/db/people/autohandler
 
line 197:  Bareword found where operator expected(Missing operator before b5?)
line 197:  syntax error
context:  
... 
193:  ##my $hex = uc unpack 'H*', pack 'n*', unpack 'W*', $person_info->{name_big5};
194:  my $hex2 = uc join "", unpack '(H2)*', pack '(xa)*', split //, $person_info->{name_big5};
195:  my $hex3 = $person_info->{name_big5};
196:  $hex3 =~ s/(.)/sprintf '%04x', ord $1/seg;
197:  <br> b5 (0x<% $hex %>)<br>
198:  }
199:  $_out->('
200:  ');
201:  if($person_info->{name_eng} ne $person_info->{name_big5}){
... 
code stack:  


raw_error




























raw error:  		 





























Error during compilation of /var/www/db/people/autohandler:
Bareword found where operator expected at /var/lib/mason/obj/db/people/autohandler line 197, near "
 b5"
(Missing operator before b5?)
syntax error at /var/lib/mason/obj/db/people/autohandler line 197, near "
 b5 "