Select Code to Download

   system('rm test?.out 2> /dev/null');
   print "   ------\n   test 1\n";
...
   $rc = system('/usr/bin/ps', '>' , 'test3.out');
   print '   rc=',$rc,"\n";
   print "   test3.out not created\n" unless -e 'test3.out';

   ------
   test 1
...
        f s c lwp nlwp psr tty addr wchan fname comm args projid proje
+ct
   rc=256
   test3.out not created