perl -wE "say time"