#!/usr/bin/perl -w

use strict;

my $text = "Display this";

print <<END_HTML;

<form action="blah.pl">
    <input type="text" name="stuff" value="$text" />
    <input type="submit" value="Submit">
</form>

END_HTML