$body = "Foto von mir: [BILD:ich.jpg]";

	$body =~ s/\[BILD:([a-zA-Z_0-9.]+)\]/eval{
		1==1 ? "<p><img src=\"\/images\/$1\"><\/p>" : "nicht gefunden"
	}/gsex;