#!just another perl hacker,
push@ARGV,$0;$_=<>;s,..,,&&print