perl -pe "print '#'"