#!/bin/bash
perl -nle '/(some)(?:.*?number (\d+))?/ && print join("\n", $1, $2)' <<< "some text and number 18"
perl -nle '/(some)(?:.*?number (\d+))?/ && print join("\n", $1, $2)' <<< "some other text"
IyEvYmluL2Jhc2gKcGVybCAtbmxlICcvKHNvbWUpKD86Lio/bnVtYmVyIChcZCspKT8vICYmIHByaW50IGpvaW4oIlxuIiwgJDEsICQyKScgPDw8ICJzb21lIHRleHQgYW5kIG51bWJlciAxOCIKcGVybCAtbmxlICcvKHNvbWUpKD86Lio/bnVtYmVyIChcZCspKT8vICYmIHByaW50IGpvaW4oIlxuIiwgJDEsICQyKScgPDw8ICJzb21lIG90aGVyIHRleHQi