Tom Allison wrote: > I've been using the practice of putting something at the bottom of a > file for holding static data, like SQL, by calling a __DATA__ handle: > > my $sql = join('',(<DATA>)); > > > > __DATA__ > select ..... > > > Is there any way to do this twice? > To define two sets of static SQL?
You probably want the Inline::Files module. http://search.cpan.org/~dconway/Inline-Files-0.62/ John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>