perl -ne 'print' *