if ( $html =~ m{<script type="application/ld\+json">((?:(?!<script).)+?)</script>}s ) {
    $json = $1;
}