develooper Front page | perl.vmsperl | Postings from June 2002

TYPE/CONT in Perl

Thread Next
From:
BAZLEY, Sebastian
Date:
June 10, 2002 05:18
Subject:
TYPE/CONT in Perl
Message ID:
FB30E6123B22D211B52800A0C9CFBB1901C7B174@Lones2.sema.co.uk
We have an application that needs to keep track of a log file that is being
appended to every so often. As it happens, the file is being opened,
appended, and closed, but we might need to track another file that is
permanently open.

The file can be read OK in DCL with TYPE/CONT, and in Perl:

	open IN, "TYPE/CONT |";

works OK, except that we haven't found how to terminate the sub-process
without exitting the Perl script.

This is not really a big problem. We can live with it...

However, it would be nice if we could read the file directly from Perl, e.g.
with the appropriate vmsopen() call from VMS::Stdio. We've tried "shr=put",
but cannot seem to read beyond the initial end of the file.

Has anyone solved this? [I couldn't find anything obvious in Google or my
VMS Perl archives]

We can live with our type/cont solution, but a neater solution would be
nice...

-- 
Sebastian Bazley <SBazley@london.sema.slb.com>
The opinions expressed herein are my own, and are not necessarily endorsed
by my employer ...


___________________________________________________________________________
This email is confidential and intended solely for the use of the 
individual to whom it is addressed. Any views or opinions presented are 
solely those of the author and do not necessarily represent those of 
SchlumbergerSema. 
If you are not the intended recipient, be advised that you have received this
email in error and that any use, dissemination, forwarding, printing, or 
copying of this email is strictly prohibited.

If you have received this email in error please notify the SchlumbergerSema Helpdesk by telephone on +44 (0) 121 627 5600.
___________________________________________________________________________


Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About