diff options
Diffstat (limited to 'docs/tutorials/colorize')
-rwxr-xr-x | docs/tutorials/colorize | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/docs/tutorials/colorize b/docs/tutorials/colorize deleted file mode 100755 index 5b324eac473..00000000000 --- a/docs/tutorials/colorize +++ /dev/null @@ -1,18 +0,0 @@ -eval '(exit $?0)' && eval 'exec perl -w -S $0 ${1+"$@"}' - & eval 'exec perl -S $0 $argv:q' - if 0; - -while( <STDIN> ) -{ - s/</\</g; - s,\#(e?l?if !?defined|pragma|ifn?def|define)(\W*)([\w\.]+),<font color=blue>\#$1</font>$2<font color=purple>$3</font>,; - s,\#(include|endif),<font color=blue>$&</font>,; - s,"([^"]+)","<font color=green>$1</font>",g; - s,//.*$,<font color=red>$&</font>,; - s,/\*,<font color=red>$&,; - s,\*/,$&</font>,; - s,\w+::\~?\w+,<font color=\#008888>$&</font>,; - print STDOUT $_; -} - -0; |