> From: Vekovius, Jeff [mailto:[EMAIL PROTECTED]]
>
> I am having trouble reading files properly using VMS Perl 5.6
> on VMS AXP
> 6.2-1h3. It seems that Perl is loosing some of the
> NewLines.. ( some NL's
> get changed to a CR/NL... while NL's get dropped entirely...?
> ) The goal is
> to use Perl to get our reports into an imaging system with
> recognizable page
> breaks... ( replace the CR/FF with a CR/NL/FF ... s/\r\f/\r\n\f/ ). A
> listing of the file and the script im using to read it are
> below... am I on
> the right track with this?
>
> File organization: Sequential
> Record format: VFC, 2 byte header, maximum 132 bytes,
> longest 132 bytes
> Record attributes: Print file carriage control
According to the RMS manual, there's a separate field in the RAB that tells
RMS where to place the VFC header bytes. If this field isn't filled in
before issuing a SYS$GET, the information is discarded. I don't think it's
possible to set this field through perl.
Thomas Pfau
[EMAIL PROTECTED]
aka [EMAIL PROTECTED]
http://www.eclipse.net/~pfau/
