#!perl -n
print