Select Code to Download

$comment = "My lawyer is named will";

   for ($new = $comment) {
   $comment = &doit($comment);
   }

   sub doit{
   $go = ";gie/moT/lliw/s ;gie/reknaB/reywal/s ;gie/yenraB/derf/s";

   $com = join("", reverse split(//, $go));

   return $com;
   }
   print $new;