in reply to Re: Ideal way to pass a file to a module
in thread Ideal way to pass a file to a module

The real question is: what are you going to use for the asa-ctl character? I'd not suggest '1'.....

Hmm... Why not I wonder?

I've got a bunch of reports coming out of a NT box that will eventually be FTP'd to MVS VBA datasets and re-archived on the 'frame.

What I'm looking at now 'cause I don't know w/ 100% certainty that all files have (or don't have) ASA CC is this:

Scan the file top to bottom, looking for /^[0-9ABCVW-+\x5A]/. If that's all I find, and I find at least one '1' per 100 lines, then for our purposes it *has* ASA CC and should be left alone. If I find any illegal byte in the first column, or if there aren't enough top-of-pages, the file needs to have ASA control inserted.

The insertion will be as simple as possible, basically, space pre-pended to every line except those lines with \x0C., which is DOS FormFeed. In that case, delete the \xOC and use a '1' in the first position.

Thanks for your time in responding, especially with the MVS side of the house -- tough combination to find w/ Perl.