#!/usr/bin/perl eval eval '"'. ('[' ^'+').( ('[')^ (')')).( ('`')| ')').( ('`')| '.').( ('[')^ '/' ).+ '\\'.+ "\"".( '`'^'!').('`' ^',').('`'^ ',').( ('{')^ '[').('{'^'"') .('`'^'/').('{ +' ^'.'). ("\{"^ "\)").( (( "\{"))^ '[') +.( ('{')^ '(').( '`'^'%' ).('`' ^'!' +). ("\{"^ ')').( '`'^('#')).( '`'^'(' ).(' +{'^ '[').( ('`')^ '!').('{'^')') .('`'^'%').('{'^ +'[' ).('`' ^'"'). ('`'^('%')).( '`'^',').('`'^'/ +'). ("\`"^ '.').( '`'^"'") .('{'^ '[').( ('{')^ ( '/')).( ('`')^ '/').( '{'^'[' ).('{' ^'.').( '{'^'(' ).( +( '\\')) .('\\').( '`'|'.').('\\'). '"'.';'.(('!' +)^ "\+"). "\"";$:= '.'^'~';$~= '@'|'(';#;#
--
perl -pe "s/\b;([st])/'\1/mg"
In reply to Re: interlink search engine
by belg4mit
in thread interlink search engine
by Juerd
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |