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>