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>


Reply via email to