% if ( $ARGS{artist} ) { % }

<% $artist->firstname %> <% $artist->lastname %>
<% $artist->nationality %> <% $artist->dateofbirth && ! $artist->dateofdeath ? 'b. ' . $artist->dateofbirth : ( $artist->dateofdeath && ! $artist->dateofbirth ? 'd. ' . $artist->dateofdeath : ( $artist->dateofbirth && $artist->dateofdeath ? '(' . $artist->dateofbirth . '-' . $artist->dateofdeath . ')' : '' ) ) %>

<% $format %>

<%attr> bgcolor=>'#F8EA92' title=>'Artist Biography' pagetype=>'home' footercolor=>'#000033' <%init> my $class = "person::artist"; my $artist = $class->getoid( $ARGS{artist} ); my $bio = $artist->biography(); my $format; ( $format = $bio )=~ s/\r/

/g;