From fd678a6d9fc19437787de1f455e825d6720140d1 Mon Sep 17 00:00:00 2001 From: Hauke D Date: Thu, 13 Sep 2018 10:53:37 +0200 Subject: [PATCH] Regex tester iframe can fetch from local server --- web/regex_tester.html | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/web/regex_tester.html b/web/regex_tester.html index 0b4ee48..3f69580 100644 --- a/web/regex_tester.html +++ b/web/regex_tester.html @@ -152,11 +152,18 @@ END_CODE my $runcode_iframe; my $runcode_message_callback; # assume a single callback for now if ($RUN_CODE_IN_IFRAME) { # https://www.html5rocks.com/en/tutorials/security/sandboxed-iframes/ + my $webperlurl; + $jq->('script')->each(sub { $webperlurl=$_[1]->{src} if $_[1]->{src}=~/\bwebperl\.js\z/ }); + if (!$webperlurl) { + warn "Warning: Could not determine URL of webperl.js\n"; + $webperlurl = 'webperl.js'; # probably won't work due to same-origin + } my $iframe_html = <<~'END_IFRAME_HTML'; -