Hi,
As Inline::Files seems to be the solution you could do something really dirty to be able to use it!
#!C:/activeperl/bin/perl-w use strict; open(OFILE,">myfile.pm") or die("Can't open myfile.pm\n$!"); print OFILE <<EOF; package myTestPackage; sub mytest() { print "hello World!\n"; } 1 EOF close(OFILE); require "myfile.pm"; myTestPackage::mytest();
Horrible solution but this simple code works. Don't see why you can't put the Inline::Files code in the here document...
- MarkIn reply to Re: multiple __DATA__ && __END__
by Anonymous Monk
in thread multiple __DATA__ && __END__
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |