diff --git a/module2/ressources/Makefile b/module2/ressources/Makefile
index 1c863bd78dacfdf98e81eea770eae79e35f7f512..566e2cc6da21bd258d4c7e68aab45c8fbed07308 100644
--- a/module2/ressources/Makefile
+++ b/module2/ressources/Makefile
@@ -8,5 +8,5 @@ NLINES=10000000
 	       -e 's/<li>/<li style="margin-bottom:0;">/g' \
 	       -e 's/<ul>/<ul style="margin:0 0;">/g' $@
 	mv $@ $@.bak
-	cat $@.bak | grep -A $(NLINES) -e '<body>' | grep -B $(NLINES) -e '<div id="postamble" class="status">' | grep -v -e '<body>' -e '<div id="postamble" class="status">' > $@
+	html_png_inliner.pl < $@.bak | grep -A $(NLINES) -e '<body>' | grep -B $(NLINES) -e '<div id="postamble" class="status">' | grep -v -e '<body>' -e '<div id="postamble" class="status">' > $@
 	rm $@.bak
diff --git a/module2/ressources/html_png_inliner.pl b/module2/ressources/html_png_inliner.pl
new file mode 100755
index 0000000000000000000000000000000000000000..2dcbe1facb9b6708a8e6d108ad2f9e609a47ae4c
--- /dev/null
+++ b/module2/ressources/html_png_inliner.pl
@@ -0,0 +1,17 @@
+#!/usr/bin/perl -w
+use strict;
+
+my($line);
+while(defined($line=<STDIN>)) {
+     if($line =~ /^(.*)<img *src="([^"]*)"(.*)$/g) {
+        my($pre,$image,$post) = ($1,$2,$3);
+	$image =~ s|file://||;
+#        print "$image\n";
+        my $base64=`base64 -w 0 $image`;
+        my $format=$image;
+        $format =~ s/.*\.//g;
+        print $pre."<img src=\"data:image/$format;base64,".$base64.'"'.$post;
+     } else {
+        print $line;
+     }
+}
