if ( $data =~ m/^\s*(?:#|$)/ ) {