#!/usr/bin/perl -wT use strict; print "Content-Type: text/html\n"; print "Cache-Control: no-cache, no-store\n"; print "X-FRAME-OPTIONS: sameorigin\n\n"; print "

PASS: This should show up as the parent is in the same origin.

\n";