in reply to Scope of the DATA handle
If you really want multiple 'virtual' files (each with their own __TOKEN__), see Damian's Inline::Files package on CPAN.