You may want to check out SYS$FORCEX
That would kill an (perl) image but leave DCL (command file) running.

In more recent OpenVMS version this is also availabel as DCL command
STOP/IMAGE. The system service has always been there.

fwiw,
Hein.

On Sat, Sep 6, 2008 at 5:58 PM, John E. Malmberg qsl.net> wrote:

Hi,

I'd like to use a VMS perl interface to
sys$getrmi.

I'm attempting to write my own version, but if
anyone has already started this effort and
has some ideas, or eve better, working code,
please contact me; offline is fine.

If / when I get this done, it will get to
CPAN.

Thanks,

Carl Friedberg
friedberg@esb.com
www.esb.com
The Elias Book of Baseball Records
2008 Edition

Greetings,

The version of mmk we are currently using in production is:

$ mmk/ident
%%MMK-I-IDENT, this is the MadGoat Make Utility V3.9-10
-MMK-I-COPYRIGHT, Copyright © 1992-2005, MadGoat Software. All Rights
Reserved.

Matt Madison was fixed some IA64 related problems and released a later
version:

%%MMK-I-IDENT, this is the MadGoat Make Utility V4.0
-MMK-I-COPYRIGHT, Copyright (c) 2008, Matthew Madison. See LICENSE.TXT in
distribution kit for license information.

I'd like to place V4.0 into the NH devel cluster and VA devel cluster for
tomorrow morning's perl_module build use.
After we've used it a bit I will then install it into the production
clusters.

Does anyone have an objection to these plans? Thanks.

Peter Prymmer

Hello,

playing with pack and unpack I discoverd a strange and
reproducable behaviour.

The following little code

#!/usr/bin/perl

$zerobuffer = chr(0) x 8192;

print "zerobuffer: ", length($zerobuffer), "\n";

$test = "test.dat";

open (OUTPUT, ">$test" ) || die "Fehler open";
binmode OUTPUT;

for ($rec=1; $rec<=500; $rec++) {
print OUTPUT "$zerobuffer";
print "REC #$rec geschrieben\n" if ( ! ($rec %% 100) );
}

close (OUTPUT);

needed about 15 seconds on my AlphaServer_800 with
OpenVMS V8.3 and perl v5.8.6 .

TWiki is now available for OpenVMS.

WWW.TWiki.org is a web server based collaboration tool.

TWiki is written in Perl, and patches are now available for it to run on
OpenVMS using Apache.

Http://www.twiki.org/cgi-bin/view/Codev/TwikiOnVMS

-John
wb8tyw@qsl.net
Personal Opinion Only

The GNU way of doing things is specific to GNU and, as far as I can
see, GNU has never been concerned with maintaining backwards
compatibility.

Most of the configure scripts I have encountered simply attempt to
compile a short c/c++ program that contains a statement or two but no
include files. If the statement fails, then support must not be
present. To me, this approach explains a lot of the really bad coding
I've seen in some open source projects.

I worked around this by having GNV specify a /first_include switch
that specified a file I had created that set up the necessary
environment (.e.g, define _USE_STD_STAT, _SOCKADDR_LEN, __NEW_STARLET,
etc. then include all of the headers that should have been included by
the configure script's generated programs). This solved the problem
for me except for those configure scripts that include ASM
statements. I should note in passing that I probably haven't used
that many configure scripts.

Mark Berryman

On Jun 18, 2008, at 7:40 AM, John E. Malmberg wrote:

Atención: Este mensaje contenía uno o más anexos que han sido eliminados
Atención: (doc.zip, doc.scr).
Atención: Por favor, lea el(los) anexo(s) "WSP-Attachment-Warning.txt" para más información.

The message cannot be represented in 7-bit ASCII encoding and has been sent as a binary attachment.

Este es un mensaje del Servicio de Protección de Virus para Correo
Electrónico MailScanner
----------------------------------------------------------------------
El archivo anexado original "doc.zip"
está en la lista de anexos inaceptables para este sitio y el mismo
ha sido reemplazado por este mensaje de aviso.

Si desea recibir una copia del archivo anexado original, por favor
envíe un correo electrónico al departamento de soporte incluyendo
este mensaje. Alternativamente, puede llamar a dicho departamento,
teniendo el contenido de este mensaje a mano.

El Thu Jun 5 09:34:52 2008 el analizador de virus dijo:
MailScanner: Windows Screensavers are often used to hide viruses (doc.scr)

Nota para el departamento de soporte: Revisar en the WSP () MailScanner en
/var/spool/MailScanner/quarantine/20080605 (mensaje 995CFF2C784.891F5).

At 17:20:04.46 on 26-MAY-2008 in message <483B28EB.70407@qsl.net>, "John E.
Malmberg" qsl.net> wrote:

I'm not sure about a lot of this, but your regular expressions for
determining if something matches "MMK" or "MMS" need more refining. To wit...

You're confusing character classes and alternation. The above means
(without regard to case) "MMS", "MM|", or "MMK". What you want is merely...

... /MM[SK]/i...

To quote the Camel, (p. 64, Second Edition)...

...[fee|fie|foe] means the same thing as [feio|].

news ger.gmane.org> wrote on 04/24/2008 08:54:46 PM:

There is a VMS specific way to do this. In the discussion of
the crypt builtin function in perlfunc.pod there is this example:

system "stty -echo";
print "Password: ";
chomp($word = );
print "\n";
system "stty echo";

in order to have that work on VMS replace the stty command
with the set terminal command like so:

system "set terminal/noecho";
print "Password: ";
chomp($word = );
print "\n";
system "set terminal/echo";

then $word will contain what the user typed in at the prompt.

Hi,

I would like to prompt for a password from a perl script. I have
tried using Term::ReadKey to turn off echo, but that doesn't seem to
be working. Is there a VMS specific way to do this?

Thanks,
-Jason

$ perl -v

This is perl, v5.8.7 built for VMS_IA64