#!/usr/bin/perl -w use warnings; use CGI; my $content = new CGI; print $content->header("text/html"); print "SOME TEXT HERE"; if ( $pressed ) { print "REST OF THE PAGE"; } print $content->end_html;