1	#!/usr/bin/env sh
 2	
 3	dessin() {
 4		basename $1
 5		awk '
 6			BEGIN{printf "<pre style=\"tab-size:%s\">\n", "10ch"}
 7			{printf "%s\n", $0}
 8			END{print "</pre>"}
 9			' $1
10	}
11	
12	<< % cat 
13	<style>
14	pre {width:80ch}
15	</style>
16	%
17	
18	d=~/dessins
19	c=~/coquilles/dessin/
20	
21	dessin $d/plis.html