#!/usr/local/bin/perl $~ = "MYFORMAT"; write; format MYFORMAT = Here is the text I want to display.