perl -pe 's/#.*$//' #### perl -Tpe 'BEGIN { $ENV{PATH} = "" } s/#.*$//'