experience

   1: my $str;
   2: if ($$args{amount} > 0) {
   3: $str .= "You gained ";
   4: }
   5: else {
   6: $str .= "You lost ";
   7: $$args{amount} = -1 * $$args{amount};
   8: }
   9: 
  10: if ($$args{amount} == 1) {
  11: $str .= "<strong>1</strong> experience point.";
  12: }
  13: else {
  14: $str .= "<strong>".$$args{amount}."</strong> experience points.";
  15: }
  16: return $str;