#!perl -p
s/^\s*(#.*)?|\h*$//sg