home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Acorn User 10
/
AU_CD10.iso
/
Updates
/
Perl
/
Non-RPC
/
!Perl
/
scripts
/
TestSystem
< prev
next >
Wrap
Text File
|
1997-02-21
|
285b
|
9 lines
system( '*/@.perl -e "print \"hello world\\\\n\\";"' );
system( '*/@.perl -e "print \"hello with meta*chars\\\\n\";"' );
system( "*echo", "hello", "from", "exec" );
$rc = system( '*/@.perl -e "print \"Exiting with 2\\\\n\"; exit 2;"' );
print "\$rc = $rc \n";
print "Still here!\n";