$ ls -i1 /opt/X11/share/X11/rgb.txt /usr/X11/share/X11/rgb.txt
85658151 /opt/X11/share/X11/rgb.txt
85658151 /usr/X11/share/X11/rgb.txt

##</code><code>##

$ perl -nE '@x=split;$seen{join(" ",@x[0,1,2])}++;END{say 0+keys%seen}' < /opt/X11/share/X11/rgb.txt
512
$ wc -l /opt/X11/share/X11/rgb.txt
782 /opt/X11/share/X11/rgb.txt

##</code><code>##

$ perl -ne 's/[\t ]+/ /g; print' original_name > canonical_name