Re: [FWP] COBOL as Perl

["Bill Jones" <bill@fccj.org>]

>  FD FOOO.
>  01 FOO-RECORD.
>    05 ACCOUNT-KEY.
>   10 ACCOUNT-NUMBER PIC X(5).
>   10 DUMMY  PIC X.
>   10 ACCOUNT-VERSION PIC 9(2).
>    05 ACCOUNT-SPEC REDEFINES ACCOUNT-KEY.
>   10 ACCOUNT-CHART PIC X(2).
>   10 ACCOUNT-SUB-ACCT PIC 9(4).
>   10 DUMMY  PIC X.
>   10 ACCOUNT-CHK-DGT PIC 9.


The COBOL 'advantage' I remember most is that
you created a record layout which matched the
expected data.

PS - Is there a perl way to 'limit' string size?

In COBOL:

PIC 9(4)V99.
PIC XX-XXX-XXXX.

???
-Sneex-  :]
FCCJ Data Security Group
______________________________________________________________________
Bill Jones  Data Security Specialist  http://www.fccj.org/cgi/mail?dss

==== Want to unsubscribe from Fun With Perl?
==== Well, if you insist... Send mail with body "unsubscribe" to
==== fwp-request@technofile.org