#!perl -pl $_=eval