Hi all,
I have source code
------------------------------------------------
use vmsish 'status';
$msg = `\@AA.com`;
$cmd_status = $?;
print "cmd status is:$cmd_status\n";
------------------------------------------------
and DCL procedure AA.COM
------------------------------------------------
$ write sys$output "HELLO FROM AA.COM"
$ return XXX
------------------------------------------------
if I am changing XXX value then I am get in perl code
XXX $?
0 1
1 1
2 268435458
3 3
4 268435460
5 4
6 268435462
7 7
8 8
Why I am don't get value XXX. What is I do wrong ?
I am running Perl 5.6.0 on Alpha OpenVMS V7.3
Thanks for advice
**************************************
* Pavel Smejkal
* ENVINET, a.s.
* Brafova 531, TREBIC, 674 01
* CZECH REPUBLIC
**************************************
