Select Code to Download

#!/usr/local/bin/perl
use Getopt::Std;
...
        close RECOVER;
}

#!/usr/local/bin/perl
# This tests the recovery system
...
        $_ = 'start.rec';
        (-s) ? return $_ : return 0
}