What I meant is: since you are removing everything after __DATA__, if the program had something besides POD in there, and accessed it via the DATA filehandle, it would no longer work.

Reading your reply, anyway, I'm starting to believe you are not going to run those script.

-- 
        dakkar - Mobilis in mobile

Oh, yes

I know this, and, you're right, I won't run the code.

If I choose to use my proposed module, I might add a parameter so users can specify if they want to drop stuff after __DATA__ or not...

--
#!/usr/bin/perl
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}
[download]