DB<19> $foo = 'a=b'; DB<20> x $foo =~/a=([a-z]+)/; 0 'b' DB<21> x $foo =~/(?:a=([a-z]+))?/; 0 'b' DB<22> $foo = 'x' . $foo DB<23> x $foo =~/(?:a=([a-z]+))?/; 0 undef