Select Code to Download

... \@AvatarName = '$FileName, \@Game = '$Game', ...
                             ^ single quote missing here

$STH = $DBH -> prepare ('exec AddAvatars ?, @Creator = ?, @ContactMeth
+od = ?, @ContactAddress = ?, @AvatarName = ?, @Game = ?, @Section = ?
+, @Width = ?, @Height = ?') or die "$DBI::errstr;";
$STH -> bind_param_inout(1, \$Error, 1);
...
$STH -> bind_param(3, $ContactMethod);
...etc...
$STH -> execute or die "$DBI::errstr;";