vmsish - Perl pragma to control VMS-specific language features
use vmsish;
use vmsish 'status'; # or '$?'
use vmsish 'exit';
use vmsish 'time';
use vmsish;
no vmsish 'time';
If no import list is supplied, all possible VMS-specific features are
assumed. Currently, there are three VMS-specific features available:
'status' (a.k.a '$?'), 'exit', and 'time'.
- vmsish status
-
This makes
$? and system return the native
VMS exit status instead of emulating the
POSIX exit status.
- vmsish exit
-
This makes
exit 1 produce a successful exit (with status
SS$_NORMAL), instead of emulating
UNIX exit, which considers
exit 1 to indicate an error. As with the CRTL's exit function, exit 0 is also mapped to an exit status of
SS$_NORMAL, and any other argument to
exit is used directly as Perl's exit status.
- vmsish time
-
This makes all times relative to the local time zone, instead of the default of Universal Time (a.k.a Greenwich Mean Time, or
GMT).
See Pragmatic Modules.