warn Dumper(
	{
		a => scalar( "a" =~ m/b/ ),
		b => 'asdf'
	}
);

use PerlX::Maybe;
warn Dumper(
	{
		maybe a => "a" =~ m/b/,
		b => 'asdf'
	}
);