$text =~ s/\[code\]([^[]*)\[\/code\]/<span class=\"bbcode3\">\1<\/span>/g;