"David L. Nicol" wrote:
>
> sub openrecord{
> my $counter, $RFN;
> while( 1){
> -r ($RFN = &GetRecordFileName) and last
> ++$counter > 6 and return undef;
> };
> open REC, "$RFN";
> ...
> }
Depend
"David L. Nicol" wrote:
>
> sub openrecord{
> my $RecordFileName = &GetRecordFileName;
> TRYOPEN:
> open REC, "$RecordFileName" or throw "FILE-NO-OPEN";
> #work with the file
> ...
>
> return;
>
> my $probl
> "DLN" == David L Nicol <[EMAIL PROTECTED]> writes:
DLN> =head2 eval/die remains perfectly workable
DLN> as "die" is a perfectly serviceable method or raising an exception.
Actually, die is pretty nasty. Modules can't use it.
Another mechanism that means, short circuit, but let the user