#!/usr/bin/perl

use Pg;

sub stampa
{
format PIEDE =
-------------------------------------------------------------------------------
Messaggio suggerito per il mese di @<<<<<<<<<<<<<<<
                                   $mese 
      @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
      $messaggio

----------------------
I dati sopraelencati sono protetti dalla legge sulla privacy e debbono
essere usati esclusivamente per uso interno della Chiesa di Gesu' Cristo
dei Santi degli Ultimi Giorni.