Code:
Code:
my (%rec) = @_; # Load any defaults to put in the VALUE field. ($db_auto_generate and print &build_html_record(%rec) and return);
my $font_color = 'Font face="Verdana, Arial, Helvetica" Size=2 Color=#003399';
my $font = 'Font face="Verdana, Arial, Helvetica" Size=2';
$rec{'Notes'} =~ s/\n/<BR>/g;
$url{'Avatar Address'} = $rec{'Avatar Address'};
$url{'Avatar Address'} =~ s/<\/?B>//g;
print qq|
<table BORDER="0" CELLPADDING="2" CELLSPACING="10" WIDTH="100%" ALIGN="CENTER">
<tr>
<$font><td BGCOLOR="#7B78A4" colspan="2"></font><$font> </font><font
face="Verdana,Arial,Helvetica" size="1" color="WHITE"><b>Character Sheet for $rec{'Character Name'}</b></font></td>
</tr>
<tr>
<$font><td width="83"></font>
if ('$rec{'Avatar Address'}) {
print qq|
<img src=$rec{'Avatar Address'}>
|;
}
</td>
<td><div align="center"><center><table border="0" cellpadding="0"
cellspacing="0" width="100%">
<tr>
<td width="22%"><$font>Char. Name:</font></td>
<td width="78%"><$font>$rec{'Character Name'}</font></td>
</tr>
<tr>
<td width="22%"><$font>Player:</font></td>
<td width="78%"><$font>$rec{'Player'}</font></td>
</tr>
<tr>
<td width="22%"><$font>Char. Status:</font></td>
<td width="78%"><$font>$rec{'Character Status'}</font></td>
</tr>
<tr>
<td width="22%"><$font>Char. Type:</font></td>
<td width="78%"><$font>$rec{'Character Type'}</font></td>
</tr>
<tr>
<td width="22%"><$font>Char. Age:</font></td>
<td width="78%"><$font>$rec{'Character Age'}</font></td>
</tr>
<tr>
<td width="22%"><$font>RT Age:</font></td>
<td width="78%"><$font>$rec{'RT Age of Character'}</font></td>
</tr>
<tr>
<td width="22%"><$font>Home:</font></td>
<td width="78%"><$font>$rec{'Home'}</font></td>
</tr>
<tr>
<td width="22%"><$font>Caste:</font></td>
<td width="78%"><$font>$rec{'Caste'}</font></td>
</tr>
<tr>
<td width="22%"><$font>Possessions:</font></td>
<td width="78%"><$font>$rec{'Possessions'}</font></td>
</tr>
<tr>
<td width="22%"><$font>Notes:</font></td>
<td width="78%"><$font>$rec{'Notes'}</font></td>
</tr>
<tr>
<td width="22%"></td>
<td width="78%"><$font><p align="right">Added:
$rec{'Date Added'}</font></td>
</tr>
|;
print qq|
</TABLE>
|;
}
but it gives me an error
also Im trying to do something along the lines of
Code:
if ('$rec{'Avatar Address'}) { print qq|
<img src=$rec{'Avatar Address'}>
|;
}
if !('$rec{'Avatar Address'}) {
print qq|
<img src=default.jpg alt="No Image Supplied">
|;
}
Ive done everything I can think of, maybe someone can catch My screw up
Note : before someone looks over the ODD questions in the form area, this for a roleplay character database

