perl -lne 'foo}{bar'ってどういう意味なの?