use CGI qw(:standard);
print header(), start_html(); # <-- update to run/test w/o changes
print a({-href=>url(1)},
        "self-check: ",
        referer() || 'no referrer');