$text =~ s/(\[code\])(.+?)(\[\/code\])/<div class=\"bbcode2\"><br\/><tt>$2<\/tt><br\/><br\/><\/div>/isg;