#!perl open+0;print<0>