$ perl -e " use Time::Piece; print localtime->year,$/ " 2014