while (<^(*?)$tool_number(.*)$/) {