#!/usr/bin/perl use Editor; print Editor->new->solicit(<<"_INTRO_"); Insert text here. _INTRO_