diff --git a/doc/dev/dolibarr-doxygen-filter.pl b/doc/dev/dolibarr-doxygen-filter.pl
new file mode 100755
index 00000000000..0ed33321166
--- /dev/null
+++ b/doc/dev/dolibarr-doxygen-filter.pl
@@ -0,0 +1,23 @@
+#!/usr/bin/perl
+#--------------------------------------------------------------------
+# Script filtrage des sources Dolibarr pour doxygen
+#
+# $Id$
+#--------------------------------------------------------------------
+
+
+$file=$ARGV[0];
+
+open(FILE,$file) || die "Failed to open file $file";
+while (<FILE>)
+{
+	if ($_ =~ /\\version\s/i)
+	{
+		$_ =~ s/\$Id://i;
+		$_ =~ s/Exp \$//i;
+		$_ =~ s/(\\version\s+)[^\s]+\s/$1/i;
+		$_ =~ s/(\w)\s(\w)/$1_$2/g;
+	}
+	print $_;
+}
+close(FILE);